GetLastError over Network

[himitsu]

Da DeleteFile bei dir ausgeführt wird, sollte es auch einen ErrorCode liefern. Aber es wäre gut, wenn du diesen Code direkt nach DeleteFile abfragst und nicht zwischendurch noch einige andere WinAPIs aufrufst, welche ebenfalls diesen Code setzen können/könnten (wie z.B. in User.Text).

Delphi-Quellcode:

if DeleteFile('\\' + Host.Text + '\C$\Users\' + User.Text + '\AppData\Local\Mainsoft\Harmony\configuration\config.ini') then
  Liste.Items.Add('success on user' + User.Text)
else
begin
  E := GetLastError;
  Liste.Items.Add('ERROR on ' + User.Text + '-> '+ SysErrorMessage(E)); 
end;

Bzw. das Ganze optisch noch etwas zusammenhängender:

Delphi-Quellcode:

if not DeleteFile('\\' + Host.Text + '\C$\Users\' + User.Text + '\AppData\Local\Mainsoft\Harmony\configuration\config.ini') then
begin
  E := GetLastError;
  Liste.Items.Add('ERROR on ' + User.Text + '-> '+ SysErrorMessage(E)); 
end else
  Liste.Items.Add('success on user' + User.Text);