Found it - its a bug in Delphi 5 at least. Here is the cure:

procedure Tmainform.TabSheet2Show(Sender: TObject);
begin
  if SendMessage(Listbox1.Handle, LB_GETITEMDATA,
Listbox1.Items.Count, 0) > 0 then Listbox1.Selected[0] := false;
end;


_______________________________________________
Delphi mailing list
[EMAIL PROTECTED]
http://ns3.123.co.nz/mailman/listinfo/delphi

Reply via email to