Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Probleme beim Löschen einer .wav Datei (https://www.delphipraxis.net/122392-probleme-beim-loeschen-einer-wav-datei.html)

sventeq 15. Okt 2008 12:29


Probleme beim Löschen einer .wav Datei
 
Hallo zusammen,

ich hab da ein merkwürdiges Problem. Ich will eine Wav-Datei mit Deletefile löschen, aber es klappt einfach nicht.

Delphi-Quellcode:
  if messageDLG(' Wollen Sie den Satz wirklich löschen?', mtWarning, [mbYes, mbNo], 0) = mrYes then
  begin
    delFile:=audioPath+'\'+prgrammdb.ADOSaetzeWort.Value+'.wav';
    showmessage(delFile);
    if Deletefile(delFile) then showmessage('jau')
    else showmessage('nö');
    try
      prgrammdb.ADOsaetze.Delete;
    except
      messageDLG('Fehler', mtError, [mbOK], 0);
    end;
  end;
ich bekomme immer nur 'nö' als Message angezeigt, obwohl Pfad und Datei stimmem.

Hat da jemand eine Idee?

Luckie 15. Okt 2008 12:31

Re: Probleme beim Löschen einer .wav Datei
 
Ja, lass dir mal eine aussagekräftige Fehlermeldung ausgeben mit SysErrorMessage(GetLastError)).

sventeq 15. Okt 2008 12:44

Re: Probleme beim Löschen einer .wav Datei
 
Zitat:

Zitat von Luckie
Ja, lass dir mal eine aussagekräftige Fehlermeldung ausgeben mit SysErrorMessage(GetLastError)).

Hab ich gemacht. Bein ersten Versuch hat er gelöscht, beim Zweiten nicht mehr.

Allerdings wurde mir auch keine Fehlermeldung ausgegeben.
Hab ich die Fehlermeldung richtig eingesetzt?

Delphi-Quellcode:
    if Deletefile(delFile) then showmessage('jau')
    else SysErrorMessage(GetLastError);

Luckie 15. Okt 2008 12:46

Re: Probleme beim Löschen einer .wav Datei
 
Wenn du Funktionen nicht kennst, dann guck doch mal in der Hilfe oder mit Google nach.

Delphi-Quellcode:
if Deletefile(delFile) then showmessage('jau')
    else ShowMessage(SysErrorMessage(GetLastError));

sventeq 15. Okt 2008 12:55

Re: Probleme beim Löschen einer .wav Datei
 
Zitat:

Zitat von Luckie
Wenn du Funktionen nicht kennst, dann guck doch mal in der Hilfe oder mit Google nach.

Delphi-Quellcode:
if Deletefile(delFile) then showmessage('jau')
    else ShowMessage(SysErrorMessage(GetLastError));

Sorry, sowas Blödes. Jetzt klappt es mit der Fehlermeldung und ich denke, ich weiß wo der Fehler liegt.

Dank dir erstmal dafür


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:12 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz