powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / опять MsFlexGrid
11 сообщений из 11, страница 1 из 1
опять MsFlexGrid
    #36437545
valgruel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может это туплю? (Уже перегуглино 2 часа и здесь тоже...)
как узнать текущю запись в MsFlexGrid?

Я знаю текущую ячейку (Col, row), По ним - определяю значение, соответствующее ключевому полю в recordset, а дальше-то что?
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36437547
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А дальше что чтобы что?

Вы же определили ключ записи, стало быть по ключу можете определить и саму запись
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36437555
valgruel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro,
как?
Как по ключу определить саму запись?

Мне, в итоге, нужно связять объекты Text1 и OLE с этой записью
Есть:
автор Cnct = "SELECT * from sob"
Data1.RecordSource = Cnct
Data1.Refresh
MSFlexGrid2.Refresh
...

потом ходим по сетке, и на конкретной записи должны обновляться
авторText1.DataField = "Fam"
OLE1.DataField = "Foto"


(может в этом и состоит мое "тупление"?)
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36437563
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я, честно говоря, с объектом Data не работал, ща посмотрел, там, по всей видимости перемещение курсора выполняется через .Recordset.Move* и .Recordset.Find*
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36439270
valgruel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Shocker.Pro,

Моve - этопроходит, если клавишами - по одной (вверх, вниз) - тогда и отловить можно,
а Мышкой тыкается произвольно в любую ячейку сетки...

Find .. буду пробовать
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36439277
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
valgruelМоve - этопроходит, если клавишами - по одной (вверх, вниз) - тогда и отловить можно, а Мышкой тыкается произвольно в любую ячейку сетки...

А кто мешает
1) вычислять дельту между предыдущей и текущей строкой и на эту дельту двигать Move
2) Делать MoveFirst и Move List.Row (плюс-минус 1 на заголовки и сдвиг нумерации)

?
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36439289
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
Dim Stroka: Stroka = Me.MSFlexGrid1.TextArray(RowIndex )
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36440491
valgruel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Konst_One,

ошибка в RowIndex - неопределено
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36441729
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это номер строки (Row)
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36441748
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как узнать текущю запись в MsFlexGrid?Гугль в этом не поможет, потому что флексгрид не знает что такое записи. О них знает DataGrid. У флекса есть текущая строка и текущая колонка (.Row и .Col), причем с источником данных они никак не связаны.

Разница между этими гридами такая же, как между таблицами Экселя и Аксесса.

Jah loves you.
...
Рейтинг: 0 / 0
опять MsFlexGrid
    #36443349
valgruel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Antonariy,

Спасибо всем сочуствовавшим.
Все получилось, как указал Shocker.Pr o в другой ветке http://www.sql.ru/forum/actualthread.aspx?tid=731344 :
авторPrivate Sub MSFlexGrid1_EnterCell()

Dim i As Integer
i = MSFlexGrid1.Row
Data1.RecordSet.MoveFirst
Data1.RecordSet.Move i-1

End Sub
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / опять MsFlexGrid
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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