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 Behalf Of sinu sudhakaran 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 Location', TObject(0)); ComboBox1.Items.AddObject(Test Location', TObject(1)); i := Integer(ComboBox1.Items.Objects[0]); showmessage(inttostr(i)); end; When I tried to run this code in Delphi 6 and Delphi 2007 , I am getting List Index out of bounds[0] error in Showmessage. When I tried -2, -3, -4... instead of -1 object , I got the proper output without any List index out of bounds error. Also I am getting -1 without any error when I tried this code in Delphi 3. Is it a bug in latest version of Delphi ? Any help is appreciated.
_______________________________________________ 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 Subject: unsubscribe
