TZTable could not open
Posted: 11.04.2008, 12:39
Hey there
I switched today from Lazarus 0.9.22 Beta to Lazarus 0.9.25 Beta todays snapshot with the fpc 2.2.0 for windows xp win 32.
My Problem is, that i can compile everything it works fine, then if i start my program some TZTables could not open. I open them with:
on the line TZTable(DBDataMod.Components).Active := True; the program throws an exception:
EZSQLException with message:
###(gdb unparsed remainder:s 0xffffffec out of bounds)###
but not on every table. I don't know where's the problem with the version
0.9.22 fpc 2.0.1 everything workes fine.
thanks for replys.
I switched today from Lazarus 0.9.22 Beta to Lazarus 0.9.25 Beta todays snapshot with the fpc 2.2.0 for windows xp win 32.
My Problem is, that i can compile everything it works fine, then if i start my program some TZTables could not open. I open them with:
Code: Select all
try
DBDataMod.ZCDB.Connect;
for i := 0 to DBDataMod.ComponentCount-1 do begin
if DBDataMod.Components[i].ClassName = 'TZTable' then begin
try
TZTable(DBDataMod.Components[i]).Active := True;
except
ShowMessage(TZTable(DBDataMod.Components[i]).Name+' could not open!');
end;
end;
end;
createLRComponents();
result := true;
except
disconnectserver;
SLFehler := TStringList.Create;
SLFehler.Add('Fehler beim Verbinden mit dem Firebirdserver, Fehlerhafte Einstellungen;');
SLFehler.Add('Alias:'+sdatabasefile);
SLFehler.Add('host: '+shost);
SLFehler.Add('protokoll: '+sprotocol);
SLFehler.Add('username: '+susr);
SLFehler.Add('port: '+inttostr(iport));
SLFehler.SaveToFile(ExtractFilePath(Application.ExeName)+'ServerFalschEinstellungen.error');
SLFehler.Free;
result := false;
end;
EZSQLException with message:
###(gdb unparsed remainder:s 0xffffffec out of bounds)###
but not on every table. I don't know where's the problem with the version
0.9.22 fpc 2.0.1 everything workes fine.
thanks for replys.