Überprüfen ob Datei vorhanden ist...

[Knotti2005]

Hallo Leute,

ich suche eine Methode um zu Überprüfen ob 2 Dateien vorhanden sind list1.txt und list2.txt wie realisiere ich das?



Danke im Voraus...

[Jelly]

Guckst Du in der Delphi Hilfe nach FileExists

[Knotti2005]

Danke :oops:

[Knotti2005]

Neue Frage...

ich hab es jetzt so gemacht...

Delphi-Quellcode:

if FileExists('.\list1.txt') then dxbutton1.Enabled := true
else
dxbutton1.Caption:= 'FEHLER';

Wie bringe ich noch die 2. Datei hinein?...

[heiopei]

hallo,
genauso:

Delphi-Quellcode:

  if FileExists('.\list1.txt') then 
    dxbutton1.Enabled := true 
  else
  dxbutton1.Caption:= 'FEHLER';
  if FileExists(.\list2.txt') then
    dxbutton2.Enabled := true
  else
  dxbutton2.Caption := 'FEHLER'...

[Waldteufel]

Hi.

@heiopei: Ich glaube, er will eher den Button erst enablen, wenn beide Dateien vorhanden sind.

Also so:

Delphi-Quellcode:

  if FileExists('.\list1.txt') and FileExists('.\dateinummerzwei.txt') then
    dxbutton1.Enabled := true
  else dxbutton1.Caption:= 'FEHLER';

[heiopei]

tja dann...

[Knotti2005]

Danke ...

Ich hab immernoch ein Problem ich will mit dem Code unterdrücken das Form2 aufgerufen werden kann dort werden mithilfe von...

Delphi-Quellcode:

E.LoadFromFile('.\list1.txt');

die Dateien in Stringlisten geladen werden. Leider gibt er mir schon beim Starten die Meldung das die Dateien nicht vorhanden sind und das Programm stürzt leider ab...

:pale: :pale: :pale:

[Luckie]

Wird wohl daran liegen, dass er die Datei da sucht, wo er suchen soll, nämlich im aktuellen Arbeitsverzeichnis. Und das muss eben nicht das Programmverzeichnis sein.

[Knotti2005]

Die Datein liegen ja da Drinne eigentlich...

Ich will aber für den Fall das sie mal nicht da sein sollten, nicht gleich den User mit jede Menge Fehlermeldungen konfronterieren...

:roll: