Ver Mensaje Individual
  #7  
Antiguo 15-08-2011
mantraxer21 mantraxer21 is offline
Miembro
 
Registrado: ago 2010
Posts: 94
Reputación: 14
mantraxer21 Va por buen camino
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' {FormLogin},
  AccesoDatos in 'AccesoDatos.pas' {dm: TDataModule},
  Pacientes in 'Pacientes.pas' {FormPacientes},
  Principal in 'Principal.pas' {FormPrincipal},
  Agenda in 'Agenda.pas' {FormAgenda},
  visitamedica in 'visitamedica.pas' {FormVisitaMEdica},
  Creditos in 'Creditos.pas' {FormCreditos},
  Diagnosticos in 'Diagnosticos.pas' {FormDiagnostico},
  GraficoAgenda in 'GraficoAgenda.pas' {FormGraficoAgenda};

{$R *.res}

begin
  Application.Initialize;
 Application.MainFormOnTaskbar := True;
 Application.CreateForm(Tdm, dm);//DataModule1
 Application.CreateForm(Tdm2, dm2);//DataModule2
 Application.CreateForm(TFormPrincipal, FormPrincipal);
 Application.FormPrincipal:=false; // aca da error !!!!
 Application.CreateForm(TFormLogin, FormLogin);
 FormLogin.ShowModal;
 Application.ShowMainForm:=true;
Application.Run;
end.
Responder Con Cita