Язык Описание VBScript, JavaScript SubsProjectPoint(aWorldX, aWorldY, aPaperX, aPaperY) Visual Basic Sub sProjectPoint(ByVal aWorldX As Double, ByVal aWorldY As Double, ByVal aPaperX As Variant, ByVal aPaperY As Variant) Delphi procedure sProjectPoint(aWorldX: Double; aWorldY: Double; aPaperX: OleVariant; aPaperY: OleVariant); C, C++ HRESULT sProjectPoint(double aWorldX, double aWorldY, VARIANT* aPaperX, VARIANT* aPaperY);