關於.wab檔讀取的問題 |
|
尚未結案
|
|
dreamingfom
一般會員   發表：4 回覆：8 積分：2 註冊：2003-08-18 發送簡訊給我 |
以下是我用來讀取.wab檔的方式:
OS:XP Pro
function Get_OutlookWab_Directory: string;
var
Reg: TRegistry;
tmpstr: string;
userID: string;
begin
tmpstr:='';
Reg := TRegistry.Create;
try
//Reg.RootKey := HKEY_CURRENT_USER;
Reg.RootKey := HKEY_USERS;
if Reg.OpenKey('\Software\Microsoft\WAB\WAB4\Wab File Name',false) then
tmpstr := Reg.ReadString('Wab File Name');
if tmpstr = '' then begin
if Reg.OpenKey('\Identities', False) then begin
userID := Reg.ReadString('Default User ID');
if Reg.OpenKey('\Identities\' userID '\Software\Microsoft\Windows\WAB\WAB4', False) then
tmpstr := Reg.ReadString('Store Root');
end;
end;
finally
Reg.CloseKey;
Reg.Free;
end; { try }
result := tmpstr;
end; 照理講,應該是能讀到才對,但卻就是沒法從註冊表內去取得!
不知是何原因?
|
|
hagar
版主   發表：143 回覆：4056 積分：4445 註冊：2002-04-14 發送簡訊給我 |
|
|
dreamingfom
一般會員 發表：4 回覆：8 積分：2 註冊：2003-08-18 發送簡訊給我 |
|
|
hagar
版主 發表：143 回覆：4056 積分：4445 註冊：2002-04-14 發送簡訊給我 |
發表時間：2003-09-24 02:58:41
IP:61.62.xxx.xxx 未訂閱
系統時間：2024-04-27 21:56:21
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |