Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,21,105)
{
BorderStyle=1
Position=1
}
Add(PaintBox,296008,224,63)
{
Left=10
Top=10
Width=280
Height=70
Font=[Impact,8,0,0,204]
ClearBeforeDraw=0
link(onBeforeDraw,13209161:doDraw,[(268,69)(268,221)(205,221)(205,300)])
}
Add(Img_Text,13209161,224,294)
{
X=3
Y=3
Font=[Impact,50,0,0,204]
link(onDraw,5578383:doDraw,[])
link(Bitmap,1787433:Var2,[])
link(Text,1853982:Var3,[(237,251)])
}
Add(Edit,14302289,161,196)
{
Left=10
Top=85
Width=280
}
Add(Img_Text,5578383,280,294)
{
Font=[Impact,50,0,12639424,204]
link(onDraw,296008:doRefresh,[(317,300)(317,213)(212,213)(212,69)])
link(Bitmap,1787433:Var3,[(286,229)])
link(Text,1853982:Var2,[(293,264)(188,264)])
}
Add(GetDataEx,1787433,224,224)
{
link(Data,296008:Bitmap,[])
}
Add(GetDataEx,1853982,182,246)
{
Angle=3
link(Data,14302289:Text,[(167,251)])
}
Add(Button,6185901,217,392)
{
Left=10
Top=120
Caption="save"
}
Этот топик читают: Гость
Ответов: 118
Рейтинг: 0
|
|||
Собственно вопрос как мне сохранить надпись в формате png.
|
|||
карма: 0 |
|
Ответов: 783
Рейтинг: 168
|
|||
Spectr20 писал(а): как мне сохранить надпись в формате png
|
|||
карма: 15 |
|
Ответов: 118
Рейтинг: 0
|
|||
Gunta писал(а): 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,[]) } Мне нужна картинка с прозрачностью, чтобы текст был на прозрачном фоне |
|||
карма: 0 |
|
Ответов: 783
Рейтинг: 168
|
|||
Spectr20 писал(а): нужна картинка с прозрачностью, чтобы текст был на прозрачном фоне
Редактировалось 1 раз(а), последний 2022-05-02 17:59:27 |
|||
карма: 15 |
|
4