Вверх ↑
Ответов: 495
Рейтинг: 163
#1: 2020-06-24 14:53:23 ЛС | профиль | цитата
Или как предложил
Леонид писал(а):
окружности (дуги) рисуются проще через синусы/косинусы

рисовать самому

Add(MainForm,15196061,119,392)
{
Width=761
Height=446
Position=1
link(onCreate,1731741:doWork2,[])
}
Add(Edit,12153667,413,140)
{
Left=20
Top=25
Text="150"
DataType=2
ClearAfterEnter=1
}
Add(Edit,15954973,504,140)
{
Left=145
Top=25
Text="100"
DataType=2
ClearAfterEnter=1
}
Add(Hub,14293548,329,308)
{
OutCount=3
link(onEvent1,6809237:doWork3,[(385,314)])
link(onEvent2,15940227:doWork2,[])
link(onEvent3,3555499:doData,[(362,328)(362,482)])
}
Add(MathParse,13459956,399,315)
{
DataCount=3
MathStr="cos(%2)*%1 + %3"
AngleMode=1
link(onResult,9096087:doValue,[])
link(X1,14148705:Var1,[(405,257)])
link(X3,12153667:Text,[])
}
Add(Edit,8039995,455,140)
{
Left=75
Top=25
Text="150"
DataType=2
ClearAfterEnter=1
}
Add(MathParse,14691064,455,273)
{
DataCount=3
MathStr="sin(%2)*%1 + %3"
AngleMode=1
link(onResult,1085043:doValue,[])
link(X1,14148705:Var2,[])
link(X3,8039995:Text,[(475,179)(461,179)])
}
Add(For,6517650,280,308)
{
Point(doStep)
link(onEvent,14293548:doEvent1,[])
link(Start,2096612:Var2,[])
link(End,12140828:Text,[(293,186)(342,186)])
}
Add(DoData,3555499,434,476)
{
link(onEventData,5214857:doDraw,[])
}
Add(Button,6526443,119,441)
{
Left=325
Top=180
link(onClick,13968087:doEvent2,[(611,447)(611,419)])
}
Add(Img_Line,5214857,504,476)
{
Size=3
Point(Point1)
Point(Point2)
link(Bitmap,6637295:Bitmap,[(510,457)(671,457)])
link(Point1,2063720:Point,[])
link(Point2,6259505:Point,[(524,465)(566,465)])
}
Add(PaintBox,6637295,665,413)
{
Left=15
Top=55
Width=300
Height=305
Color=16777215
ClearBeforeDraw=0
link(onBeforeDraw,13814849:doEvent1,[(715,419)(715,200)(207,200)(207,230)])
}
Add(MemFIFO,1085043,504,273)
{
}
Add(MemFIFO,9096087,567,315)
{
}
Add(PointXY,2063720,511,371)
{
link(X,1085043:Value2,[])
link(Y,9096087:Value2,[(524,359)(580,359)])
}
Add(PointXY,6259505,560,371)
{
link(X,1085043:Value1,[(566,346)(510,346)])
link(Y,9096087:Value1,[])
}
Add(GetDataEx,14148705,455,252)
{
Angle=1
link(Data,15954973:Text,[(510,257)])
}
Add(Hub,13814849,217,224)
{
link(onEvent1,3423076:doData,[])
link(onEvent2,6517650:doFor,[(255,237)(255,314)])
}
Add(Edit,11892794,1022,203)
{
Left=395
Top=25
Text="150"
DataType=2
ClearAfterEnter=1
}
Add(Edit,10777866,1106,203)
{
Left=525
Top=25
Text="100"
DataType=2
ClearAfterEnter=1
}
Add(Hub,5078315,987,315)
{
OutCount=3
link(onEvent1,5002889:doCalc,[(1028,321)(1028,286)])
link(onEvent2,10186292:doCalc,[])
link(onEvent3,9477739:doData,[(1024,335)(1024,482)])
}
Add(MathParse,10186292,1050,322)
{
DataCount=3
MathStr="cos(%2)*%1 + %3"
AngleMode=1
link(X1,16768445:Var1,[(1056,264)])
link(X3,11892794:Text,[(1070,274)(1028,274)])
}
Add(Img_Point,10001748,1092,476)
{
Size=3
Point(X)
Point(Y)
Point(Color)
Point(Size)
link(Bitmap,3964531:Bitmap,[(1098,468)(1070,468)])
link(X,10186292:Result,[(1105,382)(1056,382)])
link(Y,5002889:Result,[])
}
Add(Edit,6404793,1064,203)
{
Left=450
Top=25
Text="150"
DataType=2
ClearAfterEnter=1
}
Add(MathParse,5002889,1106,280)
{
DataCount=3
MathStr="sin(%2)*%1 + %3"
AngleMode=1
link(X1,16768445:Var2,[])
link(X3,6404793:Text,[(1126,252)(1070,252)])
}
Add(GetDataEx,16768445,1106,259)
{
link(Data,10777866:Text,[])
}
Add(PaintBox,3964531,1064,406)
{
Left=395
Top=50
Width=310
Height=305
Color=16777215
ClearBeforeDraw=0
link(onBeforeDraw,16736643:doFor,[(1130,412)(1130,369)(871,369)(871,321)])
}
Add(For,16736643,882,315)
{
Point(doStep)
link(onEvent,5078315:doEvent1,[])
link(Start,13920560:Text,[])
link(End,11229334:Text,[(895,261)(937,261)])
}
Add(DoData,9477739,1029,476)
{
link(onEventData,10001748:doDraw,[])
}
Add(Hub,13968087,630,406)
{
InCount=2
link(onEvent1,3964531:doRefresh,[])
link(onEvent2,6637295:doRefresh,[])
}
Add(Edit,2463932,280,140)
{
Left=275
Top=25
Text="90"
DataType=2
ClearAfterEnter=1
}
Add(Edit,12140828,336,140)
{
Left=225
Top=25
Text="270"
DataType=2
ClearAfterEnter=1
}
Add(Edit,13920560,882,203)
{
Left=605
Top=25
Text="-180"
DataType=2
ClearAfterEnter=1
}
Add(Edit,11229334,931,203)
{
Left=655
Top=25
Text="0"
DataType=2
ClearAfterEnter=1
}
Add(ScrollBar,10999977,119,322)
{
Left=270
Top=380
Width=150
Max=30
Min=1
Page=10
Position=1
link(onPosition,16631915:doEvent1,[])
}
Add(Hub,16631915,182,322)
{
OutCount=3
link(onEvent1,6517650:doStep,[])
link(onEvent2,4207655:In,[])
link(onEvent3,1731741:doWork1,[(207,342)])
}
Add(LineBreak,4142984,833,329)
{
link(Out,16736643:doStep,[])
Primary=[4207655,-609,0]
}
Add(HubEx,1731741,203,406)
{
link(onEvent,13968087:doEvent1,[])
}
Add(DoData,3423076,308,224)
{
link(onEventData,6016783:doEvent1,[])
link(Data,2096612:Var3,[(314,208)])
}
Add(GetDataEx,2096612,280,203)
{
link(Data,2463932:Text,[])
}
Add(HubEx,6809237,381,273)
{
link(onEvent,14691064:doCalc,[])
}
Add(Hub,6016783,357,224)
{
link(onEvent1,6809237:doWork1,[(385,230)])
link(onEvent2,15940227:doWork1,[(375,237)])
}
Add(HubEx,15940227,371,315)
{
link(onEvent,13459956:doCalc,[])
}

карма: 4

1
Голосовали:Gitarist
Редактировалось 5 раз(а), последний 2020-06-25 18:49:26