Undefinierter Bezeichner: 'VarToStr'

[ChrisH90]

Hallo an alle,

bitte um euere Mithilfe. Kann die Source nicht mehr compilieren. Unter Delphi6 gings noch. Jetzt bei Delphi 7 gehts nicht mehr:

Delphi-Quellcode:

// wrapper for IOPCSyncIO.Read (single item only)
function ReadOPCGroupItemValue(GroupIf: IUnknown; ItemServerHandle: OPCHANDLE;
          var ItemValue: string; var ItemQuality: Word): HResult;
var
  SyncIOIf: IOPCSyncIO;
  Errors: PResultList;
  ItemValues: POPCITEMSTATEARRAY;
begin
  Result := E_FAIL;
  try
    SyncIOIf := GroupIf as IOPCSyncIO;
  except
    SyncIOIf := nil;
  end;
  if SyncIOIf <> nil then
  begin
    Result := SyncIOIf.Read(OPC_DS_CACHE, 1, @ItemServerHandle, ItemValues,
                            Errors);
    if Succeeded(Result) then
    begin
      Result := Errors[0];
      CoTaskMemFree(Errors);
      ItemValue := VarToStr(ItemValues[0].vDataValue);
      ItemQuality := ItemValues[0].wQuality;
      VariantClear(ItemValues[0].vDataValue);
      CoTaskMemFree(ItemValues);
    end;
  end;
end;

Es geht um die Zeile: ItemValue := VarToStr(ItemValues[0].vDataValue);

Dort wird mir die Fehlermeldung Undefinierter Bezeichner: 'VarToStr' ausgegeben. Mache ich das VarToStr weg funzt es, aber natürlich macht das mit der Software ärger.

[edit=Admin]BBCOdes aktiviert. Mfg, Daniel[/edit]