Using build 807
Help
- Code: Select all Expand view
DEFINE FONT oFont7 NAME "Ms Sans Serif" SIZE 0,-12 //BOLD
DEFINE DIALOG ODLG1 RESOURCE "newexp_2" FONT OFONT7
REDEFINE RADIO oRadmenu var oCbx1 ;
ID 19,20,21,22,23 OF ODLG1 On change(nYeaOrNay := oCbx1,instructions(oDlg1))
REDEFINE BTNBMP oBmp ID 137 OF ODLG1 file "TESTBMP2.BMP"
REDEFINE BUTTON ID 4002 OF oDlg1 ACTION (nYeaOrNay := 7,oDlg1:end())