Re: [Harbour] hb_rexexlike and hb_regexhas not work

2010-05-20 Thread Przemysław Czerpak
On Thu, 20 May 2010, Adam Lubszczyk wrote: Hi! > Try sample: > > FUNCTION main() > LOCAL reg := hb_regexcomp(".*B.*") > LOCAL cText := "ABC" > LOCAL x > ? hb_regexlike(reg,cText) > ? hb_regexhas(reg,cText) > IF VALTYPE(x:=hb_regex(reg,cText)) =

[Harbour] hb_rexexlike and hb_regexhas not work

2010-05-20 Thread Adam Lubszczyk
Hi! Try sample: FUNCTION main() LOCAL reg := hb_regexcomp(".*B.*") LOCAL cText := "ABC" LOCAL x ? hb_regexlike(reg,cText) ? hb_regexhas(reg,cText) IF VALTYPE(x:=hb_regex(reg,cText)) == "A" ? "FOUND:",x[1] ENDIF RETURN nil ***