Was hab ich nur Falsch gemacht

[Albi]

Ich habe folgendes Problem, ich habe eine *.ini, in dieser ist der Pfad zu meiner Datenbank gespeichert. Beim Start der Anwendung, wird die Ini ausgelesen und gib die benötigten Daten weiter.
Soweit klappt das auch alles.

Ausgehend davon, das sich nach der Installtion der Pfad der Ini ändert müßte sich auch die Angabe im Program änderm. Wenn ich den Pfad drin zu stehen habe geht aber wenn nicht, bekomme ich immer ne Fehlermeldung.

Code:

Ini:= TIniFile.Create('DataBase.ini');
   Try
    s:= ini.ReadString('Programme','DataBase',' ');
    Table1.DatabaseName:= OpenDialog1.FileName;
    Table1.TableName:= s;
    Table1.IndexFieldNames:= 'Titel';
    Table1.Active:= true;
   except
    ShowMessage('Fehler in der Anwendung');
  end;

Kann mir jemand weiter helfen? Hab schon grauen Haare!! :evil:

[Daniel B]

Hallo,

Du hast vergessen die Ini wieder frei zugeben.

FreeAndNil(ini); nach der Message.

Grüsse, Daniel :hi:

[CalganX]

Hi,
du solltest keine relativen Pfade verwenden, da diese sich auf das Arbeitsverzeichnis beziehen, dass nicht zwangsläufig das Verzeichnis deines Programmes ist.
Mach es also lieber so:

Delphi-Quellcode:

ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'Database.ini');

Chris