Borrar Panel me sale Access Violation

[Neftali [Germán.Estévez]]

Empezado por LiAnTe-

el problema que me da con tu codigo es que cuando lo pongo me dice en el ultimo assignen propiedad no validad tipos diferentes...

Ok. Con el código es más sencillo ver el problema.

Cuando creas los botones añade como Owner el contenedor "Personal".

Código Delphi [-]
   ...
   vBotonPersonal := TSpeedButton.create(Personal);
   ...

Y luego para liberarlos puedes usar un código como este

Código Delphi [-]
procedure TGesVentasBar.Button1Click(Sender: TObject);
var
  i:Integer;
  btn:TSpeedButton;
begin
  // recorrer los componentes que hay en "personal"
  for i := (Personal.ComponentCount - 1) downto 0 do begin
    // es un SpeedButton?
    if (Personal.Components[i] is TSpeedButton) then begin
      // Apuntador al componente
      btn := TSpeedButton(Personal.Components[i]);
      // liberar
      btn.Free;
    end;
  end;
end;