Текущий архив: 2003.05.15;
Скачать: CL | DM;

Вниз

ListView в runtime ...   Найти похожие ветки 

← →
Начинака   (2003-05-01 13:34) [0]

Вроде бы и не сложно, но не получается. Если у кого-то есть несколько свободных минут, выложите код создания в рантайме примерно такого ListView:

A B C D
1.2 3.0 4.1 -1.2
4.3 3.2 1.6 1.8
2.1 1.8 1.7 0.2
Заранее спасибо

---

← →
Зубр   (2003-05-01 14:08) [1]

Уточни проблему

---

← →
Proton ©   (2003-05-01 16:58) [2]

var lv: tlistview;
begin
lv := tlistview.create(self);
lv.parent := self;
lv.top := 0;
lv.left := 0;
lv.width := 300;
lv.height := 300;
lv.viewstyle := vsReport;
lv.columns.Add.caption := "a";
lv.columns.Add.caption := "b";
lv.columns.Add.caption := "c";
lv.columns.Add.caption := "d";
with lv.Items.Add do
begin
caption := "1.2";
subitems.add("3.0");
end;
end;

---

← →
Начинака   (2003-05-02 08:39) [3]

2 Proton © (01.05.03 16:58)
Спасибо

---

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

Текущий архив: 2003.05.15;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.012 c