TEXT TO mtekst1 noshow && samo da napuni tabelu tj memo polje First line : <#m._str1#> Second line: <#m._str2#> and then again <#m._str10#><#m._str9#> and <#m._str8#><#m._str7#> for the end Third line: <#m._str16#><#m._str15#> ENDTEXTYou can also have a UDF, which would get a comma separated list of variable names and return their values, then template would be recursive and look like:
Clear Local lcTemplate, lcSeparator m.lcSeparator = Chr(13)+Chr(10) TEXT to m.lcTemplate -------------------------- My template result is: << myUDF('m.str1, m.str2, m.str3', m.lcSeparator) >> -------------------------- ENDTEXT ? Textmerge(m.lcTemplate,.T.) Procedure myUDF(tcParms, tcSeparator) Local str1, str2, str3 m.str1 = "a" m.str2 = Datetime() m.str3 = 3 Local ix, lcReturn lcReturn='' For ix=1 To Alines(laParm,m.tcParms,1+4+8,',') m.lcReturn = m.lcReturn + ; Iif(Empty(m.lcReturn),'',m.tcSeparator) + ; Textmerge("<< Evaluate(laParm[m.ix]) >>") Endfor Return m.lcReturn EndprocPS: I see you are ignoring the "important" m. (dot) prefix.