Можно на пальцах, что он делает?
Это Регулярные выражения.
http://habrahabr.ru/post/115825/ и много, много в гугле.
Соответственно ищет/заменяет/проверяет вхождение выражения в строку(строки). Это круче, чем строка в строке.
http://scanlibs.com/regulyarnyie-vyirazheniya-sbornik-retseptov-2-e-izdanie/
Мне нужна проверка на допустимые символы,
Тогда так RE_Check:
Add(MainForm,387580,336,112)
{
}
Add(Memo,14560805,609,189)
{
Left=20
Top=95
Width=350
Height=155
ScrollBars=2
link(Str,14564402:Var3,[(615,145)])
}
Add(Edit,13322556,483,77)
{
Left=25
Top=10
Width=350
Text="Edit<>?.,+енкегегшн"
}
Add(Button,3703179,364,259)
{
Left=25
Top=45
link(onClick,9117218:doCheck,[])
}
Add(RE_Check,9117218,483,259)
{
Expression="([^А-яё]+)"
link(onMatch,14560805:doAdd,[(562,265)(562,195)])
link(Str,14564402:Var2,[])
}
Add(GetDataEx,14564402,483,140)
{
link(Data,13322556:Text,[])
}
лучше указанных вручную, например "A-z0-9
Пишешь в поле Expression компонента, либо на верхнюю точку точку Expression из Memory(строка)
Add(MainForm,2953706,21,105)
{
}
Add(Edit,13322556,147,70)
{
Left=25
Top=10
Width=350
Text="Edit<>?.,+"
}
Add(Button,3703179,56,182)
{
Left=25
Top=45
link(onClick,5938971:doExec,[])
}
Add(Memory,15982831,196,70)
{
Default=String(([^А-яё]+))
}
Add(RE_Search,5938971,168,182)
{
ModifierS=1
link(onMatch,14560805:doAdd,[])
link(SourceStr,13322556:Text,[(174,142)(153,142)])
link(Expression,15982831:Value,[(181,142)(202,142)])
}
Add(Memo,14560805,294,182)
{
Left=20
Top=95
Width=350
Height=155
ScrollBars=2
}