01type
02  IPDFFont = interface(IDispatch)
03    ['{43FE399A-A724-4076-BAFA-098639628385}']
04    function Get_Spacing: Double; safecall;
05    procedure Set_Spacing(Value: Double); safecall;
06    function Get_WordSpacing: Double; safecall;
07    procedure Set_WordSpacing(Value: Double); safecall;
08    function Get_Scaling: Double; safecall;
09    procedure Set_Scaling(Value: Double); safecall;
10    function Get_RenderingMode: TPDFFontRenderingMode; safecall;
11    procedure Set_RenderingMode(Value: TPDFFontRenderingMode); safecall;
12    function Get_Rise: Double; safecall;
13    procedure Set_Rise(Value: Double); safecall;
14    procedure WriteLine(const LineText: WideString; X: Double; Y: Double); safecall;
15    procedure MeasureLine(const LineText: WideString; out Width: OleVariant; 
16      out Height: OleVariant); safecall;
17    function WriteText(const AText: WideString; X: Double; Y: Double; 
18      Width: Double; Alignment: TPDFTextAlignment): Double; safecall;
19    function MeasureText(const AText: WideString; Width: Double): Double; safecall;
20    function Get_Angle: Double; safecall;
21    procedure Set_Angle(Value: Double); safecall;
22    function Get_LineSpacing: Double; safecall;
23    procedure Set_LineSpacing(Value: Double); safecall;
24    property Spacing: Double read Get_Spacing write Set_Spacing;
25    property WordSpacing: Double read Get_WordSpacing write Set_WordSpacing;
26    property Scaling: Double read Get_Scaling write Set_Scaling;
27    property RenderingMode: TPDFFontRenderingMode read Get_RenderingMode 
28      write Set_RenderingMode;
29    property Rise: Double read Get_Rise write Set_Rise;
30    property Angle: Double read Get_Angle write Set_Angle;
31    property LineSpacing: Double read Get_LineSpacing write Set_LineSpacing;
32  end;

Свойства интерфейса IPDFFont:

Имя	Тип	Доступ	Назначение
Angle	Double	Чтение/Запись
LineSpacing	Double	Чтение/Запись
RenderingMode	TPDFFontRenderingMode	Чтение/Запись
Rise	Double	Чтение/Запись
Scaling	Double	Чтение/Запись
Spacing	Double	Чтение/Запись
WordSpacing	Double	Чтение/Запись

Метод интерфейса IPDFFont.

1procedure IPDFFont.MeasureLine(const LineText: WideString; 
2  out Width: OleVariant; out Height: OleVariant);

Параметры:

Имя	Тип	Обязательно	Значение
LineText	WideString	Да
Width	OleVariant	Да
Height	OleVariant	Да

Метод интерфейса IPDFFont.

function IPDFFont.MeasureText(const AText: WideString; Width: Double): Double;

Параметры:

Имя	Тип	Обязательно	Значение
AText	WideString	Да
Width	Double	Да

Замечания:

Возвращает значение типа Double.

Метод интерфейса IPDFFont.

procedure IPDFFont.WriteLine(const LineText: WideString; X: Double; Y: Double);

Параметры:

Имя	Тип	Обязательно	Значение
LineText	WideString	Да
X	Double	Да
Y	Double	Да

Метод интерфейса IPDFFont.

1function IPDFFont.WriteText(const AText: WideString; X: Double; Y: Double; 
2  Width: Double; Alignment: TPDFTextAlignment): Double;

Параметры:

Имя	Тип	Обязательно	Значение
AText	WideString	Да
X	Double	Да
Y	Double	Да
Width	Double	Да
Alignment	TPDFTextAlignment	Да

Замечания:

Возвращает значение типа Double.