Fórum ADO E ValueListEditor #356908

09/04/2008

0

Boa tarde a todos
Como ler um ValueListEditor, usando o ADOConnection?
Trabalho com BDS2006 E Firebird 1.5


Mcamilo.o

Mcamilo.o

Responder

Posts

01/06/2008

Marciodossantosprog

Pela idade dos post, talvez você já tenha conseguido uma solução. De qualquer forma, isto é o que faço para utilizar o componente:

1 - Para popular o TValueListEditor

With qryLocal Do
Begin
First;
While Not Eof Do
Begin
vleReceitasDoFechamento.InsertRow(
qryLocal.FieldByName(´NomeDaForma´).AsString,
FormatFloat(´#,,,0.00´,
qryLocal.FieldByName(´ValorApresentado´).AsFloat), True);
Next;
End;
End;

2 - Para persistir os valores informados pelo usuário

qryLocal.Edit;
qryLocal.FieldByName(´ValorApresentado´).AsFloat := StrToFloat(
RemoveCaracterInvalido( vleReceitasDoFechamento.Cells[1, i], ´.´ ) );
qryLocal.Post;

Este é só um exemplo bastante simples. Vc pode reproduzir a estrutura de tua tabela para o valuelisteditor e depois, fazer o processo contrário com os dados informados.

Abraços, espero ter ajudado.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar