Hi,
Run this code from the SAMPLE FiveWin folder and view the result in the checkres.txt file.
Regards,
RodMG
Run this code from the SAMPLE FiveWin folder and view the result in the checkres.txt file.
#include "fivewin.ch"
#include 'xbrowse.ch'
Function Main()
local oWnd, oDbCustomer, oBrw
ferase("checkres.txt")
use customer
DATABASE oDbCustomer
define window oWnd
@ 0,0 XBROWSE oBrw OF oWnd ;
FIELDS 'FIRST', 'LAST', 'STREET' OBJECT oDbCustomer;
LINES CELL FASTEDIT NOBORDER
oBrw:CreateFromCode()
oWnd:oClient := oBrw
oBrw:Adjust()
activate window oWnd
checkRes()
return nilRegards,
RodMG