|
|
|
Отставание события DataGrid_Click()
|
|||
|---|---|---|---|
|
#18+
Здравствуйте. По клику на Gride значение текущего поля должно присваиваться полю Text объекта Text1. Однако на практике значение присваивается Text1.Text лишь при повторном клике на DataGrid1, т.е. при повторном возникновении события DataGrid1_Click. Получается, что данные, отображаемые на Text1.Text, "отстают" ровно на один мышиный клик. Из дебаггера видно, что после завершения DataGrid1_Click() данные в поле Text не изменяются на актуальные. Код: Код: plaintext 1. 2. 3. 4. 5. 6. 7. Вероятно, я где-то ступил, но самостоятельно увидеть свою ошибку не способен, ибо глаз уже "замылилися". Спасибо за внимание. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2006, 17:57 |
|
||
|
Отставание события DataGrid_Click()
|
|||
|---|---|---|---|
|
#18+
А что такое у вас i и где оно меняется? Попробуйте повесить эту обработку на событие EnterCell. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 11.09.2006, 18:20 |
|
||
|
Отставание события DataGrid_Click()
|
|||
|---|---|---|---|
|
#18+
MelkiadesА что такое у вас i и где оно меняется? Попробуйте повесить эту обработку на событие EnterCell. К сожалению у DataGrid нет события EnterCell(но пробовал использовать и другие события), у MsFlexGrid есть, да... но не у DataGrid. Пожалуй, стоит попробовать MsFlexGrid. А i изначально установлено в 0. В любом случае экспериментально выяснено, что при других начальных значениях всё остаётся также. i ещё изменяется посредством ScrollBar-a. Самое интересное то, что при изменении значений i с помощью события Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. значение Text1.text устанавлиается именно с текущей строки, выделенной на DataGrid(а не с педыдущей выделенной строки, как в случае с DataGrid_Click). Т.е. актуальные данные можно получить посредством передвижения "ползунка". Почему одно событие срабатывает так как нужно, а другое - несколько иначе, мне совершенно неясно. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 12.09.2006, 10:30 |
|
||
|
Отставание события DataGrid_Click()
|
|||
|---|---|---|---|
|
#18+
Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer) MsgBox DataGrid1.Text End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.09.2006, 11:15 |
|
||
|
Отставание события DataGrid_Click()
|
|||
|---|---|---|---|
|
#18+
Private mblnClicked As Boolean Private Sub DataGrid1_Click() mblnClicked = True End Sub Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer) On Error Resume Next If mblnClicked Then Text1.Text = DataGrid1.Text mblnClicked = Not mblnClicked End If End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 19.09.2006, 16:17 |
|
||
|
|

start [/forum/topic.php?fid=60&fpage=266&tid=2165279]: |
0ms |
get settings: |
11ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
55ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
56ms |
get tp. blocked users: |
1ms |
| others: | 248ms |
| total: | 408ms |

| 0 / 0 |
