Hi
This is a simple tool to play with regular expressions related with harbour functions, I hope can help.
Show the return value of harbour functions while typing the regular expression.
Thee is a file with samples. You can find more samples in http://www.regexlib.com" onclick="window.open(this.href);return false;" onclick="window.open(this.href);return false;
Regular Expression or Regex
Moderator: Rathinagiri
-
- Posts: 245
- Joined: Sat Aug 02, 2008 5:03 pm
Re: Regular Expression or Regex
- Attachments
-
- regextool.zip
- simple regex tool
- (883.77 KiB) Downloaded 311 times
Regards/Saludos, Carlos (bcd12a)
- Rathinagiri
- Posts: 5471
- Joined: Tue Jul 29, 2008 6:30 pm
- DBs Used: MariaDB, SQLite, SQLCipher and MySQL
- Location: Sivakasi, India
- Contact:
Re: Regular Expression or Regex
Thanks a lot. I think it will be very much useful in data validation.
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
Re: Regular Expression or Regex
I tried to capture all the function called from a prg from notepad++ using the regular expression :
\w*\s*\(.*\)
i got most of the functions but i also got :
- ( &cField) .... from the as part of cAlias->( &cField)
- CHR(32) + CHR(179) + CHR(32) .... from this line : #define COLSEP CHR(32) + CHR(179) + CHR(32)
- MSetcursor( .F.) ... from a commented line : * MSetcursor( .F.)
- DBUSEAREA( .T., "DbfNtx", "testn" ) ... from a commented line : // DBUSEAREA( .T., "DbfNtx", "testn" )
- addColumn( oColumn ) ... from an object method : b:addColumn( oColumn )
- IF ( b:hitTop .OR. b:hitBottom )
- IF(cGetClr == NIL, "I", cGetClr)
- (lFound := DBSEEK( xKey, lSoftSeek )) from : IF !(lFound := DBSEEK( xKey, lSoftSeek ))
what have i done wrong ? pls advice !
Thank you !![Wink ;)](./images/smilies/icon_e_wink.gif)
\w*\s*\(.*\)
i got most of the functions but i also got :
- ( &cField) .... from the as part of cAlias->( &cField)
- CHR(32) + CHR(179) + CHR(32) .... from this line : #define COLSEP CHR(32) + CHR(179) + CHR(32)
- MSetcursor( .F.) ... from a commented line : * MSetcursor( .F.)
- DBUSEAREA( .T., "DbfNtx", "testn" ) ... from a commented line : // DBUSEAREA( .T., "DbfNtx", "testn" )
- addColumn( oColumn ) ... from an object method : b:addColumn( oColumn )
- IF ( b:hitTop .OR. b:hitBottom )
- IF(cGetClr == NIL, "I", cGetClr)
- (lFound := DBSEEK( xKey, lSoftSeek )) from : IF !(lFound := DBSEEK( xKey, lSoftSeek ))
what have i done wrong ? pls advice !
Thank you !
![Wink ;)](./images/smilies/icon_e_wink.gif)
Just Hmg It !