03. september 2006 - 15:50Der er
10 kommentarer og 1 løsning
Fejl i kode?
Jeg har lavet denne kode:
procedure TForm1.Button1Click(Sender: TObject); begin DeleteFile('C:\Documents and Settings\User\Skrivebord\semig.txt'); if true then WriteLn('Folders/Files is Deleted!') else WriteLn('Folders/Files could not be Deleted');
men den kommer ikke.. filen bliver slettet men beskeden kommer ikke
procedure TForm1.Button1Click(Sender: TObject); var r : boolean; begin r:=DeleteFile('C:\Documents and Settings\User\Skrivebord\semig.txt'); if r then showmessage('Folders/Files is Deleted!') else showmessage('Folders/Files could not be Deleted');
procedure TForm1.Button1Click(Sender: TObject); begin if DeleteFile('C:\Documents and Settings\User\Skrivebord\semig.txt') then WriteLn('Folders/Files is Deleted!') else WriteLn('Folders/Files could not be Deleted');
if DeleteFile('C:\Documents and Settings\User\Skrivebord\semig.txt') then showmessage('Folders/Files is Deleted!') else showmessage('Folders/Files could not be Deleted');
For at slette en tom mappe kan du bruge: RemoveDir
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.