Вверх ↑
Этот топик читают: Гость
Ответов: 19
Рейтинг: 0
#1: 2020-07-03 11:51:02 ЛС | профиль | цитата
Добрый день. Прошу прощения за орфографию, мой язык не Русский, работаю через переводчик. Я недавно делал программу для собственного пользования. После создания данной утилиты я столкнулся с некоторыми трудностями. Ребят для вас эти задачи могут показаться банальностью, но я новичок, и только розбираюсь во всём.

Постараюсь детально изложить свою проблему. Мне необходимо изменить такие параметры текста как междустрочковое расстояние и расстояние между буквами.


Тут я сделал небольшую схему по которой работает моя программа. А конкретно как прорисовывается текст.

https://forum.hiasm.com/getfile/39069

Редактировалось 5 раз(а), последний 2020-07-03 12:10:46
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 2193
Рейтинг: 673
#2: 2020-07-03 19:21:28 ЛС | профиль | цитата
Как вариант


Add(MainForm,2953706,28,105)
{
Width=607
Height=474
Position=1
}
Add(Memo,16281974,189,161)
{
Left=20
Top=15
Width=155
Height=420
Strings=#12:Добрый день.|19:Сегодня будет ясно.|12:Без осадков.|
link(onChange,8276957:doWork2,[])
}
Add(PaintBox,8113655,245,161)
{
Left=195
Top=20
Width=399
Height=374
Color=12632256
Ctl3D=0
ModeSp=1
SizeSp=3
ColorSp=-16777196
MinOwn=4
MinRest=2
ClearBeforeDraw=0
link(onBeforeDraw,5092615:doDraw,[(284,167)(284,204)(233,204)(233,265)])
}
Add(ScrollBar,13654110,294,161)
{
Left=195
Top=405
Width=400
Max=1000
Min=-100
link(onPosition,15958990:doWork2,[])
}
Add(ScrollBar,1525466,322,203)
{
Left=195
Top=425
Width=400
Max=1000
Min=-500
link(onPosition,15958990:doWork3,[(359,209)])
}
Add(HubEx,8276957,224,161)
{
link(onEvent,8113655:doRefresh,[])
}
Add(HubEx,15958990,355,161)
{
Angle=3
link(onEvent,8276957:doWork1,[(359,144)(228,144)])
}
Add(MultiElementEx,5092615,245,259)
{
link(Bitmap,8113655:Bitmap,[])
link(Text,16281974:Text,[(258,225)(195,225)])
link(WordInterval,13654110:Position,[(265,221)(300,221)])
link(StringInterval,1525466:Position,[(272,243)(328,243)])
}
BEGIN_SDK
Add(EditMultiEx,8766967,21,21)
{
WorkCount=#6:doDraw|
DataCount=#6:Bitmap|4:Text|34:WordInterval=Межбуквенный интервал|36:StringInterval=Межстроковой интервал|
Width=713
Height=585
link(doDraw,263065:doEvent1,[(30,27)(30,230)])
}
Add(Img_Text,3343235,427,231)
{
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,11206229:doOperation,[(471,237)(471,270)(408,270)(408,293)])
link(Bitmap,8766967:Bitmap,[(433,42)(27,42)])
link(Text,9442982:Part,[(440,210)(266,210)(266,275)(237,275)])
link(Transform,13761275:Transform,[])
}
Add(Str_Enum,9442982,224,231)
{
Delimiter=""
link(onEnum,3343235:doDraw,[])
link(onEndEnum,5741663:doEvent1,[])
}
Add(ArrayEnum,16511783,175,231)
{
link(onItem,9442982:doEnum,[])
link(onEndEnum,3745760:doClear,[(212,244)(212,468)])
link(Array,10986927:Array,[])
}
Add(Math,11206229,420,287)
{
Point(doClear)
link(onResult,2166251:doCalc,[(492,293)(492,321)])
link(Op1,2574425:Var1,[(426,275)(464,275)(464,362)])
link(Op2,3343235:TextWidth,[])
}
Add(Img_Text,14714162,168,273)
{
Y=50
Point(X)
Point(Y)
link(Text,16511783:Item,[])
}
Add(Math,2345606,497,427)
{
Point(doClear)
link(onResult,3745760:doCalc,[(534,433)(534,461)])
link(Op1,1951181:Var1,[(503,415)(451,415)(451,495)])
link(Op2,14714162:TextHeight,[(510,401)(181,401)])
}
Add(Hub,5741663,273,238)
{
link(onEvent1,2166251:doClear,[(325,244)(325,328)])
link(onEvent2,2345606:doOperation,[(305,251)(305,433)])
}
Add(StrList,10986927,161,175)
{
MakeExt(Strings,Текст для рисования,Text)
}
Add(Hub,263065,84,224)
{
link(onEvent1,15973981:doData,[(112,230)(112,202)])
link(onEvent2,16511783:doEnum,[])
}
Add(DoData,15973981,119,196)
{
link(onEventData,10986927:doText,[])
link(Data,8766967:Text,[(125,63)(34,63)])
}
Add(LineBreak,5273825,497,371)
{
Caption="x"
Type=1
link(Data,2574425:Var2,[])
Primary=[15014885,-35,-224]
}
Add(LineBreak,1288705,539,504)
{
Caption="y"
Type=1
link(Data,1951181:Var2,[])
Primary=[8828915,-70,-343]
}
Add(GetDataEx,1951181,539,490)
{
link(Data,3745760:Result,[])
}
Add(GetDataEx,2574425,497,357)
{
link(Data,2166251:Result,[])
}
Add(Img_UseOffset,13761275,455,189)
{
X=1.53
link(X,15014885:Var,[])
link(Y,8828915:Var,[])
}
Add(MathParse,2166251,497,315)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,8766967:WordInterval,[(510,35)(41,35)])
}
Add(MathParse,3745760,539,455)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,8766967:StringInterval,[(552,27)(48,27)])
}
END_SDK
карма: 10

