FLEXGRID COM LINHAS EDITAVEIS
Galera, é possivel configurar um FlexGrid para que suas linhas fiquem editaveis em [txt-color=#0000f0]tempo de execução[/txt-color] ?
quero elaborar um para quê o que for inserido neles, sejam salvos em um banco de dados...um esquema parecido com o Excel.
quero elaborar um para quê o que for inserido neles, sejam salvos em um banco de dados...um esquema parecido com o Excel.
[txt-color=#0000f0]PARABéNS NILSON ![/txt-color]
Muito pratico e bem simples !
Se puder me dá uma dica de como fazer para ao clicar [Ô]Enter[Ô] ao invés de ir para a próxima Coluna criar uma nova Linha fico grato mais ainda cara !
Estou a tentar
Obrigado !
[txt-size=1][txt-color=#e80000]EDITADO :[/txt-color][/txt-size]
Conseguà !
Alterei a linha do script de:
para :
Valeu !
Muito pratico e bem simples !
Se puder me dá uma dica de como fazer para ao clicar [Ô]Enter[Ô] ao invés de ir para a próxima Coluna criar uma nova Linha fico grato mais ainda cara !
Estou a tentar
Obrigado !
[txt-size=1][txt-color=#e80000]EDITADO :[/txt-color][/txt-size]
Conseguà !
Alterei a linha do script de:
Private Sub Grid1_KeyPress(KeyAscii As Integer)
On Error Resume Next
With Grid1
If KeyAscii = 13 Or KeyAscii = 9 Then
.Col = .Col + 1
KeyAscii = 0
ElseIf KeyAscii = 8 Then
.Text = Left(.Text, Len(.Text) - 1)
KeyAscii = 0
End If
para :
Private Sub Grid1_KeyPress(KeyAscii As Integer)
On Error Resume Next
With Grid1
If KeyAscii = 13 Or KeyAscii = 9 Then
.AddItem .Row
KeyAscii = 0
ElseIf KeyAscii = 8 Then
.Text = Left(.Text, Len(.Text) - 1)
KeyAscii = 0
End If
Valeu !
Tópico encerrado , respostas não são mais permitidas