[DEVELOPMENT ENVIRONMENT]
* BUG: In the procedure list, finding a procedure by typing its name correctly scrolls the list. git-svn-id: svn://localhost/gambas/trunk@3858 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
08b88056cf
commit
b1c1b88222
2 changed files with 4 additions and 1 deletions
Binary file not shown.
Before Width: | Height: | Size: 4.3 KiB After Width: | Height: | Size: 4.2 KiB |
|
@ -92,7 +92,10 @@ Private Sub SetCurrent(iCurrent As Integer)
|
|||
|
||||
$iCurrent = iCurrent
|
||||
If iOld >= 0 Then gvwProc.Rows[iOld].Refresh
|
||||
If iCurrent >= 0 Then gvwProc.Rows[iCurrent].Refresh
|
||||
If iCurrent >= 0 Then
|
||||
gvwProc.Rows[iCurrent].Refresh
|
||||
gvwProc[iCurrent, 0].EnsureVisible
|
||||
Endif
|
||||
|
||||
End
|
||||
|
||||
|
|
Loading…
Reference in a new issue