2
Голосовали:Леонид, Tad
Ответов: 19
Рейтинг: 0
#3: 2020-07-03 22:07:28 ЛС | профиль | цитата
sla8a писал(а):
Как вариант

Вы снова меня спасаете. Безгранично благодарен.


--- Добавлено в 2020-07-03 22:47:46

sla8a писал(а):
Как вариант


Вариант отличный, Но я не могу сообразить как верно подсоеденить через елемент прорисовки текста.

Add(MainForm,2695986,308,182)
{
Width=1093
Height=880
Position=1
}
Add(ScrollBar,13654110,588,210)
{
Left=25
Top=260
Width=140
Max=1000
Min=-100
link(onPosition,10509332:doWork2,[])
}
Add(ScrollBar,1525466,595,280)
{
Left=25
Top=285
Width=140
Max=1000
Min=-500
link(onPosition,10509332:doWork3,[(653,286)])
}
Add(MultiElementEx,5092615,574,350)
{
link(WordInterval,13654110osition,[])
link(StringInterval,1525466osition,[])
}
BEGIN_SDK
Add(EditMultiEx,8766967,21,21)
{
WorkCount=#6:doDraw|
DataCount=#6:Bitmap|4:Text|34:WordInterval=Межбуквенный интервал|36:StringInterval=Межстроковой интервал|
Width=713
Height=585
link(doDraw,263065:doEvent1,[(30,27)(30,230)])
}
Add(Img_Text,3343235,427,231)
{
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,11206229:doOperation,[(471,237)(471,270)(408,270)(408,293)])
link(Bitmap,8766967:Bitmap,[(433,42)(27,42)])
link(Text,9442982art,[(440,210)(266,210)(266,275)(237,275)])
link(Transform,13761275:Transform,[])
}
Add(Str_Enum,9442982,224,231)
{
Delimiter=""
link(onEnum,3343235:doDraw,[])
link(onEndEnum,5741663:doEvent1,[])
}
Add(ArrayEnum,16511783,175,231)
{
link(onItem,9442982:doEnum,[])
link(onEndEnum,3745760:doClear,[(212,244)(212,468)])
link(Array,10986927:Array,[])
}
Add(Math,11206229,420,287)
{
Point(doClear)
link(onResult,2166251:doCalc,[(492,293)(492,321)])
link(Op1,2574425:Var1,[(426,275)(464,275)(464,362)])
link(Op2,3343235:TextWidth,[])
}
Add(Img_Text,14714162,168,273)
{
Y=50
Point(X)
Point(Y)
link(Text,16511783:Item,[])
}
Add(Math,2345606,497,427)
{
Point(doClear)
link(onResult,3745760:doCalc,[(534,433)(534,461)])
link(Op1,1951181:Var1,[(503,415)(451,415)(451,495)])
link(Op2,14714162:TextHeight,[(510,401)(181,401)])
}
Add(Hub,5741663,273,238)
{
link(onEvent1,2166251:doClear,[(325,244)(325,328)])
link(onEvent2,2345606:doOperation,[(305,251)(305,433)])
}
Add(StrList,10986927,161,175)
{
MakeExt(Strings,Текст для рисования,Text)
}
Add(Hub,263065,84,224)
{
link(onEvent1,15973981:doData,[(112,230)(112,202)])
link(onEvent2,16511783:doEnum,[])
}
Add(DoData,15973981,119,196)
{
link(onEventData,10986927:doText,[])
link(Data,8766967:Text,[(125,63)(34,63)])
}
Add(LineBreak,4098335,497,371)
{
Caption="x"
Type=1
link(Data,2574425:Var2,[])
Primary=[15014885,-35,-224]
}
Add(LineBreak,2718335,539,504)
{
Caption="y"
Type=1
link(Data,1951181:Var2,[])
Primary=[8828915,-70,-343]
}
Add(GetDataEx,1951181,539,490)
{
link(Data,3745760:Result,[])
}
Add(GetDataEx,2574425,497,357)
{
link(Data,2166251:Result,[])
}
Add(Img_UseOffset,13761275,455,189)
{
X=1.53
link(X,15014885:Var,[])
link(Y,8828915:Var,[])
}
Add(MathParse,2166251,497,315)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,8766967:WordInterval,[(510,35)(41,35)])
}
Add(MathParse,3745760,539,455)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,8766967:StringInterval,[(552,27)(48,27)])
}
END_SDK
Add(Img_TextInRect,9803594,392,378)
{
Point1=3276850
Point2=6553700
Point2AsOffset=0
Font=[Calibri,12,1,0,204]
Text="Бокс свойств и способностей"
OffsetLeft=2
OffsetRight=2
OffsetTop=2
OffsetBottom=2
AlignHorizon=2
Alignvertical=2
Ellipsis=0
Point(Transform)
link(Bitmap,123921:Bitmap,[(398,324)(538,324)])
link(Text,15334567:Text,[])
}
Add(LineBreakEx,16580438,448,259)
{
Caption="draw"
}
Add(LineBreakEx,15628690,168,238)
{
Caption="draw"
Type=1
link(OnEvent,11838353:doEvent1,[])
}
Add(Hub,11838353,259,238)
{
OutCount=3
link(onEvent1,123921:doRefresh,[])
link(onEvent2,9803594:doDraw,[(333,251)(333,384)])
link(onEvent3,123921:doClear,[(403,258)(403,251)])
}
Add(LineBreakEx,7680699,679,210)
{
Caption="draw"
}
Add(HubEx,10509332,649,210)
{
link(onEvent,7680699:doWork,[])
}
Add(Memo,15334567,399,259)
{
Left=25
Top=20
Width=140
Height=225
link(onChange,16580438:doWork,[])
}
Add(PaintBox,123921,532,238)
{
Left=200
Top=20
Width=590
Height=770
link(onBeforeDraw,5092615:doDraw,[(569,244)(569,356)])
}

