Ver Mensaje Individual
  #14  
Antiguo 26-11-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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;     // Inicio
      vBotonPersonal.Top     := vTop;     // Altura
      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.
Responder Con Cita