GARANTIR DESCONTO

Fórum Delphi 5 para Delphi 6 com alguns erros #270032

24/02/2005

0

Estou compilando um sistema em Delphi 5 para o Delphi 6.

Acrescenteis as units necessárias que pesquisei aqui no forum, porém está dando um erro em uma variável. o pedaço do codigo é:

function VarToStr(V: Variant; DataType: TFieldType): string;
const
BinaryDataTypes: set of TFieldType = [ftBytes, ftVarBytes, ftBlob,
ftGraphic..ftCursor];
begin
try
if VarIsEmpty(V) then
Result := SUnchanged
else if DataType in BinaryDataTypes then
Result := SBinary
else
Result := System.VarToStr(V); [b:83e673a7a3][color=red:83e673a7a3]<<o erro tá nessa variável VarToStr[/color:83e673a7a3][/b:83e673a7a3]
except
on E: Exception do
Result := E.Message;
end;
end;

o que pode tá ocorrendo?
pois ao compilar acusa o erro de:
[Error] RecError.pas(141): Undeclared identifier: ´VarToStr´


Nilsonalvernaz

Nilsonalvernaz

Responder

Posts

24/02/2005

Gandalf.nho

Declare na sua cláusula Uses a unit [b:385889318f]Variants[/b:385889318f]


Responder

Gostei + 0

24/02/2005

Massuda

Complementando o que a gandalf.nho escreveu...

Mude a linha que dá erro de
Result := System.VarToStr(V);
para
Result := Variants.VarToStr(V);



Responder

Gostei + 0

24/02/2005

Nilsonalvernaz

Valeu Massuda deu certo, pois já tinha declarado a unit Variants.

8) 8) 8)


Responder

Gostei + 0

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

Aceitar