------------ Дoбавленo в 14.51:
Спокойно можно обойтись и без IC
Add(MainForm,10713409,21,161)
{
Width=682
Height=413
Name="form"
Position=1
}
Add(Font,7588355,70,210)
{
FontDialog=0
Point(CharSet)
link(onFont,669353:doEvent1,[])
}
Add(Button,3473984,21,210)
{
Left=10
Top=5
link(onClick,7588355:doFont,[])
}
Add(ListBox,7664254,231,266)
{
Left=80
Top=5
Width=215
Height=370
Strings=#29:14;32768;MS Sans Serif;15;204|24:11;255;Courier New;1;204|22:24;8421376;Arial;3;204|24:12;65535;Wingdings 2;1;2|
DataType=1
link(onClick,13504489:doEvent1,[])
}
Add(Label,13554174,357,273)
{
Left=300
Top=10
Width=365
Point(doFont)
}
Add(Font,16233498,301,329)
{
Point(CharSet)
link(onFont,13554174:doFont,[(348,335)(348,286)])
link(Size,13716168:Part1,[])
link(Color,13716168:Part2,[])
link(Name,13716168:Part3,[])
link(Style,13716168:Part4,[])
link(CharSet,13716168:Part5,[])
}
Add(Hub,13504489,273,273)
{
OutCount=3
link(onEvent1,13554174:doText,[])
link(onEvent2,13716168:doSplit,[])
link(onEvent3,16233498:doFont,[(294,293)(294,335)])
}
Add(MultiStrPart,13716168,301,280)
{
Count=5
}
Add(FontManager,3857989,168,210)
{
ControlManager="temp"
Point(FontCharset)
}
Add(Label,7204829,70,161)
{
Width=0
Height=0
Name="temp"
Caption=""
}
Add(FormatStr,4342793,168,266)
{
DataCount=5
Mask="%1;%2;%3;%4;%5"
link(onFString,7664254:doAdd,[])
link(Str1,3857989:FontSize,[])
link(Str2,3857989:FontColor,[])
link(Str3,3857989:FontName,[])
link(Str4,3857989:FontStyle,[])
link(Str5,3857989:FontCharset,[])
}
Add(Hub,669353,126,210)
{
link(onEvent1,3857989:doSetFont,[])
link(onEvent2,4342793:doString,[(154,223)(154,272)])
}