Add(MainForm,16582835,196,196)
{
Caption="api.qrserver.com QR-Encoder"
}
Add(Edit,9797136,252,196)
{
Left=140
Top=10
Width=240
Align=2
Text="Привет Hiasm!"
ClearAfterEnter=1
link(onEnter,8913171:doWork2,[])
}
Add(HTTP_Get,3284981,448,203)
{
link(onDownload,16365162:doEvent1,[])
}
Add(Hub,16365162,504,210)
{
link(onEvent1,12948547:doLoadFromStream,[])
link(onEvent2,12948547:doBitmap,[])
}
Add(Image,6965738,588,196)
{
Left=10
Top=45
Width=370
Height=220
Align=5
AutoSize=0
}
Add(Charset,13887912,399,203)
{
Type=6
link(onCharset,3284981:doDownload,[])
}
Add(FormatStr,1876016,322,203)
{
DataCount=7
Mask="http://api.qrserver.com/v1/create-qr-code/?data=%1&ecc=%2&size=%3&qzone=%4&color=%5&bgcolor=%6&format=%7"
Point(FString)
link(onFString,13887912:doCharset,[])
link(Str2,11474747:Text,[])
link(Str3,12212135:Text,[])
link(Str4,10325946:Value,[])
link(Str5,16238986:Text,[])
link(Str6,12704565:Text,[])
link(Str7,7214357:Text,[])
}
Add(Menu,5418054,196,273)
{
Menu=#16:Сгенерировать QR|
link(onSelectStr,12266315:doData,[])
}
Add(HubEx,8913171,294,203)
{
link(onEvent,1876016:doString,[])
}
Add(Jpeg,12948547,539,196)
{
Point(doLoadFromStream)
Point(doBitmap)
link(onBitmap,6965738:doLoad,[])
}
Add(VisualStrings,7214357,364,168)
{
Lines=#3:jpg|
}
Add(VisualStrings,12704565,357,140)
{
Lines=#6:ffffff|
}
Add(VisualStrings,16238986,350,112)
{
Lines=#6:000000|
}
Add(Memory,10325946,343,70)
{
Default=Integer(1)
}
Add(VisualStrings,11474747,329,21)
{
Lines=#1:M|
}
Add(VisualStrings,12212135,336,49)
{
Lines=#7:500x500|
Width=60
}
Add(DoData,12266315,252,273)
{
link(onEventData,8913171:doWork3,[(298,279)])
link(Data,9797136:Text,[])
}
Ответов: 784
Рейтинг: 168
|
|||
Google API перестал выдавать QR code. Поэтому выкладываю схему при использовании https://goqr.me/api/doc/create-qr-code/
|
|||
карма: 15 |
|