Cita:
Empezado por andresorozco86
Buenas Tardes:
Estoy trabajando con delphi y no se como es el manejo de crear y borrar por ejemplo edits pero en tiempo de ejecucion. Osea por ejemplo que yo tengo un boton donde le doy click y me cree 2 edit y luego en otro boton le doy click y me los borra. Alguien me podria ayudar?
|
Bueno podrías declarar dos variables(pueden ser globales) de tipo TEdit de esta forma:
Código Delphi
[-]...
var
Form1: TForm1;
e1,e2:TEdit;implementation
....
Ahora en tu boton que deseas crear pones ésto:
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
begin
if not Assigned(e1) and not Assigned(e2) then begin
e1:=TEdit.Create(Application); e1.Parent:=Form1; e1.Top:=100; e1.Left:=100;
e2:=TEdit.Create(Application); e2.Parent:=Form1;
e2.Top:=100;
e2.Left:=200;
end;
end;
Y en el boton de eliminar pues sencillamente lo destruimos de ésta manera:
Código Delphi
[-]procedure TForm1.Button2Click(Sender: TObject);
begin
FreeAndNil(e1); FreeAndNil(e2);end;
Saludos...

__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7