Add(MainForm,9186855,28,112)
{
 Left=351
 Top=231
 Width=320
 Height=366
 Caption="Пример использования SMTP"
 BorderStyle=1
}
Add(SMTP,55446,147,217)
{
 Server=""
 Point(Attach)
 Point(Login)
 Point(Password)
 link(onSend,84847:doCompare,[])
 link(onStatus,3986548:doWork2,[])
 link(Server,4029781:Text,[])
 link(From,1985384:Text,[])
 link(To,8339053:Text,[])
 link(Subject,15270370:Text,[])
 link(Body,15273811:Text,[(181,187)(265,187)])
 link(Attach,5859768:Array,[(188,195)(384,195)])
}
Add(BitBtn,11076646,28,56)
{
 Left=155
 Top=300
 Width=70
 Height=25
 Font=[Arial,8,0,0,1]
 TabOrder=6
 FrameColor=-16777188
 Caption="Clear"
 Data=String()
 Bitmap=[ZIP3605000078DAED93CB0E82301045F1497C11880695A028442C481AAD8576EDDEFFFF1C9C6931BAD16860A737B98B7367A6B3995EAE45D7502AC0046C576E191B5DA8EACF2ACBB2117FA357F39FEEF9CFFFD67CDDFBB9D73EE979B7BFCEFD37F5CF9AB61083670921EC6312479EEB589635D59C9138741D081CE419A3187810683ED32C21910A90E705A3F70EE485E40C3B62CF75917D99F3930A424F3304EACD28425E49081874101222AFA50E4EC7FD123940969CD3C978F86059A4EDAED102DE699607B3D71158CFB9526A8E84E22D2808B67E1FE90648799B6D]
 link(onClick,10377:doEvent1,[])
}
Add(If_else,12664653,420,161)
{
 Type=1
 Op2=Integer(0)
 link(onTrue,7907887:doExecute,[(468,167)(468,130)(300,130)(300,146)])
 link(onFalse,13079428:doMessage,[])
 link(Op1,12517860:Var2,[])
}
Add(Memo,15273811,259,105)
{
 Left=15
 Top=165
 Width=285
 Height=125
 Hint="Письмо"
 ScrollBars=3
}
Add(Message,13079428,469,168)
{
 Message="Удалить этот файл из списка ?"
 Caption="Confirmation"
 Type=2
 Point(onYES)
 link(onYES,8444837:doData,[])
}
Add(If_else,84847,364,217)
{
 Type=5
 Op2=String()
 link(onTrue,94987:doMessage,[])
 link(onFalse,56539:doMessage,[])
}
Add(Message,94987,469,217)
{
 Caption="Mail Error"
 Icon=1
}
Add(StatusBar,5785124,308,224)
{
}
Add(GetDataEx,12517860,413,140)
{
 Angle=3
 link(Data,5859768:Index,[(407,149)(407,195)(391,195)])
}
Add(Hub,10377,84,56)
{
 OutCount=4
 link(onEvent1,4029781:doText,[(132,62)(132,27)])
 link(onEvent2,1985384:doText,[])
 link(onEvent3,8339053:doText,[(138,76)(138,111)])
 link(onEvent4,15270370:doText,[(132,83)(132,153)])
}
Add(DoData,8444837,518,175)
{
 link(onEventData,5859768:doDelete,[(563,181)(563,211)(352,211)(352,160)])
 link(Data,12517860:Var3,[(524,149)])
}
Add(BitBtn,15775656,28,210)
{
 Left=230
 Top=300
 Width=70
 Height=25
 Font=[Arial,8,0,0,1]
 TabOrder=5
 FrameColor=-16777188
 Caption="Send"
 Bitmap=[ZIP3610000078DA73F235636100033320D600620128666450804840E591C1FFFFFF19C80570BDE13721B4D72E0606F74D0C0CAE6B21B4D74E20DEC1C0E0B18581C165250383CD740606F34E885A8B6E8441A97F2074C27B044EFEC110171707C6C1C1C10CAEAE6E0C5656D60CC6C6C60C5A9AEA0CC2C242600C02F295FF19244BFFC3D920AC55FF1FACF7CC9933607782E8850B1731747676316467A781CD84E9B7EEFCCF60DE0ED10FA3418058FB03A7FF67F09DF29FC16B1244EF85BB77E1FA89B13F6406C2CEA953A782F58330B1F6C3C027A03D200CD20B328758FB6DECECE17A91CD20D67E74BD300C0B8399336782F58300483F880F328398B487AC1F663F880FB21BA41F86418031FD3FDC3DB07084B91FA4078661EE47D68FEC16747F60F33F2CFDE33283D8FC83CB0C8E6C209DF61F9C0FF0A9C56706217B40D8DC9C1319989B9B0B1868AA294B8909F2F1F10943F83A1A6A4A6282400141105FC4480F2420051480F08DF574343594C10220BEB899911E4C05882F6161620452A126252606E2CB58989A18820594A4207CA000D84C6565105FD60228600454A1A1A104E2CB5940040C0DD425417C7910DFC2C4448F97870BC1B730D36262616004F255217C0B6D7656667390BCA9091868B1739B83F98A40202FAF28C306E2911AAEA378148FE2E18B099597E494C5A4D90D2FB5B160843CADEC6EC0E9064C795AD80DC3A86EC02D3F1CFC8F3FFE19E812FF10FB71DB87EE1EDAD98F3BBC91E5696B3FA1F4383CFD8F2F3D0ED6F2781453860186C8B4EA]
 link(onClick,8915623:doEvent1,[])
}
Add(Label,50883,210,63)
{
 Left=15
 Top=30
 Font=[Arial,8,0,0,1]
 Caption="From"
}
Add(Message,56539,420,224)
{
 Message="Письмо отправлено!"
 Caption="Mail Ok"
 Icon=4
}
Add(ListBox,5859768,364,140)
{
 Left=15
 Top=110
 Width=285
 Height=50
 Hint="Файлы"
 Point(onDblClick)
 Point(Index)
 link(onDblClick,12664653:doCompare,[(402,160)(402,167)])
}
Add(ODialog,7907887,308,140)
{
 Title="Add File to Attach"
 Select=1
 link(onExecute,5859768:doAdd,[])
}
Add(Hub,8915623,84,210)
{
 link(onEvent1,3986548:doWork1,[(214,216)])
 link(onEvent2,55446:doSend,[])
}
Add(HubEx,3986548,210,217)
{
 link(onEvent,5785124:doText,[])
}
Add(Label,80021,210,21)
{
 Left=15
 Top=10
 Font=[Arial,8,0,0,1]
 Caption="Server"
}
Add(Label,82794,210,147)
{
 Left=15
 Top=70
 Font=[Arial,8,0,0,1]
 Caption="Subject"
}
Add(Label,33486,210,105)
{
 Left=15
 Top=50
 Font=[Arial,8,0,0,1]
 Caption="To"
}
Add(Edit,4029781,147,21)
{
 Left=70
 Top=5
 Width=235
 Height=19
 Color=-16777188
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 Text="smtp.mail.ru"
}
Add(Edit,1985384,154,63)
{
 Left=70
 Top=26
 Width=235
 Height=19
 Font=[Arial,8,0,0,1]
 TabOrder=1
 Ctl3D=1
 Text="hiasm@mail.ru"
}
Add(Edit,8339053,161,105)
{
 Left=70
 Top=47
 Width=235
 Height=19
 Font=[Arial,8,0,0,1]
 TabOrder=2
 Ctl3D=1
 Text="hiasm@mail.ru"
}
Add(Edit,15270370,168,147)
{
 Left=70
 Top=68
 Width=235
 Height=19
 Font=[Arial,8,0,0,1]
 TabOrder=3
 Ctl3D=1
 Text="HiAsm"
}