Spectr20 писал(а):
как мне сохранить надпись в формате png


Add(MainForm,14063653,287,112)
{
BorderStyle=1
Position=1
}
Add(PaintBox,296008,490,182)
{
Left=10
Top=10
Width=280
Height=70
Font=[Impact,8,0,0,204]
ClearBeforeDraw=0
link(onBeforeDraw,13209161:doDraw,[(529,188)(529,223)(480,223)(480,307)])
}
Add(Img_Text,13209161,490,301)
{
X=3
Y=3
Font=[Impact,50,0,0,204]
link(onDraw,5578383:doDraw,[])
link(Bitmap,1787433:Var2,[])
link(Text,14442097:Var2,[])
}
Add(Edit,14302289,427,203)
{
Left=10
Top=85
Width=280
}
Add(Img_Text,5578383,546,301)
{
Font=[Impact,50,0,12639424,204]
link(onDraw,296008:doRefresh,[(585,307)(585,174)(480,174)(480,188)])
link(Bitmap,7282303:Var2,[])
link(Text,14442097:Var3,[(559,258)])
}
Add(GetDataEx,1787433,490,231)
{
link(Data,296008:Bitmap,[])
}
Add(Button,6185901,560,392)
{
Left=10
Top=120
Caption="save"
link(onClick,10933403:doEvent1,[])
}
Add(PNG,5773761,721,378)
{
FileName="test.png"
Point(Stream)
Point(doLoadFromBitmap)
}
Add(GetDataEx,14442097,497,253)
{
Angle=3
link(Data,14302289:Text,[(433,258)])
}
Add(Hub,10933403,630,392)
{
InCount=2
link(onEvent1,6523934:doData,[])
link(onEvent2,5773761:doSave,[(711,405)(711,391)])
}
Add(DoData,6523934,672,392)
{
link(onEventData,5773761:doLoadFromBitmap,[])
link(Data,7282303:Var3,[(678,236)])
}
Add(GetDataEx,7282303,546,231)
{
Angle=3
link(Data,1787433:Var3,[])
}