Язык Описание VBScript, JavaScript SubsPointDeviceToPaper(aDevX, aDevY, aPaperX, aPaperY) Visual Basic Sub sPointDeviceToPaper(ByVal aDevX As Long, ByVal aDevY As Long, ByVal aPaperX As Variant, ByVal aPaperY As Variant) Delphi procedure sPointDeviceToPaper(aDevX: Longint; aDevY: Longint; aPaperX: OleVariant; aPaperY: OleVariant); C, C++ HRESULT sPointDeviceToPaper(long aDevX, long aDevY, VARIANT* aPaperX, VARIANT* aPaperY);