ListView

← →
Лана Розанова (2003-10-25 21:18) [0]

Как добраться до текста, к примеру 3 колонки 4 строки?СПАСИБО!!!

← →
Sergey_Masloff (2003-10-25 21:29) [1]

>к примеру 3 колонки 4 строки
четвертой строки ЧЕГО?

← →
Matrex (2003-10-25 21:30) [2]

Не понял. Подробнее...

← →
Лана Розанова (2003-10-25 21:44) [3]

Есть ListView типа ТListView.Я сделала 3 столбца var ListItem:TListItem;begin ListItem:=ListView1.Items.Add; ListItem.Caption:="100"; ListItem.SubItems.Add("200"); ListItem.SubItems.Add("300");end;И так n-строк.Теперь мне надо получить значение столбца 3 строки 1. В данном случае должны получить 300.

← →
Лана Розанова (2003-10-25 22:15) [4]

Ребята, томлюсь в ожидании..

← →
Islander (2003-10-25 22:30) [5]

Вот кусок из моей проги, где я так делаю:

for i:=0 to frmEditGroups.LvwData.Items.Count -1 do
begin
FieldsNames.Add (frmEditGroups.LvwData.Items [i].Caption);
FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems.DelimitedText);
end;

← →
Лана Розанова (2003-10-25 22:34) [6]

>Islander
Судя по коду у тебя всего два столбца. Со второго я могу данные посмотреть, а вот как с третьего???

← →
Islander (2003-10-25 22:38) [7]

FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [0].DelimitedText);
FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [1].DelimitedText);
FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [2].DelimitedText);

Понятно?

← →
Лана Розанова (2003-10-25 22:46) [8]

Все гораздо проще.
frmEditGroups.LvwData.Items [i].SubItems.DelimitedText
в результате значения всех последующих столбцов пишутся через запятую.
Спасибо, разобралась.
А с QReport поможете?

← →
Islander (2003-10-25 22:56) [9]

>>Все гораздо проще.
>>frmEditGroups.LvwData.Items [i].SubItems.DelimitedText
>>в результате значения всех последующих столбцов пишутся через >>запятую.

Ну, возможно, так и получится.

>>А с QReport поможете?
Смеетесь, что ли? Я вот чем занимаюсь: http://anvar.ru/downloads , c QReport"ом никак не связан.

А зачем он вам нужен, если не секрет?

← →
Лана Розанова (2003-10-25 23:07) [10]

Кто нужен!? QReport? Для отчетов, смеетесь, что-ли?

← →
Лана Розанова (2003-10-25 23:08) [11]

Да и кстати на
frmEditGroups.LvwData.Items [i].SubItems [2].DelimitedText
выдается ошибка.

← →
Islander (2003-10-25 23:18) [12]

>>Кто нужен!? QReport? Для отчетов, смеетесь, что-ли?

Это понятно, просто интересно, что за программа, что за отчеты :)

>>Да и кстати на
>>frmEditGroups.LvwData.Items [i].SubItems [2].DelimitedText
>>выдается ошибка.

Естественно, вы пытаетесь обратиться к 4-му столбцу.

FieldsNames.Add (frmEditGroups.LvwData.Items [i].Caption); - 1-ый столбец

FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [0].DelimitedText); - второй столбец
FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [1].DelimitedText); - третий столбец
FieldsTypes.Add (frmEditGroups.LvwData.Items [i].SubItems [2].DelimitedText); - четвертый столбец

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