Article View: comp.lang.pascal.delphi.components.usage
Article #17Re: Moving components around
From: S�bastien Daupleix
Date: Thu, 19 Nov 1998 00:00
Date: Thu, 19 Nov 1998 00:00
11 lines
1598 bytes
1598 bytes
Just include in the MouseMove event of each of the component you
want to move the two following magic lines :
ReleaseCapture;
perform(WM_SysCommand, $F012, 0);
(have found it on the net, no credit for me...)
Sebastien Daupleix
altis Consultant
altis@bigfoot.com
Technical Details
Message-ID:
<%l%42.63$Lk3.331@wagner.videotron.net>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<36507ECC.2BD4BC5E@bellsouth.net> <36534997.45F7F5DA@village.uunet.be>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 108890,ad7d8cb1fb4c02ee X-Google-Attributes: gid108890,public X-Google-Thread: f973b,ad7d8cb1fb4c02ee X-Google-Attributes: gidf973b,public X-Google-Thread: 112b07,ad7d8cb1fb4c02ee X-Google-Attributes: gid112b07,public X-Google-Thread: fb0ea,ad7d8cb1fb4c02ee X-Google-Attributes: gidfb0ea,public X-Google-Thread: 109d99,ad7d8cb1fb4c02ee X-Google-Attributes: gid109d99,public X-Google-Thread: fe2ce,ad7d8cb1fb4c02ee X-Google-Attributes: gidfe2ce,public From: "S�bastien Daupleix" <altis@bigfoot.com> Subject: Re: Moving components around Date: 1998/11/19 Message-ID: <%l%42.63$Lk3.331@wagner.videotron.net> X-Deja-AN: 413621873 References: <36507ECC.2BD4BC5E@bellsouth.net> <36534997.45F7F5DA@village.uunet.be> X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3 X-Complaints-To: abuse@videotron.net X-Trace: wagner.videotron.net 911507963 207.253.23.1 (Thu, 19 Nov 1998 15:39:23 EDT) Organization: Altis NNTP-Posting-Date: Thu, 19 Nov 1998 15:39:23 EDT Newsgroups: comp.lang.pascal.delphi.components.usage,comp.lang.pascal.delphi.components.writing,comp.lang.pascal.delphi.components.misc,comp.lang.pascal.delphi.components,borland.public.delphi.vcl.components.using,borland.public.delphi.vcl.components.writing