Fórum Criar CalcField em tempo de execução-urgente! #360533
30/06/2008
0
Pessoal,
É o seguinte...
Tenho um datasource q é ligado a grid da devexpress
só que quem esta ligado no datasource não é nenhum dataset. na tela.
dsDados.DataSet := TspConjuntoDados(Integer(PegaParametro(´prmDados´)));
Entao crei um clone e fiz isso....
esacAtendimento.CloneCursor(TClientDataSet(dsDados.DataSet), true);
dsDados.DataSet := esacAtendimento;
só que agora precisava criar um campo calculado nesse dataset(esacAtendimento) isso em tempo de execução. Alguem sabe como fazer isso? é Possível fazer???
desde já agradeço.
obrgiado.
[]s
É o seguinte...
Tenho um datasource q é ligado a grid da devexpress
só que quem esta ligado no datasource não é nenhum dataset. na tela.
dsDados.DataSet := TspConjuntoDados(Integer(PegaParametro(´prmDados´)));
Entao crei um clone e fiz isso....
esacAtendimento.CloneCursor(TClientDataSet(dsDados.DataSet), true);
dsDados.DataSet := esacAtendimento;
só que agora precisava criar um campo calculado nesse dataset(esacAtendimento) isso em tempo de execução. Alguem sabe como fazer isso? é Possível fazer???
desde já agradeço.
obrgiado.
[]s
Davefloripa
Curtir tópico
+ 0
Responder
Posts
30/06/2008
Du_nirvana
Tenta isso:
var
vg_field : TField;
begin
vg_field := TFloatField.Create( esacAtendimento );
WITH vg_field DO
BEGIN
Name := ´NOME_COLUNA´;
FieldName := ´NOME_COLUNA´;
FieldKind := fkInternalCalc;
ProviderFlags := [];
ReadOnly := FALSE;
DataSet := esacAtendimento;
END;
esacAtendimento.FieldDefs.Update;
end;
Responder
Gostei + 0
01/07/2008
Davefloripa
vlw
obrigado
espero que de certo.
obrigado
espero que de certo.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)