
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
10.11.2006, 19:41
|
|||
|---|---|---|---|
Index контрола |
|||
|
#18+
Есть три ListView() подскажите, пожалуйста, как узнать индекс контрола по которому кликнули. это: Private Sub ListView_Click(Index As Integer) ind = ListView(Index).Index End Sub как-то через раз работает. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
10.11.2006, 19:42
|
|||
|---|---|---|---|
Index контрола |
|||
|
#18+
это индкс записи в кликнутом контроле а индекс контрола - index (параметр смотри) аффтопитезь ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
10.11.2006, 19:44
|
|||
|---|---|---|---|
Index контрола |
|||
|
#18+
мозг не надо ........ ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
10.11.2006, 20:30
|
|||
|---|---|---|---|
Index контрола |
|||
|
#18+
Dim ind As Integer 'индекс ListView Dim ind1 As Integer 'индекс итема ListView(ind) Private Sub ListView1_Click(Index As Integer) On Error Resume Next ind = ListView1(Index).Index ind1 = ListView1(Index).SelectedItem.Index End Sub Private Sub ListView1_MouseDown(Index As Integer, Button As Integer, Shift As Integer, x As Single, y As Single) If Button = 2 Then PopupMenu mnuEdit End Sub Private Sub s_Click() On Error GoTo ser ListView1(ind).ListItems.Remove ind1 Exit Sub ser: MsgBox "Попробуйте ещё раз", vbOKOnly + vbInformation, "Не сработало" End Sub процедура s_Click() удаляет item(ind1) из ListView1(ind) по которому кликнули левой мышой последний раз ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=60&mobile=1&tid=2164996]: |
0ms |
get settings: |
5ms |
get forum list: |
8ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
186ms |
get topic data: |
6ms |
get forum data: |
1ms |
get page messages: |
21ms |
get tp. blocked users: |
1ms |
| others: | 211ms |
| total: | 443ms |

| 0 / 0 |