Редактировалось 3 раз(а), последний 2020-07-04 08:42:11
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2020-07-04 08:29:57 ЛС | профиль | цитата
invincidle1 писал(а):
Но я не могу сообразить как верно подсоеденить через елемент прорисовки текста.
invincidle1,
схему нужно выкладывать в тегах CODE - иконка "Код"
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 2193
Рейтинг: 673
#5: 2020-07-04 09:57:09 ЛС | профиль | цитата
invincidle1 писал(а):
как верно подсоеденить через елемент прорисовки текста.

Схема


Add(MainForm,2695986,168,203)
{
Width=1093
Height=880
Position=1
link(onCreate,11838353:doEvent1,[(226,223)(226,244)])
}
Add(ScrollBar,13654110,763,252)
{
Left=25
Top=260
Width=140
Max=1000
Min=-100
link(onPosition,4321340:doWork3,[(807,258)])
}
Add(ScrollBar,1525466,525,210)
{
Left=25
Top=285
Width=140
Max=1000
Min=-500
link(onPosition,4321340:doWork1,[(807,216)])
}
Add(LineBreakEx,16580438,406,231)
{
Caption="draw"
}
Add(LineBreakEx,15628690,154,245)
{
Caption="draw"
Type=1
link(OnEvent,11838353:doEvent2,[])
}
Add(Hub,11838353,245,238)
{
InCount=2
OutCount=3
link(onEvent1,123921:doClear,[])
link(onEvent2,13701910:doEnum,[(270,251)(270,412)])
link(onEvent3,123921:doRefresh,[(277,258)(277,237)])
}
Add(LineBreakEx,7680699,833,224)
{
Caption="draw"
}
Add(Memo,15334567,343,231)
{
Left=25
Top=20
Width=140
Height=225
Strings=#12:Добрый день.|19:Сегодня будет ясно.|11:Без осадков|
link(onChange,16580438:doWork,[])
}
Add(PaintBox,123921,294,231)
{
Left=200
Top=20
Width=590
Height=770
}
Add(Img_Text,2924064,602,406)
{
X=12
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,8006174:doOperation,[(649,412)(649,444)(590,444)(590,468)])
link(Bitmap,123921:Bitmap,[(608,388)(300,388)])
link(Text,9719288:Part,[(615,395)(562,395)(562,450)(419,450)])
link(X,15008604:Text,[])
link(Y,8029249:Text,[])
link(Transform,16342343:Transform,[])
}
Add(Str_Enum,9719288,406,406)
{
Delimiter=""
link(onEnum,2924064:doDraw,[])
link(onEndEnum,8467770:doEvent1,[])
}
Add(ArrayEnum,13701910,357,406)
{
link(onItem,9719288:doEnum,[])
link(onEndEnum,734421:doClear,[(394,419)(394,538)])
link(Array,15334567:Array,[])
}
Add(Math,8006174,602,462)
{
Point(doClear)
link(onResult,9197779:doCalc,[(642,468)(642,496)])
link(Op1,2924064:TextWidth,[])
link(Op2,1172648:Var1,[(615,450)(642,450)(642,537)])
}
Add(Img_Text,7708814,350,448)
{
Y=50
link(Text,13701910:Item,[])
}
Add(Math,9703695,476,497)
{
Point(doClear)
link(onResult,734421:doCalc,[(513,503)(513,531)])
link(Op1,7708814:TextHeight,[(482,487)(363,487)])
link(Op2,11581622:Var3,[(489,490)(558,490)(558,565)])
}
Add(Hub,8467770,448,413)
{
link(onEvent1,9197779:doClear,[(582,419)(582,503)])
link(onEvent2,9703695:doOperation,[(472,426)(472,503)])
}
Add(LineBreak,1706542,651,546)
{
Caption="x"
Type=1
link(Data,1172648:Var2,[])
Primary=[6024253,-14,-224]
}
Add(LineBreak,5444118,518,574)
{
Caption="y"
Type=1
link(Data,11581622:Var2,[])
Primary=[2289776,126,-238]
}
Add(GetDataEx,11581622,518,560)
{
link(Data,734421:Result,[])
}
Add(GetDataEx,1172648,651,532)
{
link(Data,9197779:Result,[])
}
Add(Img_UseOffset,16342343,630,364)
{
X=1.53
link(X,6024253:Var,[])
link(Y,2289776:Var,[])
}
Add(MathParse,9197779,651,490)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,13654110:Position,[(664,483)(769,483)])
}
Add(MathParse,734421,518,525)
{
MathStr="%1 + %2 / 100"
Point(doClear)
link(X2,1525466:Position,[])
}
Add(HubEx,4321340,803,224)
{
link(onEvent,7680699:doWork,[])
}
Add(Edit,15008604,616,224)
{
Left=60
Top=310
Text="10"
link(onChange,14667545:doWork2,[])
}
Add(Edit,8029249,623,259)
{
Left=60
Top=340
Text="50"
link(onChange,14667545:doWork3,[(690,265)])
}
Add(Label,11255565,574,224)
{
Left=35
Top=315
Width=11
Height=17
Caption="X"
}
Add(Label,10601649,581,259)
{
Left=35
Top=345
Width=11
Height=17
Caption="Y"
}
Add(HubEx,14667545,686,224)
{
link(onEvent,4321340:doWork2,[])
}

