VS:FormatTextDialog/ja

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

文字の種類や位置揃え等を設定するためのダイアログを表示し、その内容を返します。

PROCEDURE FormatTextDialog(
              VAR fontName     :STRING;
              VAR style        :INTEGER;
              VAR size         :REAL;
              VAR spacing      :INTEGER;
              VAR leading      :REAL;
              VAR hAlignment   :INTEGER;
              VAR vAlignment   :INTEGER;
              disableMask      :INTEGER);

def vs.FormatTextDialog(fontName, style, size, spacing, leading, hAlignment, vAlignment, disableMask):
    return (fontName, style, size, spacing, leading, hAlignment, vAlignment)

Parameters

fontName		STRING		フォント
style		INTEGER		スタイル（0：標準／1：ボールド／2：イタリック／3：）
size		REAL		サイズ（ポイント）
spacing		INTEGER		行間（0：全角／2：倍角／3：1.5角／4：指定）
leading		REAL		リーディング
hAlignment		INTEGER		水平位置揃え（1：左よせ／2：センタ／3：右よせ）
vAlignment		INTEGER		垂直位置揃え（1：上揃え／2：ベースライン揃え／3：センタ／4：英字下揃え／5：下揃え）
disableMask		INTEGER		常に0を入れる

Example

PROCEDURE Example;
VAR 
	font    :STRING; 
	style   :INTEGER;
	size    :REAL;
	spacing :INTEGER; 
	leading :REAL;
	hAlign  :INTEGER;
	vAlign  :INTEGER;
	disable :INTEGER;
BEGIN
	{Set some dialog defaults.}
	font := 'Arial';
	style := 1;
	size := 12;
	spacing := 2;

	{Bit values for disableMask: 
         1: font
         2: size
         4: spacing
         8: style
        16: hAlign
        32: vAlign}
	disable := 32;

	{Now get the user's selections.}
	FormatTextDialog(font, style, size, spacing, leading, hAlign, vAlign, disable);
END;
RUN(Example);

Version

利用可能バージョン: VectorWorks9.0