Delphi Komponenten verschieben und MouseUP

Komponenten verschieben und MouseUP

Ein Thema von LoL · begonnen am 5. Nov 2004 · letzter Beitrag vom 24. Sep 2005

(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge

Delphi 2006 Professional

24. Sep 2005, 12:06

das ganze kommt eben durch Release Capture und dieses SysCommand. Aber es dürfte ja nicht das problem sein das MouseUp manuell danach auszulösen.

Delphi-Quellcode:

			ReleaseCapture; 

sender.perform(WM_SysCommand, SC_DragMove, 0);

if Assigned(OnMouseUp) then

  OnMouseUp(Sender, Button, Shift, X, Y);

Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's

Es ist dir nicht erlaubt, neue Themen zu verfassen.

Es ist dir nicht erlaubt, auf Beiträge zu antworten.

Es ist dir nicht erlaubt, Anhänge hochzuladen.

Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.

Smileys sind an.

[IMG] Code ist an.

HTML-Code ist aus.

Refbacks are aus

Gehe zu: