Ver Mensaje Individual
  #10  
Antiguo 13-05-2017
Avatar de yusnerqui
yusnerqui yusnerqui is offline
Miembro
 
Registrado: mar 2004
Ubicación: Cuba
Posts: 679
Reputación: 21
yusnerqui Va por buen camino
Vale, si lo que quieres es poner botones dinámicamente en un panel, tira un panel en el formulario y haz algo como esto

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
const
cc=3;
var sp : TSpeedButton;
  i,fila,col:integer;
begin
  for  i :=0 to 6 do
  begin
    sp:=TSpeedButton.Create(Panel1);
    sp.Parent:=Panel1;
    sp.Width:= 100;
    sp.Height:= 100;
    //calculo la fila y columna donde pondré el botón
    col:=i mod cc;
    fila:= (i-col) div cc;
    //En dependencia de la fila y columna doy las cordenadas, recuerda que mis botones serán de 100 por 100 con 2 pixceles de separación
    sp.Left:=100*col+2;
    sp.Top:= 100*fila +2;
  end
end;

end.

Esta es otra idea, tu dirás si es eso lo que quieres, o estoy escribiendo tonterías

saludos
__________________
Lo importante no es llegar primero, sino saber llegar.

Para que puedas llegar mejor lee la Guia de Estilo

Responder Con Cita