hola amigos tengo el siguiente dilema
en una pequeña aplicacion tengo form1 y 1 datamodule llamados Dmdatos
si desde el form1 creao mando crear una base de datos me marcaba error
bueno pues puse el IBDatabase en el form1 y ya pude crear la base
pero si la deseo crear desde el form1 hasta el data module me tira el error de:
Código Delphi
[-]Access violation at adress 005cab7b in module programa.exe read of addresss 00000074
y ade ahi ya no paso
pero bueno si creo la base desde form1 como dije la crea sin problema pero ahora si deso abrir la misma base de datos ya creada me vuelve a sacar el mismo error
codigo para abrir base de datos ya creada :
me arroja el error desde la primera linea IBDatabase1.params.clear
es un procedure que lo mando llamar desde el form1
Código Delphi
[-]
procedure TDmDatos.open_bdfb;
begin
IBDatabase1.Params.Clear;
IBDatabase1.DatabaseName:=RutaBdFb;
IBDatabase1.Params.Add('user_name=SYSDBA');
IBDatabase1.Params.Add('password=masterkey');
IBDatabase1.DefaultTransaction:=IBTran1;
IBTran1.DefaultDatabase:=IBDatabase1;
if not IBDatabase1.Connected then
begin
IBDatabase1.Connected:=true;
IBDatabase1.Open;
end;
if not IBTran1.Active then
IBTran1.Active:=true;
end;
me pueden hechar una manita
uso delphi 2007, firebird 2.1 y acceso con IBdatabase de interbase
la variable ruta tiene la ruta exacta donde crear
repito este codigo no me funciona en el datamodule pero si lo copia y lo hago desde el form1 si corre
gracias