Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос по работе с Janus GridEX 2000 / 7 сообщений из 7, страница 1 из 1
23.05.2010, 11:07
    #36643729
tutti-frutti
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
Подскажите, как правильно информацию из буфера обмена вставить в грид?
Если в буфере информация о нескольких строках, то во первых нужно каким-то образом перебирать "строки/столбцы" в буфере обмена, а во вторых необходимо заполнить грид.
Сейчас я делаю:
Код: 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
02.06.2010, 21:44
    #36665254
tutti-frutti
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
С предыдущими вопросами немного разобрался. Теперь вот что:
не получается изменить поведение курсора в сетке по нажатию на клавишу Ентер. У меня после ентера курсор перескакивает на нижнюю строку, а нужно чтоб как в таблицах Access - вправо.
Привык. Бесит.
...
Рейтинг: 0 / 0
03.06.2010, 00:40
    #36665540
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
tutti-frutti,

А все привыкли что в екселе он прыгает вниз, а не в сторону
Для в сторону есть Таб.
...
Рейтинг: 0 / 0
03.06.2010, 01:39
    #36665587
AndrF
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
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
03.06.2010, 12:56
    #36666393
tutti-frutti
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
AndrF...
Спасибо!
От привычек отказываться мне пока рано, и как говорит мой сосед по лестничной площадке: "лошадей на переправе не меняют!" :)
...
Рейтинг: 0 / 0
03.06.2010, 13:14
    #36666472
_Boroda_
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос по работе с Janus GridEX 2000
tutti-frutti,

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

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

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

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

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

Application.MoveAfterReturnDirection = xlDown

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


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