Witam
Jak przejśc automatycznie do Nowej, tyle co dodanej pozycji w ListBox-ie???
THX
Witam
Jak przejśc automatycznie do Nowej, tyle co dodanej pozycji w ListBox-ie???
THX
co to znaczy przejść ? domyślam sie że chcesz ją zaznaczyć, wiec musisz po prostu zaznaczyć ostatni wiersz:
listBox1.ItemIndex:=ListBox1.Count-1;
A co jak mi SORTUJE???
Naciskam button : On dodaje pozycje do ListBox-a i segreguje co by było według alfabetu. I teraz chce żeby ta nowa pozycja była zaznaczona.
zobacz takie cos:
procedure TForm1.Button1Click(Sender: TObject);
var
x : string;
s : string;
i : integer;
begin
x := 'a';
listbox1.items.add(x);
for i:=0 to listbox1.items.count - 1 do
begin
s := listbox1.items[i];
if s = x then
begin
listbox1.ItemIndex := i;
break;
end;
end;
end;
ListBox.ItemIndex := ListBox.IndexOf('tutaj_caption_pozycji');