Ver Mensaje Individual
  #3  
Antiguo 23-07-2010
LiAnTe- LiAnTe- is offline
Miembro
 
Registrado: oct 2007
Posts: 47
Reputación: 0
LiAnTe- Va por buen camino
Cita:
Empezado por marcoszorrilla Ver Mensaje
Un ejemplo:


Código Delphi [-]FreeAndNil(button1);



Un Saludo.
Hola compañero eso no me vale...

if BDades.TGrupo.Eof = False Then
Begin
vProductoGrupoNombre := BDades.TGrupo.FieldByName('DESCRIPCION').AsString;
vProductoGrupoCodigo := BDades.TGrupo.FieldByName('GRUPO').AsString;
vBotonProductos := TSpeedButton.create(self);
vBotonProductos.Parent := vPestanyaProductos;
vBotonProductos.Tag := StrToInt(vProductoGrupoCodigo);
vBotonProductos.Caption := vProductoGrupoNombre;
vBotonProductos.Layout := blGlyphTop;
vBotonProductos.Transparent := True;
try

Como puedes ver los voy creando en un panel en tiempo de ejecucion igual hay 20 botones...

el tema seria dejar en blanco el panel pero no se como hacerlo y mira que le estoy dando vueltas y vueltas... esta claro que mi nivel en delphi no es muy alto....

Saludos.
Responder Con Cita