Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Две колонки в ListBox [D6, Win95/98]

SergeyNew © (2002-01-07 11:12:00)
Прошу помочь сделать в контроле ListBox два столбца (один невидимый) для возможности выбора по данным из невидимого столбца, а сортировки, изменений и т.д. по другому столбцу. Такой ListBox имеется в VB.

SergeyNew (2002-01-09 17:57:00) [1]
>SoftOne ©
>kaif ©

Все ОК!
Большое спасибо!

SoftOne (2002-01-09 01:49:00) [2]

var i, k : Integer begin for i:=0 to 10 do ListBox1.AddObject("строкаi",TObject(i));
Это для записи.
Для чтения, например:

k:=Integer(ListBox1.Items.Objects[ListBox1.ItemIndex]);

kaif (2002-01-09 01:48:00) [3]
При записи приводи integer к Pointer:
for i := 0 to 10 do
ListBox1.Items.AddObject("MyString "+ StrToInt(i), Pointer(i));

А при чтении, наоборот, pointer к integer :
for i := 0 to 10 do
begin
ShowMessage(
ListBox1.Items[i] + "-" +
IntToStr( Integer(ListBox1.Items.Objects[i])));
end;

SergeyNew (2002-01-08 18:38:00) [4]
> SoftOne
Это как раз то, что требуется.
Но у меня не получается :(((
Прошу, напиши код, как записывать в оба столбца и как считывать из них.
Например, для записи что-то типа:
For i:= 0 to 10 do
begin
col1:= "строка" + i
col2:= i
end;
end;
И что-нибудь для чтения.

SoftOne (2002-01-08 15:02:00) [5]
> SergeyNew
Если я правильно понял твой первый вопрос, то используй
ListBox1.Items.AddObject("MyString",TObject(MyData))

Получишь как раз "два столбца": видимый - "MyString" и невидимый MyData, где MyData - либо просто Integer, либо указатель на любые твои данные.

XeN (2002-01-07 20:38:00) [6]
Не может такого быть! У меня проект есть один, так там listview юзается по "чёрному" и ничего не глючит!

SergeyNew (2002-01-07 19:22:00) [7]
Попробовал... :(((
Время записи в ListView в десятки раз больше, чем в ListBox.
Например 1000 строк пишется около 10 сек (в ListBox практически мгновенно). Что еще можете посоветовать?

XeN (2002-01-07 18:53:00) [8]
listview - то же самое, что и listbox, только колонки можно добавлять. :)

SergeyNew (2002-01-07 11:25:00) [9]
Использовать ListView вместо ListBox?

XeN (2002-01-07 11:19:00) [10]
юзай ListView

Наверх

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