DUVIDA MSFLEXGRID

USUARIO.EXCLUIDOS 15/09/2005 13:25:58
#104382
Boa Tarde !

Galera, eu inseri no meu Form um Objeto com o nome de MSFlexGrid1, um txtnom e um Commandbuttonaddnew, estou com a seguinte dúvida.

Quero que ao usuario adicionar um valor no campo texto, ao ele apertar o Commandbuttonaddnew, o valor desse txtnom entre no MSFlexGrid1 e cada vez que le fizer isso seja adiconado no MSFlexGrid1.

Abraços
Fagundes
LIONHEART 15/09/2005 13:36:48
#104386
no Click
msflexgrid1.row = msflexgrid1.maxrows + 1
msflexgrid1.text = Text1.text
USUARIO.EXCLUIDOS 15/09/2005 13:37:30
#104387
Normalmente para adicionar apenas um item, costumamos usar comboÂÂÂ's, listboxes, e etc.
Mas no flex existe a instrução AddItem...

For i = 1 to 3
flex.AddItem txtnom, i
Next i
LREZANI 15/09/2005 13:44:15
#104391 Resposta escolhida
coloque no evento click do button;
msflexgrid1.additem txtnom.text
LIONHEART 15/09/2005 14:33:55
#104404
é verdade, eu misturei as bolas.....
confundi com o Flex com o Spread, que é um componente comprado daqui ("que inutilmente faz a mesma coisa que um datagrid...")
USUARIO.EXCLUIDOS 15/09/2005 15:02:54
#104407
Galera, surgiu mais alhgumas dúvidas.

1Âê Quando insiro um texto muito grande como por exemplo: Teste teste teste teste teste no meu txtnom, ao adicionar o mesmo no msflexgrid, ele corta o texto pela metade, tem como habilitar alguma coisa na propriedade do Msflexgrid para o usuario conseguir ajustar a celula.

2Âê Como gravar todos os valores adicionados no Msflexgrid em um BD e em um único campo.

3Âê Como que faço para deixar apenas uma celula no meu Msflexgrid.
LREZANI 15/09/2005 15:20:22
#104418
1-Existe uma propriedade chamada wordwrap, mude ela para true.obs, otexto será quebrado para uma linha abaixo, portanto tem que configurar a altura da célula, propridade cellheight.
2-Especifique um pouquinho mais, cada linha do flex em um registro ou todas linhas em um registro.
3-Msflexgrid1.cols=1
LREZANI 15/09/2005 15:32:24
#104428
Caso você queira gravar cada linha em um registro da tabela, levando em consideração que seu grid tenha uma coluna como cabeçalho;

    Set TB = New ADODB.Recordset
    TB.Open "Select Campo from Tabela", BD, adOpenDynamic, adLockOptimistic
    For I = 1 To MSFlexgrid1.Rows - 1
         TB.AddNew
         TB!Campo=MSFlexgrid1.TextMatrix(I, 0)
         TB.Update
    Next

Esta rotina deve solucionar seu problema.
Lembre-se de encerrar o tópico.
USUARIO.EXCLUIDOS 15/09/2005 15:36:54
#104430
Quero gravar todas linhas em um único registro no meu BD.
USUARIO.EXCLUIDOS 15/09/2005 15:46:40
#104435
LREZANI, não consegui encontrar a propridade cellheight para ajustar o tamanho do texto na celula, e uma ultima dúvida, como que insiro o cabeçalho na coluna.

Abraços
Fagundes

Ah, pode deixar que vou encerrar o topico em seu nome.
LREZANI 15/09/2005 15:57:13
#104437
A propriedade .CellHeight só pode ser alterada em run-time, o cabeçalho e a coluna fixa.
de um clique com o botão direito em cima do flexgrid, escolha a opção Properties. Lá você pode definir a formatação inicial do seu grid, deixando-o pronto para receber dados.
Página 1 de 2 [12 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar