Quote:
Originally Posted by marcoszorrilla
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.