Poniższy kod ładnie ożywia dodając nowy ciąg do końca ListBox procedure TForm6.AddItem(s: string);
var
l : TListBoxItem;
OldHeight : Single;
begin
l := TListBoxItem.Create(Self);
Mam TListBox zawierający listę lokalizacji (każdy z nazwą i odległości od bieżącej lokalizacji). Chciałbym dać użytkownikom opcję sortowania listy według nazwy lokalizacji (tj. Alfabetycznie) lub odle