Man muss es ja wirklich nicht verstehen, aber folgendes passiert auf meiner Kiste:
Ich habe eine einfache
VCL-App erstellt, zwei Buttons, eine IBDatabase. Wenn ich das Programm starte und Button1 drücke, erhalte ich die
Exception. Wenn ich mit Button2 die Datenbank connecte und dann wieder Button 1 drücke, passiert nix mehr, keine
Exception. ????
Code:
procedure TForm4.Button1Click(Sender: TObject);
var
wurzel:Double;
begin
wurzel:=Sqrt(-5);
end;
procedure TForm4.Button2Click(Sender: TObject);
begin
with IBDataBase do
begin
Connected := False;
DatabaseName := 'e:\data\test.gdb';
Params.Values['user_name'] := 'sysdba';
Params.Values['password'] := 'masterkey';
Connected := True;
end;
end;