bin grad an einem kleinen tool um pokerstatistiken zu erstellen. nutze lazarus 0.9.22 und
zeoslib 6.6.2-RC.
Ich habe bereits ein grosses projekt mit zeoslib und firebird entwickelt nun stehe ich jedoch vor dem problem das ich firebird embedded server verwenden möchte und nicht genau weis was ich da alles einstellen muss, bis jetzt habe ich es geschaft das die TZConnection verbindet, sobald ich jedoch ein TZTable.active := true setze stürzt das teil ab.
Meine einstellungen die ich bis jetzt gemacht habe(beim kreieren des main formulars):
Code: Alles auswählen
procedure TFrmMain.FormCreate(Sender: TObject);
var
i : integer;
begin
try
//Das Data module kreieren --> in den speicher laden, ist ein Objekt
DBDataMod := TDBDataMod.Create(nil);
//Den Pfad zum Datenbankfile der zcdb Komponente auf dem data module angeben
DBDataMod.ZCDB.Database := ExtractFilePath(Application.ExeName)+'\data\POKERTOOLDATA.FDB';
//Zur Datenbank connecten
DBDataMod.ZCDB.Connected := True;
//In dieser Schlaufe wird nach allen Tables auf dem datamodule gesuch
//wenn eines gefunden wird wird dieses aktiviert.
for i := 0 to DBDataMod.ComponentCount-1 do begin
if DBDataMod.Components[i].ClassName = 'TZTable' then begin
TZTable(DBDataMod.Components[i]).Active := True;
end;
end;
berror := false;
except
ShowMessage('Konnte nicht zur Datenbank verbinden!'+#13#10+'Das Programm wird geschlossen.');
berror := True;
end;
end;TZTable(DBDataMod.Components).Active := True;
aufgerufen wird hääängt das teil, weiss jemand was ich noch berücksichtigen muss?
habe im verzeichniss meiner exe die files:
fbclient.dll //also den embedded einfach umbenannt!
firebird.msg
ib_util.dll
Danke für antworten
gruss
Verein
Links
Suche