Widget Groups

[Thomas Wagensommerer 53]

"Widget Groups - Say goodbye to endless scrolling that creates a long and tedious workflow. We now offer widget groups in the Object Info palette that allow you to collapse and expand specific groups according to your preferences."

 

Are these accessible by vector script? Where can I find documentation?

Edited October 30, 2019 by Thomas Wagensommerer

[Peter Vandewalle 20]

They are available for Vectorscript and Python. But only on action-driven PIO's.

You also need to add the parameters in the order they need to appear and with the necessary indents:

 

You'll need some extra lines in the event section of the script. I also run a procedure in that part: "object_info_palet". This one holds some extra procedures to create the parameters and separators with the needed indentation. Hope this helps:

 

CASE theEvent OF
        kOnInitPropertiesEventID:
            BEGIN
                bTest := SetObjPropCharVS(kWidgetGroupMode, Chr(kWidgetGroupAutomatic));
                object_info_palet;
            END;

...

function insert_separator(liID: integer; lsPIOName, lsParameter: string; liIndent: integer): integer;
    var
        lbResult:    boolean;
        lsTmp:    string;
    begin
        lbResult := GetLocalizedPluginParameter(lsPIOName, lsParameter, lsTmp);
        if lbResult then begin
            lbResult := vsoAddWidget(liID, 100, lsTmp);
            lbResult := vsoAppendWidget(100, liID, lsTmp, 0);
            vsoWidgetSetIndLvl(liID, liIndent);
        end;
        insert_separator := liID+1;
    end;

function insert_parameter(liID: integer; lsPIOName, lsParameter: string; liIndent: integer): integer;
    var
        lbResult:    boolean;
        lsTmp:    string;
    begin
        lbResult := GetLocalizedPluginParameter(lsPIOName, lsParameter, lsTmp);
        if lbResult then begin
            lbResult := vsoAddParamWidget(liID, lsParameter, '');
            lbResult := vsoAppendParamWidget(liID, lsTmp, 0);
            vsoWidgetSetIndLvl(liID, liIndent);
        end;
        insert_parameter := liID+1;
    end;

 

procedure object_info_palet;
    var
        liID:    integer;
    begin
        liID := 100;
        liID := insert_separator(liID, sPIOName, 'chGlobal', 0);
        liID := insert_parameter(liID, sPIOName, 'ObjType', 1);

        
        liID := insert_separator(liID, sPIOName, 'ch3D', 0);
        liID := insert_parameter(liID, sPIOName, 'DivSymbol3D', 1);

        ...

   end;