карма: 10

0
Ответов: 16884
Рейтинг: 1239
#6: 2020-07-04 12:16:01 ЛС | профиль | цитата
sla8a, извини, иду мимо и опять...

Add(MainForm,2695986,301,140)
{
Width=1093
Height=880
Position=1
link(onCreate,11838353:doEvent1,[])
}
Add(ScrollBar,13654110,616,252)
{
Left=25
Top=260
Width=140
Max=1000
Min=-100
link(onPosition,1906337:doWork2,[])
}
Add(ScrollBar,1525466,616,378)
{
Left=25
Top=285
Width=140
Max=1000
Min=-500
link(onPosition,1906337:doWork3,[(662,384)])
}
Add(LineBreakEx,16580438,441,259)
{
Caption="draw"
}
Add(LineBreakEx,15628690,287,182)
{
Caption="draw"
Type=1
link(OnEvent,11838353:doEvent2,[(336,188)(336,167)])
}
Add(Hub,11838353,343,154)
{
InCount=2
OutCount=3
link(onEvent1,123921:doClear,[])
link(onEvent2,13701910:doEnum,[(367,167)(367,314)])
link(onEvent3,123921:doRefresh,[(406,174)(406,153)])
}
Add(LineBreakEx,7680699,672,182)
{
Caption="draw"
}
Add(Memo,15334567,378,259)
{
Left=25
Top=20
Width=140
Height=225
Strings=#12:Добрый день.|19:Сегодня будет ясно.|11:Без осадков|
link(onChange,16580438:doWork,[])
}
Add(PaintBox,123921,455,147)
{
Left=200
Top=20
Width=590
Height=770
}
Add(Img_Text,2924064,525,308)
{
X=12
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,9197779:doCalc,[])
link(Bitmap,123921:Bitmap,[(531,236)(461,236)])
link(Text,9719288:Part,[(538,296)(489,296)(489,355)(454,355)])
link(X,15008604:Text,[])
link(Y,8029249:Text,[])
link(Transform,16342343:Transform,[])
}
Add(Str_Enum,9719288,441,308)
{
Delimiter=""
link(onEnum,2924064:doDraw,[])
link(onEndEnum,8467770:doEvent1,[])
}
Add(ArrayEnum,13701910,392,308)
{
link(onItem,9719288:doEnum,[])
link(onEndEnum,734421:doClear,[(429,321)(429,447)])
link(Array,15334567:Array,[])
}
Add(Math,8006174,294,259)
{
@Color=255
Point(doClear)
}
Add(Img_Text,7708814,385,350)
{
Y=50
link(Text,13701910:Item,[])
}
Add(Math,9703695,294,301)
{
@Color=255
Point(doClear)
}
Add(Hub,8467770,483,315)
{
link(onEvent1,9197779:doClear,[])
link(onEvent2,734421:doCalc,[(508,328)(508,440)])
}
Add(LineBreak,5653097,609,357)
{
Caption="x"
Type=1
link(Data,9197779:Result,[])
Primary=[6024253,-49,-133]
}
Add(LineBreak,7168363,609,483)
{
Caption="y"
Type=1
link(Data,734421:Result,[])
Primary=[2289776,-42,-245]
}
Add(Img_UseOffset,16342343,553,266)
{
X=1.53
link(X,6024253:Var,[])
link(Y,2289776:Var,[])
}
Add(MathParse,9197779,609,308)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(X1,2924064:TextWidth,[(615,296)(592,296)(592,353)(531,353)])
link(X2,13654110:Position,[])
}
Add(MathParse,734421,609,434)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(X1,7708814:TextHeight,[(615,405)(398,405)])
link(X2,1525466:Position,[])
}
Add(Edit,15008604,539,147)
{
Left=60
Top=310
Text="10"
link(onChange,14667545:doWork1,[(662,153)])
}
Add(Edit,8029249,546,182)
{
Left=60
Top=340
Text="50"
link(onChange,14667545:doWork2,[])
}
Add(Label,11255565,497,147)
{
Left=35
Top=315
Width=11
Height=17
Caption="X"
}
Add(Label,10601649,497,182)
{
Left=35
Top=345
Width=11
Height=17
Caption="Y"
}
Add(HubEx,14667545,658,182)
{
link(onEvent,7680699:doWork,[])
}
Add(HubEx,1906337,658,252)
{
Angle=3
link(onEvent,14667545:doWork3,[])
}


