powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по работе с Janus GridEX 2000
7 сообщений из 7, страница 1 из 1
Вопрос по работе с Janus GridEX 2000
    #36643729
tutti-frutti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Подскажите, как правильно информацию из буфера обмена вставить в грид?
Если в буфере информация о нескольких строках, то во первых нужно каким-то образом перебирать "строки/столбцы" в буфере обмена, а во вторых необходимо заполнить грид.
Сейчас я делаю:
Код: plaintext
GridEX1.ItemCount = CountRowInArray
после чего вызывается
Код: plaintext
1.
2.
Private Sub GridEX1_UnboundReadData(ByVal RowIndex As Long, ByVal Bookmark As Variant, ByVal Values As GridEX20.JSRowData)
...
End Sub
CountRowInArray раз.

Если не работали с этим гридом, то подскажите как обрабатывать буфер?
Спасибо.
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36665254
tutti-frutti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
С предыдущими вопросами немного разобрался. Теперь вот что:
не получается изменить поведение курсора в сетке по нажатию на клавишу Ентер. У меня после ентера курсор перескакивает на нижнюю строку, а нужно чтоб как в таблицах Access - вправо.
Привык. Бесит.
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36665540
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tutti-frutti,

А все привыкли что в екселе он прыгает вниз, а не в сторону
Для в сторону есть Таб.
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36665587
AndrF
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tutti-fruttiС предыдущими вопросами немного разобрался. Теперь вот что:
не получается изменить поведение курсора в сетке по нажатию на клавишу Ентер. У меня после ентера курсор перескакивает на нижнюю строку, а нужно чтоб как в таблицах Access - вправо.
Привык. Бесит.

Сделать-то можно, например:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Private Sub GridEX1_KeyDown(KeyCode As Integer, Shift As Integer)
    Select Case KeyCode
        Case vbKeyReturn
            If Shift =  0  Then
                With Me!GridEX1
                    If .Col < .Columns.Count Then KeyCode = vbKeyRight
                End With
            End If
    End Select
End Sub

Только вот стоит ли? Ведь само название клавиши Enter подразумевает как правило сохранение записи, а не поля (аналогично и в форме - нажатие кнопки по умолчанию (как правило ОК), а не перемещение по полям). Отучайтесь от плохих привычек...
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36666393
tutti-frutti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AndrF...
Спасибо!
От привычек отказываться мне пока рано, и как говорит мой сосед по лестничной площадке: "лошадей на переправе не меняют!" :)
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36666472
_Boroda_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
tutti-frutti,

Sub Макрос2()
Application.MoveAfterReturnDirection = xlToRight
End Sub

только потом взад вернуть не забудьте

Application.MoveAfterReturnDirection = xlDown
...
Рейтинг: 0 / 0
Вопрос по работе с Janus GridEX 2000
    #36666486
tutti-frutti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
_Boroda_tutti-frutti,

Sub Макрос2()
Application.MoveAfterReturnDirection = xlToRight
End Sub

только потом взад вернуть не забудьте

Application.MoveAfterReturnDirection = xlDown

Жесть)0 Спасибо, но мне помимо перехода как такового ,нужно еще и на новую строку перепрыгивать по этому же ентеру, да еще и в первый столбец.. То есть мне вариант выше супер подходит ,а этот механизм пригодится в другой раз. Еще раз спасибки! :)
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по работе с Janus GridEX 2000
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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