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




Вниз

Ограничение на длинну строки в ListBox? 


TonnyS   (2002-01-08 11:08) [0]

Здравствуйте. Можно ли в ListBox обойти ограничение на длинну строки? (подозреваю, что 32кб хотя не проверял)
Ещё: как быстро заполнять ListBox, например, вручную читая с файла? (примерно 1000-30 000 строк)



MBo   (2002-01-08 11:40) [1]

>ограничение на длинну строки
не на длину строки, а на объем - обойти в Win9X нельзя
быстро заполнить
ListBox1.Items.LoadFromfile("c:\lbitems.txt");
но 30000 непустых строк ListBox не возьмет - 64K предел



TonnyS   (2002-01-08 12:48) [2]

не, в ListBox загружался файл несколько МБ (т.е реально загружал 30000 непустых строк, win98) Проблемма возникает, когда одна строка очень большая (думаю, больше 64К), вот я и думал вручную разбивать строку на более мелкие куски и засовывать в ListBox, поэтому желательно метод построчного быстрого добавления



panov   (2002-01-08 13:26) [3]

Попробуй воспользоваться функцией WrapText.
var
...
tmpList: TStringList;
begin
tmpList := TStringList.Create;
try
tmpList.Add(WrapText(s,50));
ListBox1.Items.AddStrings(tmpList);
finally
tmpList.Free;
end;



TonnyS   (2002-01-08 13:48) [4]

большое спасибо ответившим,
>panov © - спасибо за WrapText :)
вроде работает ещё так:
ListBox1.items.text := WrapText(MyStr,50);
позже проверю на реальных файлах.



panov   (2002-01-08 13:50) [5]

TonnyS © (08.01.02 13:48)
ListBox1.items.text := WrapText(MyStr,50);
Заменит весь ListBox1 :-)



TonnyS   (2002-01-08 14:09) [6]

>panov © Собственно что требовалось - считать из файла текст в ListBox, а ListBox1.Items.LoadFromFile() не работает при большой длинне строки. Так что всё ок :)




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




Наверх





Память: 0.72 MB
Время: 0.017 c
1-75623           Belov                 2002-01-08 15:43  2002.01.24  
Изменение размеров картинки


14-75662          Undertaker            2001-11-28 16:55  2002.01.24  
Кто знает JAVA - помогитеееееее !


1-75629           dima2002              2002-01-08 20:57  2002.01.24  
Мастера!!! подскажите !!!


1-75567           veles                 2001-12-27 08:44  2002.01.24  
Выполнение программ


6-75631           dimonf                2001-10-28 18:16  2002.01.24  
SMS на намера сотовых телефонов Питерского Nord Westa?