Add(MainForm,4555932,231,210)
{
 Caption="RichEdit 4ever"
}
Add(RichEdit,2397271,273,217)
{
 Left=160
 Top=105
 Width=225
 Height=160
 Align=5
 Font=[Courier New,12,0,0,204]
 Strings=#8:********|8:*FORMAT*|8:********|
 Point(doAddBitmap)
}
Add(Button,6749255,189,245)
{
 Left=230
 Top=290
 Align=4
 Caption="Save to file"
 link(onClick,1:doExecute,[])
}
Add(SDialog,1,231,245)
{
 Filter="Rich Text|*.rtf"
 Title="Save formatted text"
 FileName="RichTextTest"
 link(onExecute,2397271:doSave,[])
}

Add(MainForm,2953706,21,105)
{
 Height=555
 link(onCreate,6351600:doLength,[(139,125)(139,167)])
}
Add(FormatStr,15264129,588,252)
{
 DataCount=3
 Mask=":%1:
:%2:
:%3:"
 link(onFString,6403053:doAdd,[])
 link(Str1,10477323:Var3,[(594,131)])
 link(Str2,16291871:Var3,[(601,145)])
 link(Str3,12174240:Var1,[(608,178)(431,178)(431,103)])
}
Add(Memory,8797308,224,98)
{
 Default=String(Купить)
}
Add(Length,6351600,224,161)
{
 link(onLength,13909590:doFor,[])
 link(Str,16291871:Var2,[])
}
Add(For,13909590,357,161)
{
 Start=1
 link(onEvent,16319822:doStrCat,[])
 link(onStop,15264129:doString,[(489,174)(489,258)])
 link(End,6351600:Result,[(370,149)(300,149)(300,205)(230,205)])
}
Add(Memory,3409448,434,56)
{
}
Add(StrCat,16319822,427,161)
{
 Str2=":"
 link(onStrCat,3409448:doValue,[(471,167)(471,115)(422,115)(422,62)])
 link(Str1,10477323:Var2,[])
}
Add(GetDataEx,12174240,434,98)
{
 link(Data,3409448:Value,[])
}
Add(GetDataEx,16291871,224,140)
{
 link(Data,8797308:Value,[])
}
Add(GetDataEx,10477323,427,126)
{
 link(Data,12174240:Var2,[(433,125)(440,125)])
}
Add(Memo,6403053,693,252)
{
 Left=70
 Top=70
 Width=290
 Height=250
 Font=[Consolas,10,1,0,204]
}