[roamer]

Сообщение от Orfentor

Код:

ListBox1.Clear;

if FindFirst(Dir+'*.ini',faAnyFile,SearchRec)=0 then begin

end;

ListBox1.ItemIndex:=0; <- здесь потенциально опасный момент !

Лучше так :

Код:

...
if ListBox1.Items.Count>0 then ListBox1.ItemIndex:=0; 

;