Custom drag [Delphi]

[DarkByte]

Daca s-a intamplat vreodata sa faceti un program al carei forma sa fie fara caption-bar (bara de titlu), probabil ca stiti ca nu prea aveti cum sa mutati acea fereastra.

O metoda de a avea totusi posibilitate de drag-drop al acestei ferestre e sa puneti pe forma o componenta vizuala care sa aiba eventul de OnMouseDown (eu am ales un label - foarte bun pentru a scrie titlul aplicatiei si a mima un caption ) in care scrieti urmatorul cod :

Cod:

 ReleaseCapture;
  SendMessage(Form1.Handle, WM_SYSCOMMAND, 61458, 0) ;

Distractie

[SkullAds]