Open Text editor, send Text and return changed Text
As Text editor
As RTF editor
declare=clform=ue_form
clform.s_parm1=<test>
// clform.s_parm2=window title
// clform.s_parm5=rtf
clform.psr=system_textedit
clform.showdialog
if <clform.ret_code> n= 1 then
form.mode=update
if <form.mode> n<= 1 then
return failure
end if
messagebox=<clform.ret_text>
end if
destroy=clform
Property
|
Description
|
s_parm1
|
Text, which you want edit (or empty, if new text)
|
s_parm2
|
Title
|
s_parm5
|
empty: normal text
RTF: edit as RTF text
if you send normal text, the system convert it autoamtically to RTF text and return the text in RTF format
|
|
|