хелп плиз в пятерке (Delphi 5) такая конструкция проходила на "ура",

repeat
try
RESULT:= CreateOleObject(ClassName);
except
end;
if VarIsEmpty(RESULT) then TryToRegister(FileName);
until not(VarIsEmpty(RESULT));

пересл на 7-ку все бы ничего но вот возникла ситуация 5-ки нет, проверить не начем а 7-ка ругается - мол незнаю я такой ф-ии "VarIsEmpty()"
подскажите как проверить создан ли оле объект?

всем сенкс . . .
стормозил я вобщем