Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

сортировка в listBox [D6, WinXP]


Beginer1 ©   (2003-01-11 10:41:00) 

как сделать быструю сортировку в listBox слево на право без тормозов (чтобы прогроапмма не зависала) со списком на 5000 строк
и ещё как сделать выравнивпние в listBox по правому краю


Beginer1   (2003-01-12 13:10:00) [1]

>Guerrillero Спасибо

Так всё же как на счет сортировки слево на право
что ни кто не поможет?


Guerrillero   (2003-01-12 11:19:00) [2]

2 : ListBox.Style поставь lbOwnerDrawFixed и сам отрисовывай текст в OnDrawItem

procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State: TOwnerDrawState);
var
Text: String;
Wid: Integer;
begin
with TListBox(Control) do
begin
Text := Items[Index];
Wid := Canvas.TextWidth(Text);
Canvas.FillRect(Rect);
Canvas.TextOut(Width - Wid - 7,Rect.Top + 2,Text);
end;
end;


Beginer1   (2003-01-12 09:27:00) [3]

?


Miwa   (2003-01-11 11:25:00) [4]

Есть такое свойство - sorted.


Наверх

Титульная страница Поиск, карта сайта Написать письмо