Add(MainForm,9034762,147,168)
{
 Left=20
 Top=105
 Width=569
 Height=335
 Caption="экспорт таблицы в .html"
 link(onCreate,1412200:doEnum,[])
}
Add(WebBrowser,7426802,539,245)
{
 Left=15
 Top=120
 Width=530
 Height=170
 URL=""
 Point(doFromText)
 Point(doPreview)
 Point(doPrint)
 Point(doSavePage)
}
Add(Button,6801642,448,280)
{
 Left=15
 Top=40
 Width=130
 Caption="Preview"
 link(onClick,7426802:doPreview,[])
}
Add(StrList,7598394,385,357)
{
 Strings=#44:<table border=1 cellspacing=4 cellpadding=5>|17:  <tr> <!-- 0 -->|59:    <th> Фамилия  <th>  Имя  <th>  Отчество  <th>  Телефон |
 Point(doInsert)
}
Add(DoData,5585387,385,273)
{
 link(onEventData,7426802:doFromText,[])
 link(Data,7598394:Text,[(391,256)(363,256)(363,418)(391,418)])
}
Add(Button,3908359,224,266)
{
 Left=15
 Top=15
 Width=130
 Caption="Export"
 link(onClick,6789582:doEnum,[])
}
Add(StringTable,3505863,287,203)
{
 Left=160
 Top=15
 Width=385
 Height=95
 Columns=#11:Фамилия=100|7:Имя=100|12:Отчество=100|10:Телефон=80|
 Grid=0
 Point(Strings)
 Point(Matrix)
}
Add(StrList,6987913,210,133)
{
 Strings=#28:Иванов;Иван;Иванович;2-30-96|28:Петров;Пётр;Петрович;2-40-97|35:Васильев;Василий;Васильевич;2-50-98|
}
Add(ArrayEnum,1412200,224,203)
{
 link(onItem,3505863:doAdd,[])
 link(Array,6987913:Array,[])
}
Add(Replace,13404008,252,357)
{
 SubStr=";"
 DestStr="<th> "
 link(onReplace,9400969:doString,[])
}
Add(ArrayEnum,6789582,301,266)
{
 link(onItem,13404008:doReplace,[(345,272)(345,327)(239,327)(239,363)])
 link(onEndEnum,5585387:doData,[])
 link(Array,3505863:Strings,[])
}
Add(FormatStr,9400969,301,357)
{
 Mask="<tr> <!-- %2 -->\n\r   <th>%1  "
 Point(FString)
 link(onFString,7598394:doAdd,[])
 link(Str2,6789582:Index,[])
}
Add(Button,11102688,448,322)
{
 Left=15
 Top=65
 Width=130
 Caption="Print"
 link(onClick,7426802:doPrint,[(510,328)(510,293)])
}
Add(Button,699188,448,364)
{
 Left=15
 Top=90
 Width=130
 Caption="Save"
 link(onClick,7426802:doSavePage,[(520,370)(520,300)])
}
Add(InfoTip,9899325,441,359)
{
 Info=#25:Вэб страница, только HTML|
 Font=[MS Sans Serif,8,1,255,1]
 VAlign=2
 Width=232
 Height=53
}
Add(InfoTip,12027127,126,63)
{
 Info=#0:|51:Пример печати и сохранения таблицы через WebBrowser|65:хотя сам WebBrowser можно скрыть :) и использовать его как буфер.|
 Font=[MS Sans Serif,12,1,16711680,1]
 Frame=3
 Width=575
 Height=375
}