Gracias...
Revisé el orden que me enviaste, pero la línea de ocultar el FormPrincipal no me permite crearlo...
Dice.
Código Delphi
[-]
'TApplication' does not contain a member named 'FormPrincipal'
La estructura es así en mi aplicación !
Código Delphi
[-]
program APlicacionMDI;
uses
Forms,
Login in 'Login.pas' ,
AccesoDatos in 'AccesoDatos.pas' ,
Pacientes in 'Pacientes.pas' ,
Principal in 'Principal.pas' ,
Agenda in 'Agenda.pas' ,
visitamedica in 'visitamedica.pas' ,
Creditos in 'Creditos.pas' ,
Diagnosticos in 'Diagnosticos.pas' ,
GraficoAgenda in 'GraficoAgenda.pas' ;
{$R *.res}
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(Tdm, dm); Application.CreateForm(Tdm2, dm2); Application.CreateForm(TFormPrincipal, FormPrincipal);
Application.FormPrincipal:=false; Application.CreateForm(TFormLogin, FormLogin);
FormLogin.ShowModal;
Application.ShowMainForm:=true;
Application.Run;
end.