Überprüfen ob Datei vorhanden ist...

[Luckie]

Ich muss mich noch mal zitieren:

Zitat:

Zitat von 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.

Man beachte die Hervorhebung. Wo liegt denn die Datei bzw. soll sie denn eiegntlich liegen?

[Knotti2005]

Aso... Sie liegen im Selben Ordner wie auch die EXE Datei dies kann aber von PC zu PC unterschiedlich sein...

Es kann ja mal passieren das irgenteiner die Datei löscht dann soll halt das Programm bis zur Form1 laufen wo dann halt der Button nicht klickbar ist...

Und nicht schon vorher abstürzen...

[DGL-luke]

@Luckie: Er meint, "was mache ich, wenn die Datei nicht da ist"

Delphi-Quellcode:

if not FileExists('file.txt') then
  button_der_die_form2_aufruft.enabled := false;

[Ratte]

So müsste es stimmen:

Delphi-Quellcode:

if FileExists(ExtractFileDir(ParamStr(0)) +'\list1.txt') and FileExists(ExtractFileDir(ParamStr(0)) +'\list2.txt') then
    dxbutton1.Enabled := true
  else dxbutton1.Caption:= 'FEHLER';

mfg,
Ratte

EDIT: ' zuviel

[Knotti2005]

das geht doch alles es kommt nur wenn ich eine der dateien absichtlich lösche bekomme ich von windows eine fehlermeldung ohne das ich die form also das programm überhaupt gesehen habe...

[r2c2]

Zitat:

Zitat von Knotti2005

das geht doch alles...

Ähm... unter den momentanen Umständen ja. Bau malo n openDialog ein, wechsel da mal das Verzeichnis und du wirst dich wundern... Deshalb: Niemals relative Pfade verwenden!

Zitat:

es kommt nur wenn ich eine der dateien absichtlich lösche bekomme ich von windows eine fehlermeldung ohne das ich die form also das programm überhaupt gesehen habe...

Aber nicht in der Zeile oder?

mfg

Christian

[Ratte]

Seltsam. Bist du sicher dass du vorher nie auf die Datei zugreifst?

Ratte

[Knotti2005]

Nein bin ich nicht ichg greufe in der Form1 nicht auf die Datei zu aber in Form2 mit LoadFromFile....

Ist okay ich lass es einfach so....
Ich glaube ich kann es nicht so richtig erklären egal...

Danke für eure mühe

[r2c2]

Zitat:

Zitat von Knotti2005

Nein bin ich nicht ichg greufe in der Form1 nicht auf die Datei zu aber in Form2 mit LoadFromFile....

Zeig mal n bisschen von deinem Code her. Das sollte sich doch finden lassen...

mfg

Christian

[Tyrael Y.]

...so sieht es bissel übersichtlicher aus, oder?

Delphi-Quellcode:

  dxbutton1.Enabled := (FileExists(ExtractFileDir(ParamStr(0)) +'\list1.txt')) and     (FileExists(ExtractFileDir(ParamStr(0)) +'\list2.txt'));