Image verschieben

[matashen]

Komisch, wenn ich die Suche bemühe spuckt das ding was anderes aus, tja da bräuchte man fasst ein tutorial fürs suchen

Aber zurück zur Sache, hab das gefunden

Delphi-Quellcode:

procedure TPlanmarker.CopyImageMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
  const
  SC_DRAGMOVE = $F012;
begin
if copydown then begin;
if Shift = [ssLeft] then // ist linke Maustaste gedrücht, dann...
  begin
    ReleaseCapture; // "Maus an akt. Form binden"
    copyimage.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);  // Panel verschieben
  end; 

   end;
end;

da war aber ursprünglich ein Panel eingetragen, damit funktionierts dann auch, aber beim Image funktionierts nicht, da passiert dann einfach - nix. ?

Kann ich dieses API-Kommando auf das Image nicht anwenden ?

Gruß Matthias