powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как это реализовать?
5 сообщений из 5, страница 1 из 1
Как это реализовать?
    #33055725
x_as3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот "кадр" из Аутлука: щелчок на строку в гриде -> вывод содержимого в окне.

Как (каким контролом?) это реализовать?

Спасибо.
...
Рейтинг: 0 / 0
Как это реализовать?
    #33055785
Фотография azizjan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Попробуй MSHFlexGrid (Hierarhial FlexGrid), при событии Click() , используеш для поиска выбранной записи свойство Row, а дальше по твоему усмотрению
...
Рейтинг: 0 / 0
Как это реализовать?
    #33056338
x_as3
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
не совсем понял
когда я кликаю на какой-то ячейке mshflexgrid выделяется только она
как (каким контролом)

1. сделать так, чтобы клик выделял всю строку, как это показано в приложенном рисунке?

2. подложить под этот клик на строку событие?

3. получить данные из всех полей этой строки, кликнув на неё в любом месте?
...
Рейтинг: 0 / 0
Как это реализовать?
    #33056484
Фотография azizjan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да в MSHFlexGrid я не нашел как выделять всю строку, но в других контролах:
В MSFlexGrid есть свойство SelectionMode = ByRow .
А для получение данных из полей можеш использовать св
TextMatrix(Row,column) где Row вствляеш текущий номер записи
(MSFlexGrid.Row), а вместо column цикл с 0 до кол-во полей в гриде,
есть и другие способы, надо искать.

В Datagrid есть свойство MargueeStyle=dBgHighlightRow=3 .
А для получение данных из полей можеш также использовать св TextMatrix (Row,column)
...
Рейтинг: 0 / 0
Как это реализовать?
    #33057134
Фотография SmeL_md
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добавь на форму MSFlexGrid
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Private Sub Form_Load()
With MSFlexGrid1
.SelectionMode = flexSelectionByRow
For i =  0  To .Cols -  1 
 For j =  0  To .Rows -  1 
  .TextMatrix(i, j) = "cell" & i & j
 Next
Next
End With
End Sub

Private Sub MSFlexGrid1_Click()
With MSFlexGrid1
For i =  1  To .Cols -  1 
    MsgBox .TextMatrix(.Row, i)
Next
End With
End Sub
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как это реализовать?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]