Si el usuario y la pass son correctas también entra al programa..., dije que lo hacía SIEMPRE.
Y desde el proyecto como tengo que hacerlo porque al hilo donde explica lo hace igual.
Es:
Código:
var
n:Variant;
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TModeloDatos, ModeloDatos);
Application.CreateForm(TForm22, Form22);
ModeloDatos.TblEmpresa.Active:=True;
n:=ModeloDatos.TblEmpresa.FieldValues['Nombre'];
Form1.Caption:='BIENES DE USO 1.0'+' - '+n;
ModeloDatos.TblEmpresa.Active:=False;
Form23:=TForm23.Create(Application);// lo creo
Form23.ShowModal; //y lo muestro.-
Application.Run;
end.
Gracias.
Silvio.-