Yo suprimiría algunas cosillas de mas, y evitaría que todas las imágenes se creen en la misma posición, sino solo verás la última creada.
Código Delphi
[-]
tadepo.Open;
i:= 0;
while tadepo.Eof = false do
begin
tadepo.Next;
with TImage.Create(Self) do
begin
Parent:= Self;
Width:= 150;
Height:= 150;
Picture.LoadFromFile('...');
Top := y;
Left:= x + (tadepo.RecNo * 10);
Visible:= true;
Stretch:= true;
end;
end;
Saludos!