O Displayformat no Delphi 2006 morreu ???
Estou fazendo a conversão de um projeto do Delphi 7 para o Delphi 2006 e durante a conversão para a minha surpresa ao abrir uma tela que funciona perfeitamente no Delphi 7 cuja possui formatação de valores para 2 casas decimais (utilizo a mascara #,0.00 direto no fields do clientdataset) esta estava sem a formatação na devida coluna.
Alguem tem alguma ideia do que pode ser feito para solucionar este problema ?
Grato,
Alguem tem alguma ideia do que pode ser feito para solucionar este problema ?
Grato,
Andreaskaquino
Curtidas 0
Respostas
Mkoch
26/07/2006
Cara tive o mesmo problema pesquisei pra caramba e nada de solução.
Como sempre ai entra em sena a gambi.
No evento GetText do campo (campo adicionado no Fields Editor) você pode usar um código como esse para formatar o valor.
procedure TFProdutos.PrecoGetText(Sender: TField; var Text: string; DisplayText: Boolean);
begin
if Sender.IsNull then
Text := ´´
else
Text := FormatFloat(´#,0.00´, Sender.AsFloat);
end;
Como sempre ai entra em sena a gambi.
No evento GetText do campo (campo adicionado no Fields Editor) você pode usar um código como esse para formatar o valor.
procedure TFProdutos.PrecoGetText(Sender: TField; var Text: string; DisplayText: Boolean);
begin
if Sender.IsNull then
Text := ´´
else
Text := FormatFloat(´#,0.00´, Sender.AsFloat);
end;
GOSTEI 0
Steve_narancic
26/07/2006
Alguem teria outra sugestão de como resolver este problema?
GOSTEI 0