Jak dynamicznie utworzyc TImage??

Jak dynamicznie utworzyc komponent TImage, wczytac do niego obrazek i umiescic na formie w miejscy w ktorym kliknelo sie myszkoa i zeby dalo sie go pozniej przesowac??
Wie ktos jak to zrobic??

TImage.create(self).name:='obrazek';
with TImage(FindComponent('obraze' ) do
         begin
         parent:=form1;
         height:=25;
         width:=25; 
         top:=0; left:=0; picture.loadfromfile('c:\1.bmp');
        end;

ruch np w timerze:

with TImage(FindComponent('obraze' ) do
         begin
         top:=top+2;
        end;