USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  MsFlexGrid (DblClick)
Donizete
IBITINGA
SP - BRASIL
ENUNCIADA !
Postada em 13/08/2007 21:02 hs            
Olá Pessoal!
 
Tenho um msflex quando povoado aparece os campos: código, nome, cpf. Eu queria quando desse um duplo clique, abrisse um form com os dados, e assim sucessivamente em cada duplo clique no msflex. Alguém tem alguma idéia?
 
Uso: Access e dao
 
Donizete
 
   
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
Postada em 14/08/2007 09:31 hs            
Donizete, tem várias formas de se fazer isto, voce pode fazer a que achar melhor.
Se o Flex é acoplado ao DAO, e voce faz uma consulta de ação, voce nem precisa abrir a tabela para mostrar os dados.
Primeiro:
Coloque uma Text, e aponte a propriedade Visible = False, ai voce pode ter duas opções: acoplar a Text ao controle Data. Não sendo acoplado, pegue pelo flex, no Refresh da consulta:
Flex.Refresh
Text1.Text = Flex.TextMatrix(linha, coluna) 
Bem aqui foi na consulta, agora na navegação do Flex:
Private Sub Flex_EnterCell()
 If dtaTabela.Recordset.RecordCount > 0 Then   ' se for pelo controle
  Text1.Text = Flex.TextMatrix(Flex.RowSel, 0)  ' zero aqui é coluna
 End If
End Sub
Private Sub Flex_Click()
 repita no Click e Double o código acima
End Sub
Pronto agora se for acoplado a controle Data, coloque a propriedade DataSource do controle apontado para o controle Data.
Na consulta.
Data1.Refresh
Text1.DataField = "NOMEDOCAMPODATABELA"
Bem ai não se preocupe com a navegação do Flex, estando acoplando voce só terá que fazer o evento Click do Flex para mostrar os campos nas Texts.
Se não entendeu, me mande detalhes, posso te enviar o código pronto.
 
vlu//
     
Donizete
IBITINGA
SP - BRASIL
Postada em 14/08/2007 20:47 hs            
Ok.
 
Vou testar depois te retorno
Valeu, obrigado por enquanto!
 
Donizete
 
     
Donizete
IBITINGA
SP - BRASIL
Postada em 23/08/2007 19:39 hs            
Cara, blz!
funcionou legal
 
obrigado
Donizete
     
Página(s): 1/1    

CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página