Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Trotzdem habe ich Deinen Code mal neu formatiert:procedure TForm1.FormShow(Sender: TObject);
var update: Integer;
Ini : TIniFile;
UserAppDataDir, ProgPath: String;
begin
UserAppDataDir := GetSpecialFolder(CSIDL_LOCAL_APPDATA);
if FileExists(UserAppDataDir + AppDataRootDir + AppDataProjectDir + '\Config.ini') then
//dieser Block wird niemals ausgeführt, wenn die Ini nicht...
Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Natürlich nicht, da als erste Bedingung geprüft wird, ob die Ini existiert. Kann sie aber nicht, wenn es das Verzeichnis gar nicht gibt. Wenn Du vernünftig einrücken würdest, hättest Du das wahrscheinlich auch gesehen ;)
Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Hab ich mich verzählt oder fehlt da ein "end;"?
Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Daran kann es nicht liegen. Zeig mal den ganzen Code vom FormShow.
Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Der Code ist aber eigentlich in Ordnung. Steht da vielleicht noch was anderes dazwischen?
Forum: Sonstige Fragen zu Delphi
Delphi
by DeddyH,
22. Apr 2009
Und ich verstehe nicht, wieso Du Dir Dein Verzeichnis immer noch ständig neu zusammenbastelst. Ich hatte Dir doch erklärt, wie das mit Konstanten und privaten Feldern besser geht.