Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Bild lade Fehler (https://www.delphipraxis.net/58310-bild-lade-fehler.html)

Hammurabi 5. Dez 2005 14:04


Bild lade Fehler
 
Hi @ll,

ich lade bilder von einem ordner aus die durch zufall angezeigt werden nur das problem ist das nicht alle bilder in diesem ordner richtig funktionieren und ich sie auch nicht löschen kann bzw. sich der inhalt immer verändert.

nun die frage: das programm stürtzt immer ab wenn es ein fehlerhaftes bild laden soll mit der fehlermeldung EFOpenError und dem dateinamen.

wie kann ich die fehlermeldung auslesen und dann einfach nach dem nächsten bild suchen oder so...

wäre über hilfe dankbar

Luckie 5. Dez 2005 14:08

Re: Bild lade Fehler
 
Kapsel den Code in einem try-exceptblock.

ichbins 5. Dez 2005 14:10

Re: Bild lade Fehler
 
Delphi-Quellcode:
  try begin
    b.loadfromfile('c:\bild.bmp');
  end except
    showmessage('Bild funktioniert nicht.');
  end;
Der Delphi-Debugger zeigt dir immer noch Fehler an, aber wenn du das Programm einfach so startest, kommen keine Fehler mehr.

//edit:

Luckie war schneller :wall:

TeronG 5. Dez 2005 14:27

Re: Bild lade Fehler
 
Zitat:

Zitat von ichbins
Delphi-Quellcode:
  try begin
    b.loadfromfile('c:\bild.bmp');
  end except
    showmessage('Bild funktioniert nicht.');
  end;

so btw.: sollte das nicht auch so reichen?
[quote="ichbins"]
Delphi-Quellcode:
try
  b.loadfromfile('c:\bild.bmp');
except
  //on E: Exception do ShowMessage('Fehlertext: '+#13+E.Message);
  showmessage('Bild funktioniert nicht.');
end;
oder mach ich da was falsch/schlecht?

Khabarakh 5. Dez 2005 15:32

Re: Bild lade Fehler
 
Zitat:

Zitat von TeronG
Zitat:

Zitat von ichbins
Delphi-Quellcode:
  try begin
    b.loadfromfile('c:\bild.bmp');
  end except
    showmessage('Bild funktioniert nicht.');
  end;

so btw.: sollte das nicht auch so reichen?
Delphi-Quellcode:
try
  b.loadfromfile('c:\bild.bmp');
except
  //on E: Exception do ShowMessage('Fehlertext: '+#13+E.Message);
  showmessage('Bild funktioniert nicht.');
end;
oder mach ich da was falsch/schlecht?

Nö. Der Block von ichbins ist überflüssig, try und except sind schon Begrenzer genug.


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:38 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