VS:GetEditReal/ja

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

Description

実数型の編集フィールドに入力されている実数値を返します。

FUNCTION GetEditReal(
           dialogID       :LONGINT;
           itemID         :LONGINT;
           editRealType   :LONGINT;
           VAR value      :REAL) : BOOLEAN;

def vs.GetEditReal(dialogID, itemID, editRealType):
    return (BOOLEAN, value)

Parameters

dialogID		LONGINT		ダイアログ番号
itemID		LONGINT		実数型の編集フィールドアイテム番号
editRealType		LONGINT		数値タイプ
value		REAL		実数値

Return Value

正しく取得できた場合はTRUEを返します。

Example

PROCEDURE Dialog_Handler(var item :LONGINT; data :LONGINT);

PROCEDURE InvalidValue(controlID :INTEGER);
BEGIN
	item := -1;
	SelField(controlID);
	SysBeep;
END;

BEGIN
	CASE item OF
	     	SetupDialogC: SetEditReal(dialogID, 11, 3, elevation);
     		1: IF NOT(GetEditReal(dialogID, 11, 3, elevation)) 
                 THEN InvalidValue(11);
	END;
END;

Version

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