Скачать: CL | DM;

TKOLListView   Найти похожие ветки 

← →
help   (2003-04-26 06:59) [0]

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

---

← →
BaRToV   (2003-04-26 10:39) [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);
( 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.

---

← →
Gandalf ©   (2003-04-26 10:45) [2]

Можно так:

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

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.017 c