Drag & Drop von Label.Caption

[Neutral General]

Hi,

Ich werd ma gucken ob ich was herausfinde aber es gilt immernoch: Editier bitte den Titel -.-^^

EDIT:

Also mit einem Label gehts nicht. Ich schätze mal wegen fehlendem Handle?! Naja jedenfalls kannst du ein StaticText benutzen. (TStaticText). Ist das gleiche wie ein Label eigentlich.

Delphi-Quellcode:

if Shift = [ssLeft] then
begin 
  ReleaseCapture; // "Maus an akt. Form binden"
  StaticText1.Perform(WM_SYSCOMMAND, SC_DRAGMOVE, 0);
end;

Füge das ins MouseMove Event des StaticTexts ein und definiere

SC_DRAGMOVE = $F012; Das ganze ist aber im Forum auch zu finden.. Wie das ganze dann "richtig" aufs Panel kommt guck ich JETZT^^

Gruß
Neutral General