Cita:
nada.
1. se crea el form con los botones de personas.
2. se borra los botones de personas.
3. se crean los botones de opciones de personas.
|
Bueno eso ya es algo...
Mirá, primero ejecutás el código de 'BorrarPanelPersonal' que dentro de las cosas que hace es crear los botones.
Luego veo que los volves a crear en el código que pusiste:
Código Delphi
[-]
...
vBotonPersonal := TSpeedButton.create(Personal);
vBotonPersonal.Parent := Personal;
vBotonPersonal.Caption := vVentasOpcionesNombre;
vBotonPersonal.Height := 69;
vBotonPersonal.Width := 108;
vBotonPersonal.Left := vInicio; vBotonPersonal.Top := vTop; vBotonPersonal.Enabled := True;
vBotonPersonal.visible := True;
vBotonPersonal.Tag := vVentasOpcionesCodigo;
vBotonPersonal.OnClick := vOpcionesVentasBotonOnClick;
vBotonPersonal.Show;
...
Si no estoy confundiendo la lógica, creo que por ahí tendrías que empezar a buscar el problema.
Un saludo.