Ver Mensaje Individual
  #13  
Antiguo 01-08-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Recibí bién tu ejemplo por pm.

Fijate que incluí el método de clase ShowForm para que la creación se haga dentro del mismo código del form.

No tenes que llamar a Form2 así:
Código Delphi [-]
procedure TForm4.Formulario22Click(Sender: TObject);
begin
   tform2.Create(self).ShowModal; // NO
end;

Tenes que llamarlo de igual modo que lo hace Form1:
Código Delphi [-]
procedure TForm4.Formulario22Click(Sender: TObject);
begin
  TForm2.ShowForm(False);  // False = No visible
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita