VS:AddListBoxTabStop

From Vectorworks Developer
Revision as of 10:25, 12 August 2013 by Root (Talk | contribs)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

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

Description

Adds a tab stop to a Layout Manager list box. The last parameter is the tab stop, in characters. This function should be called in the dialog handler, as opposed to the dialog definition procedure. This function will clear all data in the list control.
PROCEDURE AddListBoxTabStop(
dialogID  :LONGINT;
itemID  :LONGINT;
tabStop  :INTEGER);
def vs.AddListBoxTabStop(dialogID, itemID, tabStop):
    return None

Parameters

dialogID LONGINT ID of the dialog
itemID LONGINT ID of the list box
tabStop INTEGER The tab stop, in characters

Remarks

The last parameter is the tab stop, in characters. This function should be called in the dialog handler, as opposed to the dialog definition procedure. This function will clear all data in the list control.

To insert choices into a list box that has tab stops, add tabs to the string to separate the values.

Example

VectorScript

PROCEDURE Example;
VAR

    dialog1 :INTEGER;
    result  :INTEGER;

    PROCEDURE Dialog_Handler(VAR item :LONGINT; data :LONGINT);
    BEGIN
        CASE item OF
            SetupDialogC:
            BEGIN
    
                AddListBoxTabStop( dialog1, 4, 10 );
                AddChoice( dialog1, 4, concat( 'choice A', chr(9), 'A2' ), 0 );
                AddChoice( dialog1, 4, concat( 'choice B', chr(9), 'B2' ), 0 );
                AddChoice( dialog1, 4, concat( 'choice C', chr(9), 'C2' ), 0 );
                AddChoice( dialog1, 4, concat( 'choice D', chr(9), 'D2' ), 0 );
                AddChoice( dialog1, 4, concat( 'choice E', chr(9), 'E2' ), 0 );
                
            END;

            4:
            BEGIN
                AlrtDialog( 'selected' );
            END;
        END;
    END;

BEGIN

    dialog1 := CreateLayout( 'CreateListBox', FALSE, 'OK', 'Cancel' );

    CreateListBox( dialog1, 4, 30, 10 );
    
    SetFirstLayoutItem( dialog1, 4 );

    result := RunLayoutDialog(dialog1, Dialog_Handler);

END;

RUN(Example);

Python

def Dialog_Handler(item, data):
	if item == SetupDialogC:
		vs.AddListBoxTabStop( dialog1, 4, 10 );
		vs.AddChoice( dialog1, 4, vs.Concat( 'choice A', vs.Chr(9), 'A2' ), 0 );
		vs.AddChoice( dialog1, 4, vs.Concat( 'choice B', vs.Chr(9), 'B2' ), 0 );
		vs.AddChoice( dialog1, 4, vs.Concat( 'choice C', vs.Chr(9), 'C2' ), 0 );
		vs.AddChoice( dialog1, 4, vs.Concat( 'choice D', vs.Chr(9), 'D2' ), 0 );
		vs.AddChoice( dialog1, 4, vs.Concat( 'choice E', vs.Chr(9), 'E2' ), 0 );
	elif item == 4:
		vs.AlrtDialog( 'selected' );

def Example():
	global dialog1, result, SetupDialogC
	SetupDialogC = 12255
	dialog1 = vs.CreateLayout( 'CreateListBox', 0, 'OK', 'Cancel' );
	vs.CreateListBox( dialog1, 4, 30, 10 );  
	vs.SetFirstLayoutItem( dialog1, 4 );
	result = vs.RunLayoutDialog(dialog1, Dialog_Handler);

Example()

Version

Availability: from VectorWorks10.0

See Also

VS Functions:

VS:RemoveListBoxTabStop

VS Functions: [[VS:RemoveListBoxTabStop]]
Personal tools
NamespacesFFFF

Variants
Actions
Advanced Search
See Also
Navigation
Toolbox