I wanna make a suggestion:

procedure ListboxSelectionRemove(AListBox: TListbox);
var
 i: Integer;
begin
 i:=0;
 AListBox.BeginUpdateBounds;;
 while i<AListBox.Count do begin
    AListBox.Selected[i]:=false;
    inc(i);
 end;
 AListBox.EndUpdateBounds;
end;

I think it'll gain some performance...
________________________________
William de Oliveira Ferreira
Bacharel em Sistemas de Informação


2011/3/6 u-boot <[email protected]>

> whether you find an event that is thrown at the right time following
> procedure works:
>
> procedure ListboxSelectionRemove(AListBox: TListbox);
> var
>  i: Integer;
> begin
>  i:=0;
>  while i<AListBox.Count do begin
>     AListBox.Selected[i]:=false;
>     inc(i);
>  end;
> end;
> Jürgen Hestermann schrieb:
>
>  Is it possible to switch off the visible cursor in a TListBox? I didn't
>> find an option for that.
>> I wanted the TListBox to act as a log window that shows current (and
>> recent) activity.
>> But the selection color makes the cursor line quite unreadable and it also
>> makes no
>> sense to make one line special to the others.
>>
>> --
>> _______________________________________________
>> Lazarus mailing list
>> [email protected]
>> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>>
>
>
> --
> _______________________________________________
> Lazarus mailing list
> [email protected]
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to