Fórum Delphi 5 para Delphi 6 com alguns erros #270032
24/02/2005
0
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
Curtir tópico
+ 0Posts
24/02/2005
Gandalf.nho
Gostei + 0
24/02/2005
Massuda
Mude a linha que dá erro de
Result := System.VarToStr(V);
Result := Variants.VarToStr(V);
Gostei + 0
24/02/2005
Nilsonalvernaz
8) 8) 8)
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)