Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Löschen von Dateien

   
    by C.Schoch, 3. Feb 2007
  Des weiteren kannst du noch nicht davon ausgehen, dass die Datei wirklich gelöscht wurde!
  Ich würd noch den Rückgabewert von DeleteFile abfragen
  
  procedure TForm4.Button1Click(Sender: TObject);
  var a :String;
  begin
  if FileListBox1.FileName <> '' then
  begin
  if Application.MessageBox('Wollen sie wirklich dieses Bild Löschen ','Löschinformation',68)=6 Then
  begin
• Forum: Object-Pascal / Delphi-Language

  Re: Löschen von Dateien

   
    by C.Schoch, 3. Feb 2007
  Was zeigt die die MessageBox denn an?
  Wenn der Pfad den die zuvor beschriebene MessageBox ausgibt stimmt kannst du mal nach DeleteFile den Fehlercode mit GetLastError holen. Für die Ausgabe eines Fehlertextes einfach noch SysErrorMessage(GetLastError) davor.