On Jun 11, 2006, at 4:54 PM, Mark Nutter wrote:
dim rg as RegEx
dim SearchResult As RegExMatch
rg = New RegEx
rg.SearchPattern = EditField2.text
rg.ReplacementPattern = EditField3.Text
rg.Options.ReplaceAllMatches = true // If this is set to
FALSE
only the second Match is replaced
SearchResult = rg.Search(EditField1.text)
// or call SearchResult = rg.Replace(EditField1.Text)
if SearchResult <> nil then
EditField1.Text = ""
EditField1.AppendText rg.Replace
or call EditField1.AppendText
rg.Replace(EditField1.Text)
end if
Use either of the above fixes and it should work.
Mark Nutter
Hi, and thx for your reply..
If tested this in my real project: return rg.Replace(TextWindow(window
(i)).TextField.Text,0)
And then it works ...
Regards,
Sven E
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
