Hola!! A ver si alguien puede ayudarme xq estoy un poco perdida. Tengo un archivo .ini en el q e introduido :
Archivo = D:\projects\silvia\Datos.gdb
user_name = SYSDBA
password = masterkey
lc_ctype = ISO8859_1
Mi problema es q yo desd delphi tengo un procedimiento q crea este archivo y lo lee y el resultado lo almaceno en vbles globales. Tengo un Ibdatabase y el la propiedad de los parametros le introduzco las vbles anteriores y al abrir el ibdatabase es cuando me da un error 'DBP constant (user_name) is unknow.
Os doy el codigo para q me entendais mejor xq no se si me e explicado bien.
Código Delphi
[-]
procedure Tform1.Iniconfig();
var
Ini: TIniFile;
begin
Ini := TIniFile.Create( ChangeFileExt(Application.ExeName, '.INI' ));
try
with ini do
begin
Dtbdatos1.DatabaseName := ReadString('Origen','Archivo','');
user1 := ReadString('Origen','user_name','');
password1 := ReadString('Origen','password','');
tipo1 := readString('Origen','lc_ctype','');
end;
finally
Ini.Free;
end;
end;
procedure TForm1.abrirD1();
begin
DtbDatos1.DefaultTransaction := TrnDatos1;
DtbDatos1.LoginPrompt := false;
Dtbdatos1.Params.Add('user_name = ' + user1);
DtbDatos1.Params.Add('password = ' + password1);
DtbDatos1.Params.Add('lc_ctype = ' + tipo1);
DtbDatos1.Open;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
iniconfig();
abrirD1();
end;
Muxas Gracias;