Ver Mensaje Individual
  #14  
Antiguo 17-05-2017
Avatar de darkerbyte
darkerbyte darkerbyte is offline
Miembro
 
Registrado: feb 2005
Posts: 196
Reputación: 20
darkerbyte Va por buen camino
Talking

Cita:
Empezado por yusnerqui Ver Mensaje
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

Gracias amigo yusnerqui fue un gran ejemplo de como crear componentes dinamicamente, cosa que desconocía.
Responder Con Cita