VS:SelChoice/ja

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

Description

リストアイテムにある項目の選択状態を設定します。

PROCEDURE SelChoice(
           item     :INTEGER;
           choice   :INTEGER;
           select   :BOOLEAN);

def vs.SelChoice(item, choice, select):
    return None

Parameters

item		INTEGER		リストアイテム番号
choice		INTEGER		項目番号
select		BOOLEAN		選択状態（TRUE：選択する／FALSE：選択しない）

Example

PROCEDURE Example;
VAR
   dialog1 :INTEGER;
   result  :INTEGER;
PROCEDURE Dialog_Handler(VAR item :LONGINT; data :LONGINT);
BEGIN
	IF item = SetUpDialogC THEN BEGIN
		InsertChoice(4, 0, 'One');
		InsertChoice(4, 1, 'Two');
		InsertChoice(4, 2, 'Three');
		SelChoice(4, 1, TRUE);
	END;
END;
BEGIN
   dialog1 := CreateLayout('Example Dialog', FALSE, 'OK', '');
   CreatePullDownMenu(dialog1, 4, 16);
   SetFirstLayoutItem(dialog1, 4);
   result := RunLayoutDialog(dialog1, Dialog_Handler);
END;
RUN(Example);

Version

SelChoice 廃止バージョン: Vectorworks 2010

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