Page History

...

     Begin_Com Role(*EXTENDS #PRIM_WEB) 

        Define_Com Class(#PRIM_MD.ActionButton) Name(#OK) DisplayPosition(1) Left(206) Parent(#COM_OWNER) TabPosition(1) Top(128) ButtonDefault(True) Icon('check')
        Define_Com Class(#PRIM_MD.ActionButton) Name(#Cancel) DisplayPosition(2) Left(303) Parent(#COM_OWNER) TabPosition(2) Top(128) ButtonCancel(True) Icon('close') 

        Evtroutine Handling(#OK.Click) 
  
           #sys_web.Alert( "OK" ) 

        Endroutine 

        Evtroutine Handling(#Cancel.Click) 

           #sys_web.Alert( "Cancel" ) 

        Endroutine 

     End_Com

See also

All Component Classes

Technical Reference