I discovered that it's only within the OnSelectItem event that SelCount
appears 0. Using a 1ms Timer to display the SelCount is working, but rather
crude in my opinion.
Ross.
From: Ross Levis [mailto:r...@stationplaylist.com]
Sent: Tuesday, 4 January 2011 6:02 PM
To: Delphi Discussion
In D7, I'm using a Virtual ListView (OwnerData=true) for the first time in a
project, and there appears to be a bug in the VCL. I'm hoping I can make a
fix in the VCL code if possible.
I've searched the internet and found a person asking the same question on a
forum but no one answered him.
Sinu,
I dont know if its been answered satisfactorily. There are too many
replies to wade through. I recall that along the way Windows standard
changed from 0 being a null pointer to -1. I had to change some of my
code in stringlist to work. I think my solution was to just multiply by
2
: delphi-boun...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz] On
Behalf Of Rohit Gupta
Sent: Wednesday, 24 February 2010 9:55 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi? - Solution
Sinu,
I dont know if its been answered
Jolyon,
As I mentioned I was reporting on things 7 years old, with failing
memory quite common to my age.
And I am not going to spend the time searching for it to prove you right
or wrong. Again, from memory, Intel was changing the design of the
memory manager which was going to mean that
...@delphi.org.nz] On
Behalf Of Rohit Gupta
Sent: Wednesday, 24 February 2010 11:15 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi? - Solution
Jolyon,
As I mentioned I was reporting on things 7 years old, with failing memory quite
common
Manifest is added).
John
- Original Message -
From: Kyley Harris
To: NZ Borland Developers Group - Delphi List
Sent: Tuesday, February 16, 2010 8:00 PM
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
i have both versions of delphi on the same machine. ran both tests
:
Kyley Harris
To:
NZ Borland Developers Group -
Delphi List
Sent:
Tuesday, February 16, 2010 8:00 PM
Subject:
Re: [DUG] Is it a bug in latest version of Delphi?
i have both versions of delphi on the same machine. ran both tests at
the same time. weird
On Tue, Feb
Hi all,
I came across a strange bug(???) in latest versions of Delphi.
Have a look at the following code.
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
ComboBox1.Clear;
ComboBox1.Items.AddObject('All Locations', TObject(-1));
ComboBox1.Items.AddObject('Only
Hi all,
I came across a strange bug(???) in latest versions of Delphi.
Have a look at the following code.
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
ComboBox1.Clear;
ComboBox1.Items.AddObject('All Locations', TObject(-1));
ComboBox1.Items.AddObject('Only this
It works as expected (i.e. displays -1) in Win32 D2007 for me in an
otherwise empty VCL Forms application.
Are you sure you have reproduced this exact code in a clean app in
D2007?
From: delphi-boun...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz]
On
;
sinusudhaka...@wizbang.co.nz
Subject: [DUG] Is it a bug in latest version of Delphi?
Hi all,
I came across a strange bug(???) in latest versions of Delphi.
Have a look at the following code.
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
ComboBox1.Clear;
ComboBox1
Yes, this is Delphi 'internal feature' ;)
You can use everything except -1.
Edward Koryagin
--- On Tue, 16/2/10, sinu sudhakaran sinusudhaka...@rediffmail.com wrote:
From: sinu sudhakaran sinusudhaka...@rediffmail.com
Subject: [DUG] Is it a bug in latest versions of Delphi?
To: delphi
I can confirm that
ListBox1.Items.AddObject('foo', TObject(-1));
ShowMessage(IntToStr(Integer(ListBox1.Items.Objects[0])));
gives an error but
ListBox1.Items.AddObject('foo', TObject(0));
ShowMessage(IntToStr(Integer(ListBox1.Items.Objects[0])));
does not
I think casting -1 to an object
Koryagin
--- On Tue, 16/2/10, Alister Christie alis...@salespartner.co.nz wrote:
From: Alister Christie alis...@salespartner.co.nz
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
To: NZ Borland Developers Group - Delphi List delphi@delphi.org.nz
Received: Tuesday, 16 February, 2010, 10
result.
-Original Message-
From: delphi-boun...@delphi.org.nz [mailto:delphi-
boun...@delphi.org.nz] On Behalf Of Alister Christie
Sent: Tuesday, 16 February 2010 10:20 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
I can
One way to get around this would be to add your own descendant of
TListBox and add an Objects property that works as you would expect
(ie. use that instead of items.objects). Here's a quick sample I
knocked together:
unit MyListBox;
interface
uses
SysUtils, Classes, Controls, StdCtrls,
Sent: Tuesday, 16 February 2010 10:20 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
I can confirm that
ListBox1.Items.AddObject('foo', TObject(-1));
ShowMessage(IntToStr(Integer(ListBox1.Items.Objects[0])));
gives an error
The reason why -1 raises an error is because some of the called
Windows API functions will return -1 to indicate an index error.
___
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin:
and misleading list index out of bounds.
-Original Message-
From: delphi-boun...@delphi.org.nz [mailto:delphi-
boun...@delphi.org.nz] On Behalf Of Karl Reynolds
Sent: Tuesday, 16 February 2010 11:16 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug
The reason why -1 raises an error is because some of the called
Windows API functions will return -1 to indicate an index error.
Yep, but since the VCL provides insulation from the API it should be testing
index errors *before* using them in order to eliminate and report such
errors more
you should care greatly, because this is violating OOP principles
I care about code that works and gets a job of work done. OO Principles are
for the classroom.
Obviously the GetObject source cares somewhat about what -1 points to.
No, it doesn't. It simply gets confused because the
...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz]
On Behalf Of Alister Christie
Sent: Tuesday, 16 February 2010 10:20 a.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
I can confirm that
ListBox1.Items.AddObject('foo', TObject(-1
2010 12:31 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
Pointers and TObject are unsigned integers (cardinals) not (integer) casting
to -1 is converting to the cardinal equvalent, which when pulled back is
making an out of bounds
On Tue, Feb 16, 2010 at 11:55 AM, Jolyon Smith jsm...@deltics.co.nz wrote:
function ListBoxGetObject(const aListBox: TListBox; const aIndex: Integer):
TObject;
begin
if (aIndex 0) or (aIndex = aListBox.Items.Count) then
TStringsHelper(aListBox.Items).Error(SListIndexError, aIndex);
I think the point I was trying to make is that it is that the method
(/array indexer or whatever) was expecting a TObject - passing anything
else could result in unexpected results. The fact that -1 doesn't work
is therefor not a bug (unless you can have 1 byte sized objects).
Alister
: Tuesday, 16 February 2010 1:55 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
I think the point I was trying to make is that it is that the method
(/array indexer or whatever) was expecting a TObject - passing anything
else could
On Tue, Feb 16, 2010 at 1:55 PM, Alister Christie
alis...@salespartner.co.nz wrote:
I think the point I was trying to make is that it is that the method
(/array indexer or whatever) was expecting a TObject - passing anything
else could result in unexpected results.
Only if you stipulate that
interesting
if Longint(Result) = LB_ERR then Error(SListIndexError, Index);
it would seem that the error is not in delphi at all. Well.. they are simply
raising the Windows error which say that -1 is the error result for a bad
index access from windows. if delphi were to ignore this error
True, but as Joylon correctly points out, you can (in the VCL)
actually cater for the difference in a real index out of bounds
error and a LongInt(TObject) typecase returning -1.
It's a bug and should be logged on QC, if it isn't there already.
On Tue, Feb 16, 2010 at 12:50 PM, Kyley Harris
Ah crap. Apologies for spelling your name wrong Jolyon!
___
NZ Borland Developers Group - Delphi mailing list
Post: delphi@delphi.org.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-requ...@delphi.org.nz with
Yes thats true. they could rewrite the VCL code to cater for that issue.
Cant say I've ever actually encountered this problem before.
normally if I am binding anything in a list box, then I am binding a real
pointer to some other object that might contain an integer property.. I dont
think I've
On Tue, Feb 16, 2010 at 2:50 PM, Kyley Harris ky...@harrissoftware.com wrote:
interesting
if Longint(Result) = LB_ERR then Error(SListIndexError, Index);
it would seem that the error is not in delphi at all. Well.. they are simply
raising the Windows error which say that -1 is the error
a resource leak when the true problem was
actually an invalid window handle !!!
From: delphi-boun...@delphi.org.nz [mailto:delphi-boun...@delphi.org.nz] On
Behalf Of Kyley Harris
Sent: Tuesday, 16 February 2010 2:51 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug
List
*Subject:* Re: [DUG] Is it a bug in latest version of Delphi?
interesting
if Longint(Result) = LB_ERR then Error(SListIndexError, Index);
it would seem that the error is not in delphi at all. Well.. they are
simply raising the Windows error which say that -1 is the error result
On Tue, Feb 16, 2010 at 3:06 PM, Jolyon Smith jsm...@deltics.co.nz wrote:
Win API returns -1 to indicate “an error”. Any error. Not a specific
error. Certainly not specifically a list index error.
Pardon me for being pedantic, but while I agree with everything else
you said, I feel the need
: Tuesday, 16 February 2010 3:29 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
On Tue, Feb 16, 2010 at 3:06 PM, Jolyon Smith jsm...@deltics.co.nz
wrote:
Win API returns -1 to indicate an error. Any error. Not a
specific
error
...@delphi.org.nz] On Behalf Of Karl Reynolds
Sent: Tuesday, 16 February 2010 3:29 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
On Tue, Feb 16, 2010 at 3:06 PM, Jolyon Smith jsm...@deltics.co.nz
wrote:
Win API returns -1
On Tue, Feb 16, 2010 at 3:57 PM, Jolyon Smith jsm...@deltics.co.nz wrote:
Good luck with GetLastError(). There's nothing to indicate that
LB_GETITEMDATA processing will set a Windows LastError.
And empirically I would have to say that it doesn't:
Hmm... empirically I would have to say it
r := SendMessage(Listbox1.Handle, LB_GETITEMDATA, 100, 0);
if GetLastError 0 then
RaiseLastOSError;
if r = -1 then
ShowMessage('oops');
Will yield only the oops message, no OS error.
Tested this code too. I get a system error, invalid index.
How odd.
Cheers,
Karl
D2006, and *I* get 0, -1, -1... no error
-Original Message-
From: delphi-boun...@delphi.org.nz [mailto:delphi-
boun...@delphi.org.nz] On Behalf Of Karl Reynolds
Sent: Tuesday, 16 February 2010 4:16 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug
...@delphi.org.nz] On Behalf Of Karl Reynolds
Sent: Tuesday, 16 February 2010 4:19 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
r := SendMessage(Listbox1.Handle, LB_GETITEMDATA, 100, 0);
if GetLastError 0
/Windows 7 by any chance
-Original Message-
From: delphi-boun...@delphi.org.nz [mailto:delphi-
boun...@delphi.org.nz] On Behalf Of Karl Reynolds
Sent: Tuesday, 16 February 2010 4:19 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version
4:19 p.m.
To: NZ Borland Developers Group - Delphi List
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
r := SendMessage(Listbox1.Handle, LB_GETITEMDATA, 100, 0);
if GetLastError 0 then
RaiseLastOSError;
if r = -1 then
ShowMessage('oops
On Tue, Feb 16, 2010 at 4:34 PM, Jolyon Smith jsm...@deltics.co.nz wrote:
D2006, and *I* get 0, -1, -1... no error
On Tue, Feb 16, 2010 at 4:36 PM, Jolyon Smith jsm...@deltics.co.nz wrote:
But since we're talking about behavior in the OS not the VCL or compiler,
more pertinent perhaps is the
On Tue, Feb 16, 2010 at 4:43 PM, Kyley Harris ky...@harrissoftware.com wrote:
I'll add my cents..
under Delphi 7, getlasterror returns error 1413 as Karl said.. under Delphi
2007 no errors whatsoever. whats clear is that Getlasterror is unlreliable
in this situation as Microsoft says, because
the fact that it behaves different under delphi 7 and Delphi 2007 on the
same machine implies that there is some strange mystery at work in the
compiled code that is not obvious. its not a direct problem of the
underlying windows API.
As to using the GetLastError..
There is issue I have with
On Tue, Feb 16, 2010 at 5:03 PM, Kyley Harris ky...@harrissoftware.com wrote:
the fact that it behaves different under delphi 7 and Delphi 2007 on the
same machine implies that there is some strange mystery at work in the
compiled code that is not obvious. its not a direct problem of the
Versions of comctrl32.dll ??
Edward Koryagin
--- On Tue, 16/2/10, Kyley Harris ky...@harrissoftware.com wrote:
From: Kyley Harris ky...@harrissoftware.com
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
To: NZ Borland Developers Group - Delphi List delphi@delphi.org.nz
Received
: Kyley Harris ky...@harrissoftware.com
Subject: Re: [DUG] Is it a bug in latest version of Delphi?
To: NZ Borland Developers Group - Delphi List delphi@delphi.org.nz
Received: Tuesday, 16 February, 2010, 5:03 PM
the fact that it behaves different under
delphi 7 and Delphi 2007 on the same
It should be %20, not #20.
And could you not use StringReplace to do this for you? ;-)
Cheers,
Conor
-Original Message-
From: Alistair George [mailto:[EMAIL PROTECTED]
I tried the following:
for i:=0 to Length(mailstring) do
if mailstring[i]=' ' then mailstring[i]:=#20;
But as
G'Day,
Where is the most current one of these to be found?
--
Donovan
--
Donovan J. Edye
[www.edye.wattle.id.au]
Namadgi Systems
[www.namsys.com.au]
Voice: +61 2 6285-3460
Fax: +61 2 6285-3459
TVisualBasic = Class(None);
PROTECTED]]
Sent: Friday, 16 August 2002 12:12 p.m.
To: Multiple recipients of list delphi
Subject: [DUG]: [Q] Delphi 6 BUG List
G'Day,
Where is the most current one of these to be found?
-- Donovan
--
Donovan J. Edye
Hi,
Project - Options - Directories/Conditionals and then click on any of the
browse buttons that brings up a form with a memo component containing a list
of paths. Now try to resize this form and make it bigger (taller in
particular).
Anything unusual? Checked it on another machine and it has
Subject: [DUG]: Is it a bug?
Hi,
Project - Options - Directories/Conditionals and then click
on any of the
browse buttons that brings up a form with a memo component
containing a list
of paths. Now try to resize this form and make it bigger (taller in
particular).
Anything unusual
On 27 Aug 2001, at 14:48, Sergei Stenkov wrote:
Hi,
Project - Options - Directories/Conditionals and then click on any of the
browse buttons that brings up a form with a memo component containing a list
of paths. Now try to resize this form and make it bigger (taller in
particular).
No it's not a bug, it was in Borland's todo list which was never
revisited :-)
O-ops, sorry, I'm not that old.
But seriously it shouldn't take more then 5 min to fix, should it?
Cheers,
Sergei
---
New Zealand Delphi
It turns out EditCaption doesn't work in the OnEdited event because edit mode is
automatically terminated after this event fires :(. It appears there is no way
of doing it apart from attempting to fix the built-in OnChanging event code.
Ross.
Nello Sestini wrote:
The procedure I quoted was
Nello Sestini wrote:
This does what you want I think:
procedure TForm1.ListView1Editing(Sender: TObject; Item: TListItem;
var AllowEdit: Boolean);
No, this is no good. See below.
I'm not sure why you want to remain in edit mode if you aren't
going to allow your user to make changes to
The procedure I quoted was only an example showing the possible bug in
Delphi. I am actually allowing a rename and checking that the new caption
doesn't already exist is a valid name -- similar to renaming a file in
Explorer. Is there some way to force an item into edit mode?
Nello Sestini wrote:
TListItem.EditCaption() and TListItem.CancelEdit() might do the
job here.
Ah, that's what I was missing. Still not the best solution but it will do.
Cheers,
Ross.
---
New Zealand Delphi Users
Has anyone come across a compiler bug in D5..
for I := 0 to StringList.Count-1
do blah blah..
I starts at 1. No, its not optimization, thats turned off. the code
does not infact execute for I = 0, its not the IDE debugger either.
These bugs are starting to get scary.
Regards
Rohit
every time.
Myles.
-Original Message-
From: Rohit Gupta [mailto:[EMAIL PROTECTED]]
Sent: Monday, December 04, 2000 12:14 PM
To: Multiple recipients of list delphi
Subject: [DUG]: Another D5 compiler bug ?
Has anyone come across a compiler bug in D5..
for I := 0
:RE: [DUG]: Another D5 compiler bug ?
Date sent: Mon, 4 Dec 2000 11:32:45 +1300
Has the compiler decided to do a Downto instead??
It can depending on the loop variable usage - have not seen it happen myself
yet.
I always check the disassembled code when I have one
To: Multiple recipients of list delphi
Subject: RE: [DUG]: Another D5 compiler bug ?
You are so right the dratted thing puts the for loop as a
while at
the end of the code, so that first break point on the for
line is after
the first pass. How the heck is anyone supposed
From: Rohit Gupta [mailto:[EMAIL PROTECTED]]
Has anyone come across a compiler bug in D5..
for I := 0 to StringList.Count-1
do blah blah..
I starts at 1. No, its not optimization, thats turned off. the code
does not infact execute for I = 0, its not the IDE debugger either.
These
Hi all.
I am using a tab control, with the tabs on the right.
I went in and added the tabs fine with an at the beginig to assign it to a hot key
etc. BUT as soon as you change teh tabs to be on the right, the becomes part of the
tab caption !
I ched this with the page control too, and it
Hi Jeremy,
Apparently (according to someone who has looked through the VCL code)
this occurs because when the tabs are at the top or bottom the OS draws
them, but when on the left or right, the VCL does the drawing - and
they've overlooked the use of the character.
Regards,
Bevan
[EMAIL
Ok, is this fixable ? or should I go looking for a freeware control that WILL do it ??
Cheers, Jeremy Coulter
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website:
Hi Jeremy,
Ok, is this fixable ? or should I go looking for a freeware control that WILL do it
??
The only way I can think to fix the problem is to derive a new component
from the VCL one and then modify the code that draws the text.
I don't know what's available as far as freeware/other
ok, oh well, I will take a look.
Cheers, Jeremy Coulter
---
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL
You could just custom draw the Tabs. Something like this:
I don't have the code to draw rotated text but could look for it if you
want although it should be 'somewhere' in the vcl.
You would then have to do you own hottrack drawing if you have hottracking
enabled.
// Note tested throughly...
72 matches
Mail list logo