Kenne mich mit
Win32 nicht aus, aber du müsstest die PanelPosition auf die Panelposition+X bzw.Y Wert der Maus auf dem Image setzen. Klappt bei mir auch ganz gut, hatte das Problem, das ich ein Shape verschieben will, wenn ich auf dem Shape und wenn ich auf dem Formular bin:
Delphi-Quellcode:
procedure TForm1.Shape1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Shape1.Left:=Shape1.Left+X;
Shape1.Top:=Shape1.Top+X;
end;
Bei mir hats geklappt, musst du halt noch umformen...