Hi Adrian,
May be you could use replaceText:
on mouseUp
local tFindStr,tRepStr,tText,tHtml,tCanReplace
-----
put fld "edtFind" into tFindStr
put fld "edtReplace" into tRepStr
put fld "edtText" into tText
put the htmlText of fld "edtText" into tHtml
-----
put CanReplace(tFindStr,tRepStr,tText) into tCanReplace --
if tCanReplace then
set the htmlText of fld "edtText" to replaceText
(tHtml,tFindStr,tRepStr)
else answer tCanReplace
end mouseUp
---------------------------------
function CanReplace tFindStr,tRepStr,tText
if tFindStr = empty then return "Find string is empty."
if tRepStr = empty then return "Replace string is empty."
if tText = empty then return "Text is empty."
if tFindStr is not in tText then return "Could not find find string."
return true
end CanReplace
Best Regards from Paris,
Eric Chatonet
Le 18 nov. 06 à 09:46, Adrian Williams a écrit :
Herschel,
This works fine if the only word in the "edtText" field matches the
"edtReplace" field.
But if there are ANY other words at all in "edtText", nothing gets
replaced.
So how can Replace be made to actually replace all instances?
Should this be Replace Text rather than Replace field?
Thanks,
Adrian
On 16 Nov 2006, at 21:24, Hershel Fisch wrote:
On 11/16/06 12:22 PM, "Adrian Williams" <[EMAIL PROTECTED]>
wrote:
SCRIPT: FIND BUTTON
on mouseUp
--set text of field "edtReplace" to ""
Put "" into fld "edtReplace"
--put text of field "edtFind" into tFindText
-- find string tFindText in field "edtText"
Find fld "edtFind" in fld "edtText"
end mouseUp
SCRIPT: REPLACE BUTTON
on mouseUp
--get the htmlText of field "edtText"
--replace text of field "edtFind" with text of field
"edtReplace" in it
Replace fld "edtFind" with fld "edtReplace" in fld edtText"
--set the htmlText of field "edtText" to it
end mouseUp
Whell this is my version ? Hershel
Thanks,
Adrian
______________________
Club Type
http://www.clubtype.co.uk
[EMAIL PROTECTED]
------------------------------------------------------------------------
----------------------
http://www.sosmartsoftware.com/ [EMAIL PROTECTED]/
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
