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

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

TKOLListView


help ©   (2003-04-26 06:59:00) 

Люди дайте пожалуйста рабочий пример есть объект List: TKOLListView у него три колонки. Вопрос очень простой: как соэдать ячеку например в 1 столбце во 2-ой строке и т.д.


Gandalf   (2003-04-26 10:45:00) [1]

Можно так:

// Создание строк
ListView1.LVItemAdd("1 строка");
ListView1.LVItemAdd("2 строка");
// Создание столбцов
ListView1.LVColAdd("1 столбец",taLeft,100);
// Присвоить текст ячейке
ListView1.LVItems[0,1]:="ячеку например в 1 столбце во 2-ой строке ";


BaRToV   (2003-04-26 10:39:00) [2]

var
x: Integer;
begin
ListView1.LVColAdd("Col 1", taLeft, 50);
ListView1.LVColAdd("Col 2", taLeft, 50);
ListView1.LVColAdd("Col 3", taLeft, 50);
for x := 0 to 9 do
begin
// Добавляем в 1 столбец
ListView1.LVItemAdd("c1 - " + Int2Str(x));

// Добавляем во 2 и 3 столбец
ListView1.LVItems[x, 1] := "c2 - " + Int2Str(x);
( x) [1]

var
x: Integer;
begin
ListView1.LVColAdd("Col 1", taLeft, 50);
ListView1.LVColAdd("Col 2", taLeft, 50);
ListView1.LVColAdd("Col 3", taLeft, 50);
for x := 0 to 9 do
begin
// Добавляем в 1 столбец
ListView1.LVItemAdd("c1 - " + Int2Str(x));

// Добавляем во 2 и 3 столбец
ListView1.LVItems[x, 1] := "c2 - " + Int2Str(x);
ListView1.LVItems[x, 2] := "c3 - " + Int2Str(x);
end;
end;

Ну и в таком духе дальше, посмотри еще LVColInsert в HTML-Help.


Наверх

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