Редактировалось 2 раз(а), последний 2020-07-04 12:18:56
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 2193
Рейтинг: 673
#7: 2020-07-04 13:56:54 ЛС | профиль | цитата
Tad, я исходил из того, чтоб было понятно ТС. Он еще новичок и многое из наших компактных схем будет сложно понять.
А так, да нет предела совершенству
схема

Add(MainForm,2695986,161,280)
{
Width=1093
Height=880
Position=1
}
Add(ScrollBar,13654110,462,238)
{
Left=25
Top=260
Width=140
Max=1000
Min=-100
link(onPosition,795243:doWork2,[])
}
Add(ScrollBar,1525466,469,315)
{
Left=25
Top=285
Width=140
Max=1000
Min=-500
link(onPosition,795243:doWork3,[(508,321)])
}
Add(Memo,15334567,273,203)
{
Left=25
Top=20
Width=140
Height=225
Strings=#12:Добрый день.|19:Сегодня будет ясно.|11:Без осадков|
link(onChange,10846677:doWork2,[])
}
Add(PaintBox,123921,245,280)
{
Left=200
Top=20
Width=590
Height=770
ClearBeforeDraw=0
link(onBeforeDraw,13701910:doEnum,[])
}
Add(Img_Text,2924064,385,280)
{
X=12
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,9197779:doCalc,[])
link(Bitmap,123921:Bitmap,[(391,261)(275,261)(275,319)(251,319)])
link(Text,9719288:Part,[(398,270)(376,270)(376,324)(349,324)])
link(X,15008604:Text,[])
link(Y,8029249:Text,[])
link(Transform,16342343:Transform,[(419,268)(430,268)(430,458)(454,458)])
}
Add(Str_Enum,9719288,336,280)
{
Delimiter=""
link(onEnum,2924064:doDraw,[])
link(onEndEnum,734421:doCalc,[(382,293)(382,377)])
}
Add(ArrayEnum,13701910,287,280)
{
link(onItem,9719288:doEnum,[])
link(onEndEnum,734421:doClear,[(324,293)(324,384)])
link(Array,15334567:Array,[])
}
Add(Img_UseOffset,16342343,448,413)
{
link(X,9197779:Result,[])
link(Y,734421:Result,[])
}
Add(MathParse,9197779,455,280)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(X1,2924064:TextWidth,[(461,268)(435,268)(435,322)(391,322)])
link(X2,13654110:Position,[])
}
Add(MathParse,734421,462,371)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(onResult,9197779:doClear,[(500,377)(500,352)(443,352)(443,293)])
link(X1,2924064:TextHeight,[(468,362)(398,362)])
link(X2,1525466:Position,[])
}
Add(Edit,15008604,399,168)
{
Left=60
Top=310
Text="10"
link(onChange,4248558:doWork2,[])
}
Add(Edit,8029249,406,217)
{
Left=60
Top=340
Text="50"
link(onChange,3468805:doWork2,[])
}
Add(Label,11255565,350,168)
{
Left=35
Top=315
Width=11
Height=17
Caption="X"
}
Add(Label,10601649,350,217)
{
Left=35
Top=345
Width=11
Height=17
Caption="Y"
}
Add(HubEx,4248558,504,168)
{
Angle=3
link(onEvent,123921:doRefresh,[(508,158)(217,158)(217,286)])
}
Add(HubEx,3468805,504,217)
{
Angle=3
link(onEvent,10846677:doWork3,[])
}
Add(HubEx,795243,504,238)
{
Angle=3
link(onEvent,3468805:doWork3,[])
}
Add(HubEx,10846677,504,203)
{
Angle=3
link(onEvent,4248558:doWork3,[])
}

