CORRECAO DO GRID
Galera em primeiro lugar me desculpe mais o topico anterior estava meio que desviado do que realmente quero, vou tenta explicar melhor
Tenho um MsHFlexGrid que carrega com minha tabela do banco, essa tabela tenhe os seguintes campos
Codigo
Nome
no meu MshFlexGrid é carregado todos os dados dessa tabela
exemplo
codigo nome
1 Rio de Janeiro
2 Sao Paulo
3 Pará
gostaria de quando eu clicasse no MsHFlexGrid no iten ou linha desejado eu tivesse o valor da 1º coluna ou seja o codigo da cidade.
sei que se eu colocar msgbox meuGrid.text vai aparecer o texto da linha selecionada so que aparece da coluna selecionada, ewntao quero para quando eu clicasse em cima da linha me desse esse valor ou seja eu poderia clicar tanto em cima do nome quanto em cima do codigo ele me desse o valor da primeira coluna ou seja o codigo da cidade
pode ser atraves de um msgbox
agradeço
Tenho um MsHFlexGrid que carrega com minha tabela do banco, essa tabela tenhe os seguintes campos
Codigo
Nome
no meu MshFlexGrid é carregado todos os dados dessa tabela
exemplo
codigo nome
1 Rio de Janeiro
2 Sao Paulo
3 Pará
gostaria de quando eu clicasse no MsHFlexGrid no iten ou linha desejado eu tivesse o valor da 1º coluna ou seja o codigo da cidade.
sei que se eu colocar msgbox meuGrid.text vai aparecer o texto da linha selecionada so que aparece da coluna selecionada, ewntao quero para quando eu clicasse em cima da linha me desse esse valor ou seja eu poderia clicar tanto em cima do nome quanto em cima do codigo ele me desse o valor da primeira coluna ou seja o codigo da cidade
pode ser atraves de um msgbox
agradeço
Tenta assim:
[/c]
[c]Private Sub Grid1_Click()
a = Grid1.row
valor = Grid1.Textmatrix(a,0) 'onde valor é o código
End sub
[/c]
Eu concordo com o BIODIESEL mas se houver uma Fixed Col(Coluna Fixa: Aquela coluna cinza) o código deve ser o seguinte:
[/c]
[c]Private Sub MSFlexGrid1_Click()
MsgBox MSFlexGrid1.TextMatrix(MSFlexGrid1.row, 1)
End Sub
[/c]
ALEXANDREMOTA existe aquela coluna sim, tem como remover ela?
Eu concordo com o BIODIESEL mas se houver uma Fixed Col(Coluna Fixa: Aquela coluna cinza) o código deve ser o seguinte:
[/c]
[c]Private Sub MSFlexGrid1_Click()
MsgBox MSFlexGrid1.TextMatrix(MSFlexGrid1.row, 1)
End Sub
[/c]
O melhor que você teria a fazer seria ir na propriedade Custom do Grid e alterar, na aba General, Fixedcols = 0.
Daàsim, faria o que eu escrevi:
Isso porque a coluna fixa também é contada.
Espero ter ajudado.
Daàsim, faria o que eu escrevi:
Private Sub Grid1_Click()
a = Grid1.row
valor = Grid1.Textmatrix(a,0) 'onde valor é o código
End sub
Isso porque a coluna fixa também é contada.
Espero ter ajudado.
Tópico encerrado , respostas não são mais permitidas