🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.delphi.language.objectpascal
Article #32419

Re: Including *.res files

#32419
From: Peter Below (TeamB)
Date: Fri, 22 Nov 2002 18:43
30 lines
2275 bytes
In article <3ddd4f19$1@newsgroups.borland.com>, Will wrote:

Way to many quoted lines. Please clip your quotes to the absolute minimum 
required to maintain context.

> DragMode is set to dmManual, because it didn't work with dmAutomatic 
> (D5, Win2K). I call BeginDrag in MouseDown and EndDrag in MouseUp. I had 
> other problems when DragMode was dmAutomatic, like the cursor changing 
> when I didn't want it to change.

I set listbox1.dragmode to dmManual and added 

procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  listbox1.BeginDrag( false, 5 );
end;

to my test project and it still works. Did you perhaps accidentially call the 
*forms* BeginDrag method? If not this may just be a D5 problem fixed in D7 but i 
doubt it.


--
Peter Below (TeamB)  
Use the newsgroup archives :
http://www.mers.com/searchsite.html
http://www.tamaracka.com/search.htm
http://groups.google.com
http://www.prolix.be
Technical Details
Message-ID: <VA.0000965f.00864392@antispam.compuserve.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!newsfeed.cwix.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail
References: <3ddac17b$1@newsgroups.borland.com> <VA.00009646.005a2cad@antispam.compuserve.com> <3ddc1a4c$1@newsgroups.borland.com> <VA.0000964f.007484c0@antispam.compuserve.com> <3ddd4f19$1@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 109d30,2b8d8d52b79dd1f9,start
X-Google-Attributes: gid109d30,public
X-Google-ArrivalTime: 2002-11-22 11:15:49 PST
Date: Fri, 22 Nov 2002 19:43:29 +0100
Newsgroups: borland.public.delphi.language.objectpascal
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Newsreader: Virtual Access by Atlantic Coast PLC, http://www.atlantic-coast.com/va
Organization: TeamB
Message-ID: <VA.0000965f.00864392@antispam.compuserve.com>
Subject: Re: Including *.res files
From: "Peter Below (TeamB)" <100113.1101@compuXXserve.com>
Reply-To: 100113.1101@compuXXserve.com
References: <3ddac17b$1@newsgroups.borland.com> <VA.00009646.005a2cad@antispam.compuserve.com> <3ddc1a4c$1@newsgroups.borland.com> <VA.0000964f.007484c0@antispam.compuserve.com> <3ddd4f19$1@newsgroups.borland.com>
NNTP-Posting-Host: 62.226.189.68
X-Trace: newsgroups.borland.com 1037990599 62.226.189.68 (22 Nov 2002 10:43:19 -0800)
Lines: 32
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-05!sn-xit-01!sn-xit-08!supernews.com!newsswitch.lcs.mit.edu!newsfeed.cwix.com!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail