How to create vertical scroll bar for window

hello everyone I have created a window using  hwt::CreateWindow win

I have added only one row now to reduce size of Quote. Number of rows in actual script are in loop so my number of rows sometimes exceeds 100. So I need scroll to window.

So how can I add scroll to it

And I seardched for  hwt::CreateWindow win help for all pther commands help is easily available in HM  help but I didnt find any help related to these commands, So anybody direct me to proper help for hwt commands and specifically  hwt::CreateWindow win

proc ::compQuery::window {} {
    variable str_slave;
    variable str_master1 '';
    variable str_master2 '';
    variable str_master3 '';
    variable str_master4 '';
    variable str_master5 '';
    variable str_master6 '';
    variable str_master7 '';
    variable str_master8 '';
    variable e1; 
    variable e2;
    variable l1; 
    variable l2;
    variable e3;
    variable l3; 
    variable e4;
    variable l4; 
    variable e5;
    variable l5;
    variable e6;
    variable l6;
    variable e7;
    variable l7;
    variable e8;
    variable l8;
    variable ang_incr;
    variable def_val;

 

    set dlgWidth  [ hwt::DluWidth 100 [ hwt::AppFont ]];
    set dlgHeight [ hwt::DluHeight  250 [ hwt::AppFont ]];

    set min_dlgWidth  [ hwt::DluWidth  250 [ hwt::AppFont ]];
    set min_dlgHeight [ hwt::DluHeight  200 [ hwt::AppFont ]];

    hwt::CreateWindow win \
        -minsize 200 100\
        -maxsize 2000 2000 \
        -noGeometrySaving \
        -geometry ${dlgWidth}x${dlgHeight} \
        -cancelButton Cancel \
        -defaultButton Cancel \
        -acceptButton Accept \
        -minSize $min_dlgWidth $min_dlgHeight \
        -acceptFunc '::compQuery::GetcompVar' \
        -cancelFunc '::compQuery::Cancel_func' \
        -windowtitle 'Stress contour capture script' \
        -post;

    #Create recess to hold frames
    set recess [hwt::WindowRecess win];
        

    grid columnconfigure $recess 1 -weight 1 ;

    set l1 [::hwtk::label $recess.l1 -text 'Evaluation criteria for Max principal stress:']
    set e1 [::hwtk::entry $recess.e1 -width 200 -takefocus 1 -help 'Entered value is max limit above this shown as grey colour' -textvariable  ::compQuery::str_master1];
    grid $l1 -row 1 -col 0 -sticky w -padx 4 -pady 4;
    grid $e1 -row 1 -col 1 -sticky e -padx 4 -pady 4;
    #default value $recess.e1 set 315;

  
    hwt::KeepOnTop win
   }