新手请教小问题：）

我想可以托动所创建的图像控件，并且获得控件托动后的屏幕坐标，
怎么做呀？
如何把事件写在 程序运行时创建的控件Imagenode1 的事件之中？？procedure Tfrmnodelay.DBGrid1CellClick(Column: TColumn);
var
    Imagenode1:Timage;
    imagenodeleft,imagenodetop:integer;
begin
    Imagenode1:= Timage.Create(self) ;
    Imagenode1.Parent :=self;     Imagenode1.DragMode :=dmAutomatic;
    Imagenode1.Left:=Imgsurface.Left +80;
    Imagenode1.Top:= Imgsurface.Top +100;
    Imagenode1.Width :=17;
    Imagenode1.Height :=17;
Imagenode1.Picture.LoadFromFile('C:\Program Files\Borland\Delphi7\Projects\images\remote.ICO');
 if not Imagenode1.Dragging then
      begin
        imagenodeleft:=Imagenode1.Left;
        imagenodetop:=Imagenode1.Top;
      end; 
帮我看看这样写错在哪吧，谢啦～。～