procedure OleCheck(Result: HResult)
Процедура вызывает исключение, если код в параметре Result указывает на ошибку (Result<0). Используйте OleCheck, чтобы обернуть любые вызываемые вами методы COM на основе IUnknown, чтобы в случае сбоя этого метода возникло исключение.
Параметры: