Ver Mensaje Individual
  #1  
Antiguo 08-07-2007
Avatar de principiante22
principiante22 principiante22 is offline
Miembro
 
Registrado: nov 2006
Ubicación: Santo Domingo - Rep.Dom.
Posts: 90
Reputación: 20
principiante22 Va por buen camino
como utilizar algo que no existe

Estoy creando algunos labels y edits y un boton mediante codigo, mi pregunta es, como puedo llamar a un coton que todavia no existe, por ejemplo


Código Delphi [-]
procedure form1.Button1Click(Sender: TObject);
var
nombre: Tlabel;
edic: Tedit;
boton:Tbutton;
numero, bla, toc, lef, editlef: integer;
begin
bla:=0;
toc:= 90;
lef:= 16;
editlef:=92;
numero:=strtoint(edit2.Text);
for i:= 1 to numero do
  begin
    bla:=bla+1;
    toc:=toc+26;
    nombre:=Tlabel.Create(self);
    nombre.Parent := Self;
    nombre.Caption := 'Accion #' + inttostr(bla);
    nombre.top:=toc;
    nombre.left:=lef;
 
    edic:=Tedit.Create(self);
    edic.Parent := Self;
    edic.text := '';
    edic.name:='edica' + inttostr(bla);
    edic.top:=toc;
    edic.left:=editlef;

como podria poner esos edits y labels invisibles con otro boton???

Última edición por dec fecha: 08-07-2007 a las 02:59:44.
Responder Con Cita