listview как с ним работать

← →
IronWit © (2003-07-08 18:36) [0]

Ребята, подскажите начинающему. Хочется научится работать с listview. Как то до сих пор был мне не нужен, а тут пришлось. Именно на примере listview применяющегося в kol. Точнее нужно отобразить несколько строк, в каждой строке несколько колонок. Вы хотя бы какой нить пример киньте, я дальше сам постараюсь разобраться.

Заранее спасибо.

← →
ironwit © (2003-07-08 18:37) [1]

точнее вот это listview1.LVItemAdd("Ромашка"); У меня получается. А вот как в строку к этой Ромашке обавить еще одну колонку с тем, что она зеленая? Ума не приложу :(

← →
SPeller © (2003-07-08 19:34) [2]

Демка есть на сайте Кладова.

← →
Avenger[NhT] © (2003-07-09 00:15) [3]

listview1.LVItem[0, 1] := ...
мож так? я уж не помню...т.к. в кол давно не писал....пишу ща тока в Авл

← →
SPeller © (2003-07-09 04:16) [4]

Добавление колонок:

lvServer.LVColAdd( "Название плагина", taLeft, 200 );
lvServer.LVColAdd( "Тип", taLeft, 80 );
lvServer.LVColAdd( "Размер", taRight, 60 );
lvServer.LVColAdd( "Размещение", taLeft, 225 );
lvServer.LVColAdd( "Статус", taLeft, 80 );

Заполнение строк:

lvServer.LVItemAdd( CO.PlugData.Name );
lvServer.LVSetItem( lvServer.LVCount - 1, 0, CO.PlugData.Name, 0, [], 1, 0, 0 );
lvServer.LVSetItem( lvServer.LVCount - 1, 1, s, 0, [], 1, 0, 0 );
if CO.PlugData.Size < 1024 * 1024 then begin
s := Double2Str( Round( CO.PlugData.Size / 102.4 ) / 10 ) + " K ";
end else begin
s := Double2Str( Round( CO.PlugData.Size / 102.4 / 1024 ) / 10 ) + " M ";
end;
lvServer.LVSetItem( lvServer.LVCount - 1, 2, s, 0, [], 1, 0, 0 );
lvServer.LVSetItem( lvServer.LVCount - 1, 3, CO.PlugData.Path, 0, [], 1, 0, 0 );

← →
BorisMor © (2003-07-09 06:19) [5]

http://kol.mastak.ru/lessons%2016.htm

Спасибо. Теперь понятно. :)

> мож так? я уж не помню...т.к. в кол давно не писал....пишу
> ща тока в Авл

Кстати я смотрел - неплохо и даже очень... Как там SysDCU - Бартову можешь пока не слать он около месяца в отсутствии.

listview как с ним работать Найти похожие ветки