|
pregunta sobre forms
Hola amigos tengo la siguiente duda:
Tengo diseñados 2 forms, el cual uno es principal y el otro es el secundario, todo en forma modal no mdi.
Tengo diseñado un botón en el form principal que cuando sea pulsado me muestre el form secundario y me oculte el principal o me lo desactive.
De la forma que lo tengo diseñado me muestra las 2 ventanas, aqui os muestro el codigo:
procedure TForm1.Button1Click(Sender: TObject);
var
vform1:TForm1;
vform2:TForm2;
begin
form1:=TForm1.Create(self);
vform2:=TForm2.Create(self);
vform1.Hide;
vform1.close;
vform2.showmodal;
end;
Gracias por vuestra ayuda
Alberto
|