... or simply with a fontchange DEFINE FONT oFont1 NAME "TAHOMA" SIZE 0,-14 DEFINE FONT oFont2 NAME "TAHOMA" SIZE 0,-14 UNDERLINE @ 10,10 COMBOBOX oCbx VAR nVar Items aType Size 50,40 PIXEL of oDlg ; on CHANGE ( IIF( nVar=1, ( nRow-=12, oSay[1]:SetFont (oFont1 )), ( nRow+=12, ...