Pessoal, quem estiver utilizando a TClasse_Base em seus projetos, realizar a seguinte correção no código da função AddFieldsCalculated():
...
case FieldType of
ftBCD:
begin
TBCDField(objField).Precision := 18;
TBCDField(objField).DisplayFormat := '#,0.00;-#,0.00';
end
ftFloat:
begin
TFloatField(objField).Precision := 15;
TFloatField(objField).DisplayFormat := '#,0.00;-#,0.00';
end
end;
...
Essa alteração corrige o erro de Access Violation que estava ocorrendo apenas no Delphi 2010.
Nenhum comentário:
Postar um comentário