Criar um form em tempo de execução e colocar 2 Edit

16/12/2003

2

Caros amigos gostaria de saber como criar um form em tempo de execução e colocar ao mesmo tempo 2 edit.

Grato pela atenção.


Responder

Posts

16/12/2003

Imoreira

var
form2:tForm;
edt1:tEdit;
begin
form2:=tForm.Create(form2);
edt1:=tEdit.create(edt1);
edt1.parent:=form2;
edt1.left:=10;
edt1.Top:=10;
edt1:=tEdit.create(edt1);
edt1.parent:=form2;
edt1.left:=10;
edt1.Top:=30;
form2.Position:=poscreencenter;
form2.showmodal;
end;


Responder