Bueno, no me queda claro si te interesa para imágenes o para controles en general.
Supongamos que vas a crear una cantidad de botones introducida por el usuario:
Código Delphi
[-]
var
NumBotones, I: Integer;
begin
NumBotones := StrToInt(Edit1.Text);
for I := 0 to NumBotones - 1 do
begin
with TButton.Create(Self) do
begin
Name := 'Boton' + IntToStr(I);
Parent := Self;
Top := 25 * (I + 1);
end;
end;
Hasta luego.