Zugriffsverletzung beim ini laden

[MCOP2001DE]

Hallo

ich habe folgendes Problem bei meinem Progamm soll der Pfad der Datenbank aus einer Ini Datei gelesen werden.
Beim ausführen bekomme ich aber die Meldung Zufriffsverletzung
mein Code sieht wie folgt aus

Delphi-Quellcode:

procedure TMainframe.FormCreate(Sender: TObject);
var ini: TIniFile;
Dir : String;
begin

   Mainframe.Entnahme.Hide;      // schliessen des Entnahmeframes
   Mainframe.Lieferung.Hide;     // schliessen des Lieferungsframes
   Mainframe.Dateneingabe.Hide;  // schliessen des Dateneingabeframes
   Mainframe.Info.Hide;          // schliessen des Infoframes

// Laden des Datenbankpfads
   ini := TInifile.Create(ExtractFilePath(ParamStr(0))+'Konfiguration.ini');
   try
   Dir := ini.ReadString('DB', 'Pfad', '');
   Tabellen.Verbindung.ConnectionString := Dir;
   finally
   ini.Free;


// öffnen aller Datenbankverbindungen
 begin
   if Fileexists (Dir) then
    begin
     Tabellen.Verbindung.Connected := True;

     Tabellen.Tab_Art.Active         := True;
     Tabellen.TAB_Lieferant.Active   := True;
     Tabellen.TAB_Ersatzteil.Active  := True;
     Tabellen.TAB_Lagerbestand.Active:= True;
     Tabellen.TAB_Lieferung.Active   := True;
    end
   else
    begin
     Showmessage('INI Datei oder Datenbank nicht gefunden')
    end;
 end;
end;
end;

Die Adresse der Zugriffsverletzung ist 004B8716 im Modul
Weiß jemand Rat?

MCOP2001DE

[omata]

Hallo MCOP2001DE,

setzt mal einen Breakpoint und versuch herauszufinden, in welcher Zeile der Fehler auftritt.

Gruss
Thorsten

[hoika]

Hallo,

falls es tatsächlich die Ini ist,
benutze statt TIniFile TMemIniFile.


Heiko

[MCOP2001DE]

Hallo Omata

Danke für die schnelle Antwort.
Die Meldung tritt in der Zeile

Tabellen.Verbindung.Connectionstring := Dir;

auf.
Ich habe genau den selben Code in anderen Anwendungen eingestetzt und da geht es

Mcop2001de

[MCOP2001DE]

Hallo Hoika

Das funktioniert auch nicht.
Ich erhalte die Fehlermeldung MemIniFiles.dcu nicht gefunden.

MCop2001de

[himitsu]

Zitat:

Tabellen.Verbindung.Connectionstring := Dir;

Dann hat das aber nichts mit der ini zu tun.

Entweder ist das Verzeichnis falsch,
oder mit Tabellen / Tabellen.Verbindung stimmt was nicht.

[marabu]

Hallo,

das kommt mir spanisch vor - ein ADO ConnectionString für MS Access sieht etwa so aus:

Code:

'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\somepath\myDb.mdb'

Was steht denn in der Variable Dir?

Grüße vom marabu

[MCOP2001DE]

Hallo

Die Ini sieht dan so aus wenn er es macht

[DB]
Pfad=D:\Mirko.M-COMPUTERTECHN\Eigene Dateien\Projekt\Ersatzteilverwaltung v1.0\Daten\Data.mdb

Er erstellt mir aber keine Ini Datei.

Den selben fehler bekomme ich auch wenn ich den ADOConnetion in ein eigens Datenmodul packe und ihm einen festen Pfad zuweise

Mcop2001de

[marabu]

Du musst den Pfad in Quotes einfassen, wenn er Leerzeichen enthält:

Code:

Pfad="D:\Mirko.M-COMPUTERTECHN\Eigene Dateien\Projekt\Ersatzteilverwaltung v1.0\Daten\Data.mdb"

Freundliche Grüße

[MCOP2001DE]

Der Pfad soll aber nicht fest im Programm gespeichert werden.
In einen anderen Programm funtioniert das ja auch so wie es soll.
beide Quelltexte sind identisch und trotzdem funktioniert das nicht.