Редактировалось 1 раз(а), последний 2020-07-04 13:57:13
карма: 10

0
Ответов: 19
Рейтинг: 0
#8: 2020-07-04 21:09:52 ЛС | профиль | цитата
sla8a писал(а):
Tad, я исходил из того, чтоб было понятно ТС. Он еще новичок и многое из наших компактных схем будет сложно понять.
А так, да нет предела совершенству
схема

Я её подогнал для своего удобства, Она удачно интегрируется в мою программу, но пока не поздно, хотел попросить добавить функцию изменения размера текста.


Add(MainForm,2695986,385,287)
{
Width=1093
Height=880
Position=1
}
Add(ScrollBar,13654110,679,273)
{
Left=25
Top=260
Width=140
Max=1000
Min=-100
link(onPosition,12010863:doWork,[])
}
Add(ScrollBar,1525466,686,350)
{
Left=25
Top=290
Width=140
Max=1000
Min=-500
link(onPosition,10625489:doWork,[])
}
Add(Memo,15334567,490,238)
{
Left=25
Top=20
Width=140
Height=225
Strings=#12:Добрый день.|19:Сегодня будет ясно.|11:Без осадков|
link(onChange,4467411:doWork,[])
}
Add(PaintBox,123921,434,252)
{
Left=200
Top=20
Width=590
Height=770
ClearBeforeDraw=0
link(onBeforeDraw,13701910:doEnum,[(475,258)(475,321)])
}
Add(Img_Text,2924064,602,315)
{
X=12
Y=50
Point(X)
Point(Y)
Point(Transform)
link(onDraw,9197779:doCalc,[])
link(Bitmap,123921:Bitmap,[(608,296)(492,296)(492,361)(440,361)])
link(Text,9719288:Part,[(615,305)(593,305)(593,359)(566,359)])
link(X,13607930:Position,[])
link(Y,6078927:Position,[])
link(Transform,16342343:Transform,[(636,303)(647,303)(647,493)(671,493)])
}
Add(Str_Enum,9719288,553,315)
{
Delimiter=""
link(onEnum,2924064:doDraw,[])
link(onEndEnum,734421:doCalc,[(599,328)(599,412)])
}
Add(ArrayEnum,13701910,504,315)
{
link(onItem,9719288:doEnum,[])
link(onEndEnum,734421:doClear,[(541,328)(541,419)])
link(Array,15334567:Array,[])
}
Add(Img_UseOffset,16342343,665,448)
{
link(X,9197779:Result,[])
link(Y,734421:Result,[])
}
Add(MathParse,9197779,672,315)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(X1,2924064:TextWidth,[(678,303)(652,303)(652,357)(608,357)])
link(X2,13654110:Position,[])
}
Add(MathParse,734421,679,406)
{
MathStr="%0 + %1 + %2 / 100"
Point(doClear)
link(onResult,9197779:doClear,[(724,412)(724,387)(660,387)(660,328)])
link(X1,2924064:TextHeight,[(685,397)(615,397)])
link(X2,1525466:Position,[])
}
Add(Label,11255565,504,196)
{
Left=10
Top=325
Width=11
Height=17
Caption="X"
}
Add(Label,10601649,560,196)
{
Left=10
Top=345
Width=11
Height=17
Caption="Y"
}
Add(ScrollBar,13607930,616,203)
{
Left=25
Top=325
Width=140
Max=1000
Min=-100
link(onPosition,11219448:doWork,[])
}
Add(ScrollBar,6078927,623,252)
{
Left=25
Top=345
Width=140
Max=1000
Min=-100
link(onPosition,6158223:doWork,[])
}
Add(LineBreakEx,15628690,378,252)
{
Caption="draw"
Type=1
link(OnEvent,123921:doRefresh,[])
}
Add(LineBreakEx,11219448,665,203)
{
Caption="draw"
}
Add(LineBreakEx,4467411,553,238)
{
Caption="draw"
}
Add(LineBreakEx,6158223,672,252)
{
Caption="draw"
}
Add(LineBreakEx,12010863,742,273)
{
Caption="draw"
}
Add(LineBreakEx,10625489,742,350)
{
Caption="draw"
}

[/quote]
карма: 0

0
Ответов: 2193
Рейтинг: 673
#9: 2020-07-05 12:55:45 ЛС | профиль | цитата
invincidle1, размер шрифта изменяет элемент Font (находиться в вкладке Графика\Шрифты). Чтоб открыть точку doFont у элемента, в свойствах разверните список свойств Font (нажав на плюс слева от надписи Font) и нажать на любой квадратик слева от свойства (к примеру слева от Name).
Add(Font,7045177,420,406)
{
link(onFont,3733372:doFont,[])
link(Size,12168638:Position,[])
}
Add(Img_Text,3733372,476,399)
{
Point(doFont)
}
Add(ScrollBar,12168638,420,350)
{
Left=150
Top=100
Width=285
Max=72
Min=8
Position=8
}

Редактировалось 1 раз(а), последний 2020-07-05 12:56:47
карма: 10

0
9
Сообщение
...
Прикрепленные файлы
(файлы не залиты)