MSHFLEXGRID E TABELA ACCESS

DANIKULL 26/08/2009 18:48:17
#321045
Resposta escolhida
NEREU1301, boa noite.

Este sequencial é gerado automaticamente conforme as linhas do Grid são criadas. Da uma olhada na sub:

Private Sub FormataLinha()
[txt-color=#b40404] Grid.TextMatrix(Grid.Rows - 1, 0) = Format(Grid.Rows - 1, [Ô]000[Ô])[/txt-color]
Grid.TextMatrix(Grid.Rows - 1, 4) = [Ô]0,000[Ô]
Grid.TextMatrix(Grid.Rows - 1, 5) = [Ô]0,00[Ô]
Grid.TextMatrix(Grid.Rows - 1, 6) = [Ô]0,00[Ô]
End Sub


Sobre o Key ter sido criado no 2000, na época que desenvolvi este projeto eu so tinha o 2000. As mudança são quase inperceptíveis
NEREU1301 26/08/2009 21:47:28
#321060
Boa noite
meu camarada danikull
o teu form FrmGridEdit já inicia com a contagem de item 001 (sub FormataLinha [Ô]000[Ô] +1) e é esse 1 que eu nao to conseguindo localizar onde ele surge. Penso que seja o contalinha que tá no load do form, vindo da sub Tmr_1 mas nao tenho certeza.
Acontece que meu grid abre sem essa numeraçao. Tentei colocar esse numero 001 diretamente na tabela mas mesmo assim quando abro o grid no lugar do item nao aparece nada.

Se tu tiver paciencia, vai me dando uma força.
Abraço
nereu

xxxxxxxx Não é facil. Repassei dez mil vezes e não tinha vito que eu não chamava o o formata linha no load. Desculpe. Voltando ao trabalho![S55]
DANIKULL 27/08/2009 20:01:15
#321168
NEREU1301, boa noite

Vamos lá, iniciando a sequencia de ocorrências:

Quando o form abre, no evento Form Load veja que ele chama a sub rotina [txt-color=#b40404]Call ChecarStatus[/txt-color].
Quando esta sub rotina esta executando veja que:
Se for novo registro ela vai chamar a sub rotina [txt-color=#b40404]Call FormataLinha[/txt-color], e ai chega onde eu postei a cima....
Pegue a linha que grifei no post acima e comente ela para você ver, não irá aparecer valor algum na contagem de itens, nem mesmo apos se inciar uma nova linha....

Ok...

Se não conseguir poste novamente....
NEREU1301 27/08/2009 21:26:11
#321180
boa noite
Danikull, logo que voce deu a dica já localizei meu erro, eu simplesmente nao estava chamando a sub formatalinha.
Vou ter que aumentar a iluminaçao da minha sala.
já corrigi e tá dez.
Agora to tentando resolver o keiup e keidow que nao tá funcionando. Uma das consequencia disso é que não cria nova linha.
Se eu nao conseguir resolver retorno
Abraço
nereu
NEREU1301 01/09/2009 16:35:44
#321589
boa tarde
Danikull,
depois de 4 dias tentando e testando com teu exemplo, sem sucesso , desisto e peço tua ajuda.
simplesmente nao tem como fazer o keydow funcionar dentro do flex e quando consigo fazer funcionar ele sai do grid ao inves de criar uma nova linha.
por exemplo:
lanço no grid
cod descr quant valor totLinha
00001 disjuntor 10 10,00 100,00

e ai quero incluir mais uma peça o keydow que faria isso nao funciona
fui buscar informaçoes na net, inclusive num outro trabalho teu, mas nao vai, nao tem jeito.
fico no aguardo
nereu
DANIKULL 01/09/2009 20:04:45
#321626
NEREU1301, boa noite.

Como você quer aprender a mexer vou dar as dicas, você analisa ai para ver se acha como faz e reporta depois se conseguiu ou não, certo???

Então vamos lá...

Você alterou o projeto que enviei??
A programação de reconhecimento das setas do teclado estão no evento GotFocus do txt_verifica. Como funcionada...
Como o MSFlexGrid e o MSHFlexGrid não reconhece as setas do teclado temos que criar o evendo usando a função GetAsyncKeyState da APi USER32.
Para que esta API veja a seta sendo pressionada temos que colocar ele para verificar constantemente qual tecla foi pressionada, por isso usamos o objeto TIMER, OK???
Como o timer roda constantemente basta você mudar o valor do interval..... ok???



ASHKATCHUP 01/09/2009 20:15:29
#321629
NEREU:

Cara, pq vc n posta o teu projeto aqui? Assim fica mais fácil de ajudar.
NEREU1301 01/09/2009 21:08:16
#321634
boa noite amigos
depois de penar duas semanas até pensei em colocar o projeto ai, mas depois de zipado ele tem 32 mb, como é que faço?
ASHKATCHUP 01/09/2009 21:31:06
#321636
Meu deus, então é um projeto gigante... nem o projeto da minha empresa, com 850 forms, tem 28 mb...

Usa o [Ô]rapidshare.de[Ô] para dar upload nele.
NEREU1301 01/09/2009 22:01:33
#321639
cara, depois do que vc falou, fui conferir e vi que ele tem esse tamanho porque eu estava zipando junto o arquivo package.
entao o seguinte, to anexando ele ai, mas continuo pedindo que apenas me deem as dicas de onde estou errando pra que eu possa consertar aprendendo, senao no proximo proj vai ser o mesmo problema.
danikull e ashkatchup peço que se possivel nao alterem a visao geral do proj porque ele está idealizado em conjunto com a empresa que solicitou,
sendo que o primeiro form já está funcionando corretamente
eu preciso agora que a ajuda se concentre no flexgrid da oficina1 e oficina2 que fiz de duas formas, mas que nem uma funcionou em nem uma.
entao amigos já que nao consegui sozinho, se quizerem me ajudar

agradeço
nereu
Página 5 de 6 [58 registro(s)]
Tópico encerrado , respostas não são mais permitidas