Thema: Delphi TImage verschieben?

Einzelnen Beitrag anzeigen

TStringlist

Registriert seit: 1. Dez 2003
360 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: TImage verschieben?

  Alt 25. Jul 2006, 22:32
Wahrscheinlich hast du es mit deinem Typ-Casten in Richtung TWinControl schon richtig angedeutet: Nötig für diese Methode könnte gut immer mindestens ein TWinControl sein. Eine Image-Kompo ist aber nur ein TGraphicControl. In der OH heißt es diesbezüglich z.B.: "...da Lightweight-Steuerelemente keine Windows-Bildschirmobjekte kapseln,...", ...was wohl also heißt, dass ein TImage kein typisches Bildschirmobjekt ist und demzufolge auch nicht auf eine solche Weise verschoben werden kann.

Ergo wird dir wahrscheinlich nichts anderes übrig bleiben, als im Image1MouseDown die zu diesem Zeitpunkt aktuellen X/Y-Koordinaten der Maus extra festzuhalten, sowie auch die Left/Top-Koordinaten des Image selbst. Anschließend kannst du dann bei jedem folgenden Image1MouseMove-Visit die Differenz zu diesen anfänglichen Maus-Koordinaten in eine dementsprechende Positionsänderung des Image (=Image1.Left/Top-Änderung) umzusetzen.
MfG (& Thx ggf.)
  Mit Zitat antworten Zitat