спасибо за инфу
------------ Дoбавленo в 19.44:
хм ... можно пример тогда? это не работает:
Add(MainForm,2953706,59,91)
{
@Hint=#38:чтение оформления текста из rtf -файла|38:и перевод этого оформления в html-тэги|15:ajaxii@mail.ru |
Width=864
Height=860
AddHint(-29,84,183,65,@Hint)
}
Add(RichEdit,13050883,196,91)
{
@Hint=#23:читаем rtf и оформление|
Left=10
Top=445
Width=805
Height=300
Color=-16777201
ModeSp=2
ColorSp=12639424
MinOwn=100
MinRest=500
ScrollBars=3
ReadOnly=0
CanDragOle=1
Point(RichEdit)
link(onChange,2974940:doText,[(429,97)(429,342)])
AddHint(50,-66,139,13,@Hint)
}
Add(Edit,3880661,217,406)
{
Left=15
Top=5
Width=700
link(onChange,469818:doEvent1,[(261,412)])
}
Add(ODialog,12607574,161,406)
{
FileName="*.rtf"
link(onExecute,3880661:doText,[])
}
Add(Button,12858946,98,406)
{
Left=725
Top=5
Width=115
Caption="файл. rtf"
Data=String(D:HIASMscenaristСЦЕНАРИЙ РОКОВОЕ СОВПАДЕНИЕ 14.02.rtf)
link(onClick,12607574:doExecute,[])
}
Add(Hub,469818,252,371)
{
OutCount=3
link(onEvent1,13050883:doLoad,[(261,314)(170,314)(170,118)])
link(onEvent2,10327199:doLoad,[(298,384)(298,328)])
link(onEvent3,7951778:doEnum,[(393,391)(393,202)])
}
Add(HilightMemo,2974940,623,315)
{
Left=10
Top=45
Width=405
Height=360
Font=[Courier New,8,0,0,1]
HilightFont=[Courier New,8,0,0,1]
}
Add(HilightMemo,3707675,628,234)
{
Left=425
Top=45
Width=405
Height=360
Font=[Courier New,8,0,0,1]
HilightFont=[Courier New,8,0,0,1]
}
Add(StrList,10327199,329,294)
{
}
Add(ArrayEnum,7951778,469,196)
{
link(onItem,6466290:doConvert,[(513,202)(513,251)(464,251)(464,300)])
link(Array,10327199:Array,[(475,191)(384,191)(384,351)(349,351)])
}
Add(Stream2Hex,6466290,476,294)
{
Mode=3
Symbol="'"
link(onResult,3707675:doAdd,[(568,300)(568,240)])
link(Data,7951778:Item,[(482,261)(475,261)])
}