Vectorworks 2012 Deprecated Functions. See InsertPropClassOrLayerItem for a replacement.
Inserts a class or layer item in the proposed section of a Class, Design Layer, or Sheet Layer Layout Manager Pull Down.
FUNCTION InsertProposedClassOrLayerItem(
nDialogID : LONGINT;
nComponentID : LONGINT;
strLabel : STRING;
nIconIndex : INTEGER): BOOLEAN;def vs.InsertProposedClassOrLayerItem(nDialogID, nComponentID, strLabel, nIconIndex):
return BOOLEAN| Name | Type | Description |
|---|---|---|
| nDialogID | LONGINT | |
| nComponentID | LONGINT | |
| strLabel | STRING | |
| nIconIndex | INTEGER |
PROCEDURE Example;
VAR
dialog1 :INTEGER;
result :INTEGER;
boo :BOOLEAN;
choiceNumber :INTEGER;
choiceString :STRING;
PROCEDURE Dialog_Handler(VAR item :LONGINT; data :LONGINT);
BEGIN
CASE item OF
SetupDialogC:
BEGIN
boo := InsertProposedClassOrLayerItem(dialog1, 4, 'New Class Name', 0);
END;
1:
BEGIN
GetSelChoice(4, 0, choiceNumber, choiceString);
AlrtDialog(Concat('choiceString: ', choiceString));
END;
END;
END;
BEGIN
dialog1 := CreateLayout('Example Dialog', FALSE, 'OK', 'Cancel');
CreateClassPullDownMenu(dialog1, 4, 24);
SetFirstLayoutItem(dialog1, 4);
result := RunLayoutDialog(dialog1, Dialog_Handler);
END;
RUN(Example);Availability: from VectorWorks13.0 Deprecated: Vectorworks 2012 Deprecated Functions