Add(MainForm,13061675,644,497)
{
 Width=731
 Height=559
}
Add(Timer,4702226,567,616)
{
 Interval=200
 link(onTimer,1245350:doNext,[])
}
Add(CounterEx,1245350,658,616)
{
 link(onNext,16386624:doCompare,[(709,622)(709,615)])
}
Add(Memo,3767594,791,616)
{
 Left=525
 Top=80
 Width=170
 Height=425
 Font=[MS Sans Serif,14,0,0,1]
 AddType=1
}
Add(Edit,1928499,665,679)
{
 Left=245
 Top=325
 link(onEnter,16386624:doMask,[(723,692)(723,622)])
}
Add(StrMask,16386624,728,609)
{
 Mask="*"
 CaseSensitive=0
 Point(doMask)
 link(onTrue,3767594:doAdd,[])
 AddHint(11,-29,19,13,Mask)
}