Alextven писал(а):
Помогите.Так пойдёт?
Add(MainForm,2953706,21,105)
{
Width=525
Height=291
}
Add(Button,5902944,329,175)
{
Left=335
Top=225
Caption="Печать"
link(onClick,11234646:doPreview,[(377,181)(377,160)])
}
Add(WebBrowser,11234646,448,112)
{
Left=5
Top=5
Width=500
Height=215
Point(doFromText)
Point(doPrint)
Point(doPreview)
}
Add(FormatStr,8924692,329,140)
{
DataCount=1
Mask="<CENTER><img src="%1"></CENTER>"
link(onFString,11234646:doFromText,[])
link(Str1,3100728:Value,[])
}
Add(Memory,3100728,329,91)
{
link(onData,8924692:doString,[(371,97)(371,130)(317,130)(317,146)])
}
Add(Button,11795119,196,91)
{
Left=75
Top=225
Width=115
Caption="Вставить картинку"
link(onClick,9526743:doExecute,[])
}
Add(ODialog,9526743,259,91)
{
Filter="Image|*.jpg;*.png;*.bmp;*.ico"
link(onExecute,3100728:doValue,[])
}