以及我無法寫入文件,如果應用程序在啓動時運行自動,但當我點擊正常通過雙擊應用程序它創建文件通常即使我使用Wind7UAC.manifest運行應用程序作爲管理。哪裏不對 ?沒有得到這個WriteLN('WriteFile True');這意味着問題是與WriteFile的WriteFile和啓動時問題
Procedure CFile(FileName: String; imagem: string; Size: DWORD);
var
hFile: THandle;
lpNumberOfBytesWritten: DWORD;
begin
hFile := CreateFile(PChar(FileName), GENERIC_WRITE, FILE_SHARE_WRITE, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_HIDDEN, 0);
if hFile <> INVALID_HANDLE_VALUE then
begin
if Size = INVALID_HANDLE_VALUE then
SetFilePointer(hFile, 0, nil, FILE_BEGIN);
if WriteFile(hFile, imagem[1], Size, lpNumberOfBytesWritten, nil) = true then
WriteLN('WriteFile True');
CloseHandle(hFile);
end else WriteLN('Cannot Create File !');
end;
您正在寫入哪個目錄? –
C:\ Program Files我認爲只有windows32和Program Files文件夾有權訪問我已經閱讀了一些在MSDN庫中的位置?和我的UAC被禁用 – user1023395
你沒有對這些文件夾的寫入權限 –