Ricardo
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 19/11/2004 11:00 hs
Alguém tem um exemplo de fazer busca em um flex. Tipo assim tenho um text e um flex a medidada que vou digitando os dados no text ele vai buscando e selecionando no flexgrid.
|
|
|
|
Rubinho
|
COLATINA ES - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 19/11/2004 11:12 hs
Este código usa o evento KeyPress do FlexGrid e pega o código ascii da letra pressionada pelo usuário para colocar a primeira linha com esta determinada letra no TopRow; por exemplo; em um grid com muitos registros (e ordenado alfabéticamente) ao se pressionar a tecla "F" (por exemplo) automaticamente o foco é lançado no primeiro registro com a tecla F . . . confira !
===============================================
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer) If Trim(MSFlexGrid1.TextMatrix(1, 1)) <> "" Then If (KeyAscii > 65 And KeyAscii < 90) _ Or (KeyAscii > 97 And KeyAscii < 122) Then Dim I As Integer Dim S As String Dim X As String S = Chr(KeyAscii) S = UCase(S) For I = 1 To MSFlexGrid1.Rows - 1 X = Trim(MSFlexGrid1.TextMatrix(I, 1)) X = Left(X, 1) X = UCase(X) If S = X Then MSFlexGrid1.TopRow = I Exit For End If Next End If End If End Sub Este exemplo foi postado pelo Colega Rodrigo Braga na seção de dicas aqui no Forum Espero ter ajudado...
|
|
|
Ricardo
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 19/11/2004 11:22 hs
Valeu cara só que eu já testei este código e não consegui fazer com q ele rode pois ele localiza direto do flex ou seje dugitando no flex e o meu precisa ser de um text .
|
|
|