работа с ListView

[Linzer]

Проблемма такая: есть ListView, допустим с 2мя столбцами, нужно по нажатию на строку вытащить текст, который находится во 2м столбце нажатой строки. Пустяк, но чето не могу сделать. Помогите люди добрые!

[Хакер]

Поддержать морально?

[Linzer]

Желательно советом, а лучше примером

[djalex777]

А как ты сделал так, чтобы у тебя текст во второй столбец вставлялся?

[Linzer]

Public r1 As Recordset

For i = 1 To r1.RecordCount
With ListView1.ListItems
Set itm = ListView1.ListItems.Add(, , r1(0))
itm.SubItems(1) = r1(1)
itm.SubItems(2) = r1(2)
itm.SubItems(3) = r1(3)
itm.SubItems(4) = r1(4)
itm.SubItems(5) = r1(5)
itm.SubItems(6) = r1(6)
r1.MoveNext
End With
Next i

просто подключаюсь к БД и забиваю из нее ListView

[Antonariy]

В чем сложность сделать операцию обратную к itm.SubItems(1) = r1(1)?

[Linzer]

В чем сложность сделать операцию обратную к itm.SubItems(1) = r1(1)?

не могу понять как, с ListView мало работал...
можешь на примере показать?

[alibek]

MsgBox itm.SubItems(1)

[Linzer]

MsgBox itm.SubItems(1)

так выводит только последнию запись... а нужно ту на которую нажал...

[iGrok]

Английский знаешь?
Пробегись по набору свойств, посмотри, есть ли там что-то типа "selected", "current" и т.п. и от этого пляши.

[Linzer]

Все понял, если кому интересно вот код:
ind = ListView1.SelectedItem
name_f = ListView1.ListItems.Item(ind).ListSubItems(1)

[alibek]

ListView1.SelectedItem.SubItems(1)

[Saturn.65]

Какое событие есть у ListView, когда было сперва пусто, а потом туда вывелись данные?

[alibek]

Какое событие есть у ListView, когда было сперва пусто, а потом туда вывелись данные?

Они туда выводятся без твоего ведома?

[Saturn.65]

Они туда выводятся без твоего ведома?

С моим конечно. Сперва в комбобоксах выбираю нужные значения, потом нажимаю кнопку для расчета, но сразу в ListView вывод не происходит, а с некоторой задержкой в пару секунд. И в это время в статусбаре надпись "Подождите...". Вот и хочу, когда данные выведутся ListView, чтоб надпись менялась. Вот этот момент появления данных меня и интересует.

[alibek]

Ну так и сделай, разве тебе это запрещают?

[Денис]

Сперва в комбобоксах выбираю нужные значения, потом нажимаю кнопку для расчета, но сразу в ListView вывод не происходит, а с некоторой задержкой в пару секунд. И в это время в статусбаре надпись "Подождите...". Вот и хочу, когда данные выведутся ListView, чтоб надпись менялась. Вот этот момент появления данных меня и интересует.

Окей, давайте воспроизведем вышеприведенный алгоритм:

Код: Выделить всё

Combo1 = 1
Combo2 = 2

msgbox "Подождите..."

for i=0 to 1000
    'Ждём, ждём, ждем
next

msgbox "момент появления данных"
'Здесь можно писать код, потому что до этого момента было пусто, а теперь вывелись данные

[SLIM]

Денис, это очень криво.
Я так понимаю человек хочет отследить прорисовку в LV строк.
Для этого нужно сабклассить и обрабатывать соответствующие сообщения, после чего снимать сабклассинг.

[Хакер]

SLIM, не придумывай.

[SLIM]

SLIM, не придумывай.

А ты предлагаешь сделать как Денис?

[iGrok]

SLIM, не придумывай.

А ты предлагаешь сделать как Денис?

Надпись "подождите" по логике относится к исполняемой в данный момент операции, а не к тому, что отображается в листвью.
Поэтому я в упор не понимаю, зачем что-то перехватывать, и почему не поменять статус по окончанию операции.

[Saturn.65]

Я так понимаю человек хочет отследить прорисовку в LV строк.

Как бы назвать получше? Пустая рама с шапкой, без строк и после нажатия кнопки вычисления в ней появляются строчки с результатами вычислений. Если грубо это написать, то:

Код: Выделить всё

Text1.Text = ListView1.Text


Это я шуточно.

[Денис]

Как бы назвать получше? Пустая рама с шапкой, без строк и после нажатия кнопки вычисления в ней появляются строчки с результатами вычислений.

Яснее, яснее сформулируйте, что там у вас происходит? Единственный телепат на форуме загадочно молчит. Что мы тут с Вами в угадайку будем играть?
ListView1.Items.Add() - это и есть момент появления очередной строки.
ListView1.Item(N).Subitems.Add() - это и есть момент появления следующего столбца в строке.
Они выполняются мгновенно.
Все что нужно сделать это поместить код, начиная со следующей строки. Все чего нужно дождаться, это окончания предшествующего этим приведенным строкам, кода.

[Dmitriy2003]

Они выполняются мгновенно.

Черная магия

Все чего нужно дождаться, это окончания предшествующего этим приведенным строкам, кода.

Это-как-э-то ?

[SLIM]

ListView1.Items.Add() - это и есть момент появления очередной строки.

Это есть момент посыла сообщения.

Все чего нужно дождаться, это окончания предшествующего этим приведенным строкам, кода.

И как ты собираешься дождаться? Циклом от 1 до 1000?

[Хакер]

SLIM, какого черта кто-то будет ловить сообщения, чтобы сделать действие, если это действия можно сделать непосредственно до/после вызова Items.Add?

[SLIM]

Ну мало ли что случится с сообщением после посыла Items.Add. Это ведь не факт прорисовки. Пользователь может и не увидеть это.

[Хакер]

Факт прорисовки волнует лишь тебя на фоне, вероятно, того, что ты некоторое время назад мучился с обработкой сообщений полусамодельного ListView, который у тебя, что бы ты не делал и как бы ни мучился, не хотел красиво и правильно перерисовываться.

[SLIM]

Почему полусамодельным? Самым стандартным

[Денис]

И как ты собираешься дождаться? Циклом от 1 до 1000?

Я объявлю переменную Mozhno as Boolean и в нужном месте присвою ей значение True. Итак, будет, если Mozhno = True, значит, дождались!

Но если по серьезному, то тут просто не надо заморачиваться низкоуровневыми заморочками типа оконных сообщений. Дружно вспоминаем бритву Оккама.