Using TSButton in a button bar, I usually do this:
Code: Select all
Define SButton oBtnS Name "SAIR38","SAIR38" Of oBar ;
Message "Sair do Sistema" NoBorder ToolTip "Sair do Sistema" ;
Color nRgb(0,0,0),{CLR_WHITE,CLR_FIM,1} W97 ACTION oWnd:End()
oBtnS:nLeft:=oBar:nWidth-45
oBar:bResized:={||oBtnS:nLeft:=oBar:nWidth-45}
Regards,