Tema: no cargar varias form en una instancia...
Ver Mensaje Individual
  #3  
Antiguo 01-07-2005
Avatar de lucasarts_18
lucasarts_18 lucasarts_18 is offline
Miembro
  
Registrado: mar 2005
Ubicación: Villa Alemana,Chile
Posts: 1.087
Reputación: 21
lucasarts_18 Va por buen camino
Hola:

Código Delphi [-]
  
procedure TForm1.Button1Click(Sender: TObject);
begin
   if (Form2 <> nil) and not (Form2.Visible = true)  then
   begin
     Form2.Create(Self);
     Form2.Show;
   end;
end;

Saludos.
Responder Con Cita