ocr: Paradox for Windows Eile Edit Language Debug Properties Window Help XED SE 2 - - INCSRCHEFIcidrtopen' EE nethod open(var eventinfo Event) Design: : INCSRCH.FSL" - doDefault unobject u1.attach(Nane) Name tot find srchField : "Hane" gnorecaseinLocate(ves) Street Lity endHethod CUSTOMERStreet 1A301 CUSTOMER.CHYIAT Edt Lines - Coli INCSACHEHField/-keyPhysical nethod keyPhysical(uar eventinfo Keytvent) - INCSACHEHFieldT:Ver doverauit if eventinfo.chard o Uar ui srchField string urobject if not eventinfo.char0 ul.locaterattern(srchfield, - : a and then self.value * :") then enduar beepo ui.novelo0) ...
