Executes subfunctions within AutoText files by searching for comments

[Davider]

for #2 succeeded

    case EN_CHANGE<<16|3 sub.OnTextChanged lParam hDlg
 

Code:

Copy      Help

#sub OnTextChanged v
function hEdit hDlg

if(inERS) ret
if(ddl) ddl.Close; ddl=0
str s.getwintext(hEdit)
if(!s.len) ret
ICsv x._create
x.AddRow1(0 "0")
int i
for i 0 aList.len
,if(find(aList[i] s 0 1)<0) continue
,x.AddRow1(-1 aList[i])
if(!x.RowCount) ret
if(ShowDropdownList(x i 0 1 hEdit 0 0 0 ddl)&QMDDRET_SELOK=0) ret
s=x.Cell(i+1 0)
inERS=1
EditReplaceSel hEdit 0 s 1|2|4
DT_Ok hDlg
sub.DisableEnableAutoText(2 sdItems)
inERS=0

---

for #3 
It's a bit complicated