Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Tote Datei öffnen verhindern (https://www.delphipraxis.net/131922-tote-datei-oeffnen-verhindern.html)

bl4ckb1rd 2. Apr 2009 21:50


Tote Datei öffnen verhindern
 
Hab schon gesucht wie man verhindern kann das Delphi eine nicht existierende Datei öffnet aber leider nix gefunden, deswegen mach ich mal darüber einen neuen Thread auf ;)

Folgendes Problem: Mein Programm öffnet viele Bilder und bearbeitet Sie. Der Benutzer legt die zu bearbeitenden Dateien und den Ordner pics ab und Delphi soll dann alle Bilder abarbeiten. Das Limit sind 999 Bilder.
Wenn der Benutzer jedoch nur 10 Bilder dort reinkopiert, wie kann dann Delphi nur die 10 Bilder öffnen und nicht versuchen dann das 11te usw zu öffnen?

Hier ist die Betroffene Stelle:

[delphi]
for bild := 1 to 999 do begin

//Hier soll kontrolliert werden ob das Bild Nummer 'bild' überhaupt existiert o.O wenn ja dann:
image1.Picture.LoadFromFile('pics\'+inttostr(bild) +'.bmp');
//wenn nicht dann soll nur die Schleife abgebrochen werden

//Hier wird dann das Bild bearbeitet



end;

mkinzler 2. Apr 2009 22:00

Re: Tote Datei öffnen verhindern
 
-Abfragen ob Datei existiert: if FileExists() then ...
-über vorhandene Dateien und nicht dem Dateinamen gehen. Stichwort FindFirst()/FindNext()


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