Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

Две колонки в ListBox   Найти похожие ветки 

 
SergeyNew   (2002-01-07 11:12) [0]

Прошу помочь сделать в контроле ListBox два столбца (один невидимый) для возможности выбора по данным из невидимого столбца, а сортировки, изменений и т.д. по другому столбцу. Такой ListBox имеется в VB.


 
XeN   (2002-01-07 11:19) [1]

юзай ListView


 
SergeyNew   (2002-01-07 11:25) [2]

Использовать ListView вместо ListBox?


 
XeN   (2002-01-07 18:53) [3]

listview - то же самое, что и listbox, только колонки можно добавлять. :)


 
SergeyNew   (2002-01-07 19:22) [4]

Попробовал... :(((
Время записи в ListView в десятки раз больше, чем в ListBox.
Например 1000 строк пишется около 10 сек (в ListBox практически мгновенно). Что еще можете посоветовать?


 
XeN   (2002-01-07 20:38) [5]

Не может такого быть! У меня проект есть один, так там listview юзается по "чёрному" и ничего не глючит!


 
SoftOne   (2002-01-08 15:02) [6]

> SergeyNew
Если я правильно понял твой первый вопрос, то используй
ListBox1.Items.AddObject("MyString",TObject(MyData))

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


 
SergeyNew   (2002-01-08 18:38) [7]

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


 
kaif   (2002-01-09 01:48) [8]

При записи приводи 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;



 
SoftOne   (2002-01-09 01:49) [9]


var i, k : Integer
begin
for i:=0 to 10 do
ListBox1.AddObject("строкаi",TObject(i));

Это для записи.
Для чтения, например:

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


 
SergeyNew   (2002-01-09 17:57) [10]

>SoftOne ©
>kaif ©

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.57 MB
Время: 0.024 c
1-90301
Oleg Fomicheff
2002-01-11 06:18
2002.01.28
Куда копировать DCU? или Почему не ставятся компоненты?


7-90403
Ph.D.Kot
2001-10-11 08:56
2002.01.28
Отправка факса через модем. Хелп.


6-90332
Star
2001-11-06 09:14
2002.01.28
Как определить комп, наиболее активно загружающий сеть?


4-90407
YUS
2001-11-24 06:47
2002.01.28
CreateDialog ( R )


1-90272
GhostK
2002-01-09 07:40
2002.01.28
Где можно найти????





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский