Вверх ↑
Этот топик читают: Гость
Ответов: 3
Рейтинг: 0
#1: 2018-11-17 19:47:38 ЛС | профиль | цитата
Добрый день.
Есть проект. Нормально работает в windows xp но при попытке запуска в windows 8 вылетает с ошибкой
ошибка.jpg
Make(delphi)
ver(4.05 build 186)
Add(VisualShape,6123571,19,5)
{
Left=670
Top=10
Width=225
Height=550
Color2=-16777201
}
Add(VisualShape,10949954,25,11)
{
Left=345
Top=10
Width=320
Height=550
Color2=-16777201
}
Add(VisualShape,2451922,28,14)
{
Left=10
Top=10
Width=330
Height=550
Color2=-16777201
}
Add(TrackBar,1552606,175,112)
{
Left=20
Top=135
Width=250
Max=99
TickCount=5
Position=50
Point(onStop)
link(onPosition,4109216:doEvent1,[(213,118)(213,136)])
}
Add(Label,11846724,406,259)
{
Left=290
Top=140
Width=40
Height=20
}
Add(TrackBar,12744421,157,230)
{
Left=20
Top=175
Width=250
Max=99
TickCount=5
Position=50
Point(onStop)
link(onPosition,2249972:doConvert,[(201,236)(201,250)(22,250)(22,278)])
}
Add(Label,13073277,364,315)
{
Left=290
Top=180
Width=40
Height=20
}
Add(TrackBar,2842380,150,307)
{
Left=20
Top=215
Width=250
Max=99
Min=10
TickCount=5
Position=50
Point(onStop)
link(onPosition,2488008:doEvent3,[(231,313)(231,279)])
}
Add(Label,11607993,350,371)
{
Left=290
Top=220
Width=40
Height=20
link(Text,8356408:Var3,[(356,354)])
}
Add(TrackBar,16186766,157,363)
{
Left=20
Top=255
Width=250
Max=99
Min=10
TickCount=5
Position=50
Point(onStop)
link(onPosition,2488008:doEvent4,[(235,369)(235,286)])
}
Add(Label,15050490,336,441)
{
Left=285
Top=260
Width=45
Height=25
link(Text,15542157:Var3,[(342,433)])
}
Add(TrackBar,16296814,163,475)
{
Left=20
Top=290
Width=250
Max=99
Min=10
TickCount=5
Position=50
Point(onStop)
link(onPosition,2488008:doEvent5,[(237,481)(237,293)])
}
Add(Label,8887380,350,532)
{
Left=285
Top=290
Width=45
Height=25
link(Text,16296814:Position,[(356,521)(169,521)])
}
Add(TrackBar,1975812,162,532)
{
Left=20
Top=325
Width=250
Max=99
Min=10
TickCount=5
Position=50
Point(onStop)
link(onPosition,2488008:doEvent6,[(237,538)(237,300)])
}
Add(Label,10014842,336,574)
{
Left=285
Top=330
Width=45
Height=25
link(Text,1975812:Position,[(342,577)(168,577)])
}
Add(StrCat,12195547,504,301)
{
Str1="set"
link(onStrCat,4710832:doStrCat,[(541,307)(541,342)(471,342)(471,377)])
link(Str2,11846724:Caption,[(517,289)(458,289)(458,317)(412,317)])
}
Add(Hub,2488008,287,259)
{
InCount=16
OutCount=22
link(onEvent3,1376632:doEvent1,[(315,279)(315,327)])
link(onEvent5,15050490:doText,[(315,293)(315,447)])
link(onEvent6,8887380:doText,[(322,300)(322,538)])
link(onEvent7,13060488:doEvent1,[(312,307)(312,389)])
link(onEvent8,7639837:doEvent1,[(305,314)(305,640)])
link(onEvent17,2350098:doNumber,[(395,377)(395,216)])
link(onEvent18,8293720:doEvent1,[(367,384)(367,335)])
link(onEvent22,93647:doText,[(511,412)(511,447)])
}
Add(StrCat,4710832,483,371)
{
link(onStrCat,4132319:doStrCat,[(527,377)(527,401)(436,401)(436,426)])
link(Str1,12195547:Result,[(489,353)(510,353)])
link(Str2,13073277:Caption,[(496,358)(370,358)])
}
Add(StrCat,4132319,448,420)
{
link(onStrCat,11756874:doStrCat,[(492,426)(492,461)(436,461)(436,496)])
link(Str1,4710832:Result,[(454,413)(489,413)])
link(Str2,11607993:Caption,[(461,415)(356,415)])
}
Add(StrCat,11756874,448,490)
{
link(onStrCat,13066898:doStrCat,[(492,496)(492,524)(415,524)(415,552)])
link(Str1,4132319:Result,[])
link(Str2,15050490:Caption,[(461,482)(342,482)])
}
Add(StrCat,13066898,427,546)
{
link(onStrCat,888318:doStrCat,[(471,552)(471,587)(394,587)(394,622)])
link(Str1,11756874:Result,[(433,537)(454,537)])
link(Str2,8887380:Caption,[(440,571)(356,571)])
}
Add(StrCat,888318,406,616)
{
link(onStrCat,7801372:doStrCat,[(524,622)(524,328)])
link(Str1,13066898:Result,[(412,594)(433,594)])
link(Str2,10014842:Caption,[(419,613)(342,613)])
}
Add(StrCat,7801372,609,322)
{
link(onStrCat,13971153:doStrCat,[(646,328)(645,375)(646,426)(555,426)(555,524)])
link(Str1,888318:Result,[(615,312)(516,312)(516,662)(412,662)])
link(Str2,1173848:Caption,[(622,251)(743,251)])
}
Add(StrCat,13971153,567,518)
{
Str2="end"
link(Str1,7801372:Result,[(573,457)(615,457)])
}
Add(MainForm,68149,707,238)
{
Left=21
Top=105
Width=912
Height=597
Font=[Arial,8,0,0,1]
Caption="Артурыч привет"
link(onActivate,119988:doEvent1,[(747,244)(747,230)])
link(onCreate,91402:doFor,[(751,258)(751,300)])
}
Add(Button,84825,819,623)
{
Left=760
Top=375
Width=75
Caption="Read next"
link(onClick,63129:doData,[])
}
Add(StrCat,68100,959,287)
{
Str1="Port "
link(onStrCat,94010:doAdd,[])
link(Str2,17498:Data2,[(972,276)(923,276)])
}
Add(Label,3743,1064,196)
{
Left=690
Top=80
Width=87
Height=17
Caption="Свободный порт"
}
Add(DoData,36895,847,364)
{
Data=String(atz0)
link(onEventData,56156:doWrite,[(894,370)(894,314)])
}
Add(ListBox,94010,1008,287)
{
Left=690
Top=95
Height=18
DataType=1
link(onClick,13811875:doDelete,[])
}
Add(FormatStr,12648551,721,511)
{
DataCount=1
Mask="%1\r"
link(onFString,96560:doEvent1,[])
link(Str1,93647:Text,[])
}
Add(Edit,93647,721,441)
{
Left=700
Top=340
Width=160
Height=21
Visible=1
Text=""
link(onChange,4693190:doEvent1,[(814,447)(814,433)])
link(Str,13971153:Result,[(727,436)(650,436)(650,562)(573,562)])
}
Add(Hub,96560,777,511)
{
InCount=2
OutCount=4
link(onEvent1,4901:doOpen,[])
link(onEvent3,4901:doWrite,[(1015,531)(1015,538)])
link(onEvent4,5688535:doSleepMks,[])
}
Add(DoData,63129,868,623)
{
Data=String(8)
link(onEventData,390754:doWork3,[(991,629)])
link(Data,21542:Text,[])
}
Add(DoData,10850025,868,532)
{
Data=Integer(255)
link(onEventData,390754:doWork2,[(943,538)(943,545)])
}
Add(COM,4901,1029,511)
{
link(onRead,90708:doEvent2,[(1094,524)(1094,433)])
link(Port,15717028:Value,[(1035,379)(1119,379)])
}
Add(For,91402,763,294)
{
End=254
link(onEvent,3324:doEvent1,[])
}
Add(COM,56156,910,287)
{
link(onWrite,68100:doStrCat,[])
link(Port,17498:Data1,[])
}
Add(Label,78288,1148,238)
{
Left=690
Top=125
Caption="Result"
}
Add(Hub,3324,819,294)
{
OutCount=3
link(onEvent1,56156:doOpen,[(871,300)(871,293)])
link(onEvent2,36895:doData,[(861,307)(861,335)(837,335)(837,370)])
link(onEvent3,56156:doClose,[(880,314)(880,300)])
}
Add(GetData,17498,910,231)
{
link(Data,91402:Position,[(916,222)(807,222)(807,330)(769,330)])
}
Add(Label,95232,1106,238)
{
Left=825
Top=400
Caption="bytes"
}
Add(Button,83996,777,455)
{
Left=700
Top=375
Caption="Stop"
link(onClick,4901:doClose,[(915,461)(915,524)])
}
Add(Sleep,5688535,826,532)
{
Delay=400000
link(onSleep,10850025:doData,[])
}
Add(Edit,21542,868,574)
{
Left=840
Top=375
Width=35
Height=21
Text="8"
DataType=1
}
Add(Memo,37557,1176,420)
{
Left=690
Top=140
Width=75
Height=20
ScrollBars=2
}
Add(Memory,15717028,1113,294)
{
}
Add(Delete,13811875,1064,294)
{
Count=5
link(onDelete,15717028:doValue,[])
}
Add(Hub,90708,1127,420)
{
InCount=2
link(onEvent1,37557:doAdd,[])
}
Add(HubEx,390754,987,539)
{
link(onEvent,4901:doRead,[])
}
Add(CheckBox,10061494,387,118)
{
Left=25
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent7,[(431,124)(431,216)(275,216)(275,307)])
}
Add(CheckBox,14793134,398,129)
{
Left=45
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent8,[(447,135)(447,225)(247,225)(247,314)])
}
Add(CheckBox,6009226,412,143)
{
Left=65
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent9,[(461,149)(461,235)(247,235)(247,321)])
}
Add(CheckBox,9991662,473,122)
{
Left=85
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent10,[(524,128)(524,228)(247,228)(247,328)])
}
Add(CheckBox,15547714,487,136)
{
Left=105
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent11,[(538,142)(538,239)(247,239)(247,335)])
}
Add(CheckBox,15034586,501,150)
{
Left=125
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent12,[(552,156)(552,250)(247,250)(247,342)])
}
Add(CheckBox,8746393,557,136)
{
Left=145
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent13,[(601,142)(601,235)(247,235)(247,349)])
}
Add(CheckBox,14074663,577,151)
{
Left=165
Top=85
Width=15
Ctl3D=0
Caption=""
link(onCheck,2488008:doEvent14,[(622,157)(622,246)(247,246)(247,356)])
}
Add(BitsToInt,2350098,490,210)
{
Count=8
link(onNumber,7185202:doConvert,[(610,216)(610,152)])
link(Bit1,10061494:Checked,[(496,188)(393,188)])
link(Bit2,14793134:Checked,[(503,190)(404,190)])
link(Bit3,6009226:Checked,[(510,207)(418,207)])
link(Bit4,9991662:Checked,[(517,200)(479,200)])
link(Bit5,15547714:Checked,[(524,207)(493,207)])
link(Bit6,15034586:Checked,[(531,214)(507,214)])
link(Bit7,8746393:Checked,[(538,189)(563,189)])
link(Bit8,14074663:Checked,[(545,193)(583,193)])
}
Add(Hub,119988,756,224)
{
OutCount=3
link(onEvent1,8717067:doData,[(782,230)(782,272)(25,272)(25,313)])
link(onEvent2,2488008:doEvent15,[(782,237)(782,289)(247,289)(247,363)])
link(onEvent3,9025033:doWork3,[(782,244)])
}
Add(Hub,8293720,434,329)
{
InCount=6
OutCount=1
link(onEvent1,12195547:doStrCat,[(476,335)(476,307)])
}
Add(Hub,1376632,329,321)
{
link(onEvent2,8293720:doEvent2,[(389,334)(389,342)])
}
Add(Hub,13060488,329,383)
{
link(onEvent1,11607993:doText,[(347,389)(347,377)])
link(onEvent2,8293720:doEvent3,[(389,396)(389,349)])
}
Add(Hub,7639837,308,634)
{
link(onEvent1,10014842:doText,[(357,640)(357,580)])
link(onEvent2,8293720:doEvent6,[(378,647)(378,370)])
}
Add(Convertor,15840095,259,175)
{
SymbolFill="0"
link(onResult,2749559:doEvent1,[(304,181)(304,197)])
link(Data,1327192:Var3,[(265,159)])
}
Add(Hub,2749559,317,191)
{
link(onEvent1,11846724:doText,[(369,197)(369,265)])
link(onEvent2,2488008:doEvent1,[(343,204)(343,234)(275,234)(275,265)])
}
Add(DoData,8515595,42,133)
{
Data=Integer(50)
link(onEventData,8211060:doEvent2,[(79,139)(79,96)])
}
Add(Convertor,7185202,671,146)
{
SymbolFill="0"
link(onResult,3559997:doEvent1,[(715,152)(715,176)(688,176)(688,201)])
link(Data,2350098:Number,[(677,134)(587,134)(587,254)(496,254)])
}
Add(Label,1173848,737,148)
{
Left=200
Top=85
Width=40
Height=20
}
Add(HubEx,9025033,778,217)
{
Angle=2
link(onEvent,8515595:doData,[(30,223)(30,139)])
}
Add(Hub,3559997,700,195)
{
link(onEvent1,1173848:doText,[(726,201)(726,154)])
}
Add(Convertor,2249972,195,272)
{
SymbolFill="0"
link(onResult,2176778:doEvent1,[(271,278)(271,277)])
link(Data,1324711:Var3,[(201,267)])
}
Add(Hub,2176778,329,271)
{
link(onEvent1,2488008:doEvent2,[(355,277)(355,275)(275,275)(275,272)])
link(onEvent2,13073277:doText,[(353,284)(353,321)])
}
Add(DoData,8717067,37,307)
{
Data=Integer(50)
link(onEventData,8869398:doEvent1,[(87,313)(87,243)])
}
Add(VisualShape,8684382,161,665)
{
Left=60
Top=385
Width=45
Height=40
Color2=32768
ShapeType=9
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,13105303:doStop,[(205,671)(205,678)])
link(onMouseDown,13105303:doTimer,[(205,678)(205,671)])
}
Add(Timer,13105303,218,665)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,15381312:doOperation,[])
}
Add(Hub,8211060,126,83)
{
InCount=3
OutCount=1
link(onEvent1,1552606:doPosition,[(165,89)(165,118)])
}
Add(Math,15381312,274,665)
{
Op2=5
Point(doClear)
link(onResult,10470314:doEvent1,[(332,671)(332,711)])
link(Op1,6718238:Var2,[(280,641)(279,641)])
}
Add(Hub,4109216,226,130)
{
link(onEvent1,15840095:doConvert,[(250,136)(250,181)])
}
Add(GetDataEx,1327192,224,154)
{
Angle=3
link(Data,1552606:Position,[(181,159)])
}
Add(VisualShape,10800547,134,714)
{
Left=106
Top=425
Width=40
Height=45
Color2=32768
ShapeType=12
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,15824958:doStop,[(178,720)(178,727)])
link(onMouseDown,15824958:doTimer,[(178,727)(178,720)])
}
Add(Timer,15824958,190,714)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,10806774:doOperation,[])
}
Add(Math,10806774,246,714)
{
Op2=5
Point(doClear)
link(onResult,4923653:doEvent1,[(318,720)(318,774)])
link(Op1,9629486:Var2,[(252,662)(251,662)])
}
Add(Hub,8869398,105,237)
{
InCount=3
OutCount=1
link(onEvent1,12744421:doPosition,[(138,243)(138,236)])
}
Add(VisualShape,15339593,162,763)
{
Left=60
Top=470
Width=45
Height=40
Color2=32768
ShapeType=10
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,3715883:doStop,[(206,769)(206,776)])
link(onMouseDown,3715883:doTimer,[(206,776)(206,769)])
}
Add(Timer,3715883,218,763)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,12087562:doOperation,[])
}
Add(Math,12087562,274,763)
{
OpType=1
Op2=5
Point(doClear)
link(onResult,10470314:doEvent2,[(332,769)(332,718)])
link(Op1,6718238:Var1,[(280,689)(270,689)(270,614)])
}
Add(Hub,10470314,358,705)
{
InCount=2
OutCount=1
link(onEvent1,8211060:doEvent1,[(383,711)(383,414)(86,414)(86,89)])
}
Add(GetDataEx,6718238,273,609)
{
link(Data,2390855:Var2,[])
}
Add(GetDataEx,1324711,182,262)
{
Angle=3
link(Data,12744421:Position,[(163,267)])
}
Add(VisualShape,7188054,88,810)
{
Left=19
Top=425
Width=40
Height=45
Color2=32768
ShapeType=11
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,14930310:doStop,[(133,816)(133,823)])
link(onMouseDown,14930310:doTimer,[(133,823)(133,816)])
}
Add(Timer,14930310,145,810)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,7967046:doOperation,[])
}
Add(Math,7967046,201,810)
{
OpType=1
Op2=5
Point(doClear)
link(onResult,4923653:doEvent2,[(295,816)(295,781)])
link(Op1,9629486:Var1,[(207,607)])
}
Add(GetDataEx,9629486,245,602)
{
link(Data,1324711:Var2,[(251,492)(188,492)])
}
Add(Hub,4923653,358,768)
{
InCount=2
OutCount=1
link(onEvent1,8869398:doEvent2,[(383,774)(383,512)(93,512)(93,250)])
}
Add(VisualShape,5980283,469,686)
{
Left=225
Top=385
Width=45
Height=40
Color2=255
ShapeType=9
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,12286871:doStop,[(513,692)(513,699)])
link(onMouseDown,12286871:doTimer,[(513,699)(513,692)])
}
Add(Timer,12286871,526,686)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,6049877:doOperation,[])
}
Add(Math,6049877,582,686)
{
Op2=5
Point(doClear)
link(onResult,13618978:doEvent1,[(640,692)(640,732)])
link(Op1,13205261:Var2,[])
}
Add(VisualShape,2992657,442,735)
{
Left=270
Top=425
Width=40
Height=45
Color2=255
ShapeType=12
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,9467089:doStop,[(486,741)(486,748)])
link(onMouseDown,9467089:doTimer,[(486,748)(486,741)])
}
Add(Timer,9467089,498,735)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,13430002:doOperation,[])
}
Add(Math,13430002,554,735)
{
Op2=5
Point(doClear)
link(onResult,4709249:doEvent1,[(626,741)(626,795)])
link(Op1,12802989:Var2,[])
}
Add(VisualShape,14639501,470,784)
{
Left=225
Top=470
Width=45
Height=40
Color2=255
ShapeType=10
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,12190807:doStop,[(514,790)(514,797)])
link(onMouseDown,12190807:doTimer,[(514,797)(514,790)])
}
Add(Timer,12190807,526,784)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,15207710:doOperation,[])
}
Add(Math,15207710,582,784)
{
OpType=1
Op2=5
Point(doClear)
link(onResult,13618978:doEvent2,[(640,790)(640,739)])
link(Op1,13205261:Var1,[(588,710)(579,710)(579,635)])
}
Add(Hub,13618978,666,726)
{
InCount=2
OutCount=1
link(onEvent1,13420450:doEvent1,[(692,732)(692,529)(93,529)(93,326)])
}
Add(VisualShape,15276010,396,831)
{
Left=185
Top=425
Width=40
Height=45
Color2=255
ShapeType=11
Point(onMouseUp)
Point(onMouseDown)
link(onMouseUp,3722583:doStop,[(441,837)(441,844)])
link(onMouseDown,3722583:doTimer,[(441,844)(441,837)])
}
Add(Timer,3722583,453,831)
{
Interval=100
Enable=1
AutoStop=99
Point(doStopAll)
Point(onStop)
link(onTimer,15063053:doOperation,[])
}
Add(Math,15063053,509,831)
{
OpType=1
Op2=5
Point(doClear)
link(onResult,4709249:doEvent2,[(603,837)(603,802)])
link(Op1,12802989:Var1,[(515,649)])
}
Add(Hub,4709249,666,789)
{
InCount=2
OutCount=1
link(onEvent1,16124647:doEvent1,[(692,795)(692,589)(93,589)(93,382)])
}
Add(GetDataEx,8356408,196,349)
{
Angle=3
link(Data,2842380:Position,[(156,354)])
}
Add(GetDataEx,13205261,582,630)
{
link(Data,8356408:Var2,[(588,522)(202,522)])
}
Add(GetDataEx,15542157,252,428)
{
Angle=3
link(Data,16186766:Position,[(163,433)])
}
Add(GetDataEx,12802989,554,644)
{
link(Data,15542157:Var2,[(560,586)(258,586)])
}
Add(VisualShape,4096131,151,900)
{
Left=60
Top=427
Width=45
Height=40
Name="50"
Color2=16711680
ShapeType=4
Point(onMouseUp)
Point(onMouseDown)
Point(onDblClick)
link(onDblClick,13362422:doOperation,[(207,920)(207,909)])
}
Add(GetDataEx,2390855,273,588)
{
link(Data,1327192:Var2,[(279,414)(230,414)])
}
Add(Math,13362422,218,903)
{
Op2=50
Point(doClear)
link(onResult,10238312:doEvent1,[(265,909)(265,913)])
}
Add(HubEx,6679270,124,301)
{
Angle=3
link(onEvent,8211060:doEvent3,[(128,103)])
}
Add(Hub,10238312,280,907)
{
link(onEvent1,6679270:doWork3,[(334,913)(334,622)(128,622)])
link(onEvent2,8869398:doEvent3,[(306,920)(306,588)(93,588)(93,257)])
}
Add(VisualShape,8259093,452,886)
{
Left=225
Top=427
Width=45
Height=40
Name="50"
Color2=16711680
ShapeType=4
Point(onMouseUp)
Point(onMouseDown)
Point(onDblClick)
link(onDblClick,4516397:doOperation,[(508,906)(508,895)])
}
Add(Math,4516397,519,889)
{
Op2=50
Point(doClear)
link(onResult,9020968:doEvent1,[(566,895)(566,899)])
}
Add(Hub,9020968,581,893)
{
link(onEvent1,13420450:doEvent2,[(607,899)(607,616)(93,616)(93,333)])
link(onEvent2,16124647:doEvent2,[(607,906)(607,648)(93,648)(93,389)])
}
Add(Hub,13420450,105,320)
{
InCount=2
OutCount=1
link(onEvent1,2842380:doPosition,[(135,326)(135,313)])
}
Add(Hub,16124647,105,376)
{
InCount=2
OutCount=1
link(onEvent1,16186766:doPosition,[(138,382)(138,369)])
}
Add(Hub,5747269,1491,273)
{
link(onEvent1,12500263:doClear,[(1547,279)(1547,244)])
link(onEvent2,15357889:doEvent2,[(1517,286)(1517,272)(1493,272)(1493,258)])
}
Add(StrList,12500263,1589,231)
{
Point(doGetString)
Point(onGetString)
Point(IdxToSelect)
link(onChange,11466364:doAdd,[(1634,237)(1634,294)(1577,294)(1577,321)])
link(Str,12980779:Text,[(1595,215)(1567,215)])
link(FileName,7607326:Caption,[(1602,184)(1658,184)])
link(onGetString,8682750:doEvent1,[(1647,244)(1647,258)])
link(IdxToSelect,9865117:Result,[(1609,219)(1607,219)(1607,594)(1604,594)])
}
Add(Edit,12980779,1561,168)
{
Left=490
Top=125
Width=160
}
Add(Button,517459,1449,210)
{
Left=370
Top=185
Width=100
Height=30
Caption="записать строку"
Point(onMouseDown)
link(onClick,12500263:doAdd,[(1542,216)(1542,237)])
link(onMouseDown,15357889:doEvent1,[(1493,223)(1493,251)])
}
Add(Memo,11466364,1589,315)
{
Left=485
Top=155
Width=165
Height=340
ScrollBars=2
link(onChange,12742858:doEvent1,[(1633,321)(1633,391)])
link(Str,12500263:Text,[])
}
Add(Label,6909489,1680,315)
{
Left=575
Top=500
link(Text,12500263:Count,[(1686,301)(1602,301)])
}
Add(Label,5500393,1722,238)
{
Left=730
Top=220
Width=85
Height=45
}
Add(ODialog,12008771,1463,119)
{
Filter="Text files|*.txt|INI files|*.ini"
FileName=""
link(onExecute,6055740:doEvent1,[(1539,125)(1539,118)])
}
Add(InfoTip,13966878,1393,105)
{
Info=#9:text only|
Width=134
Height=53
}
Add(SDialog,10489777,1505,371)
{
Filter="txt|*.txt"
link(onExecute,11466364:doSave,[(1563,377)(1563,356)])
}
Add(Label,7607326,1652,112)
{
Left=365
Top=80
Width=155
}
Add(Hub,6055740,1582,112)
{
link(onEvent1,7607326:doText,[])
link(onEvent2,12500263:doLoad,[(1608,125)(1608,195)(1577,195)(1577,265)])
}
Add(Label,1058465,1714,94)
{
Left=485
Top=500
Width=85
Caption="Число шагов"
}
Add(Menu,137934,1239,287)
{
Menu=#4:Меню|1:(|16:Открыть из файла|16:Сохранить в файл|5:Выход|1:)|0:|0:|0:|
Point(onSelectNum)
link(onSelectNum,2345105:doEvent,[])
}
Add(IndexToChanel,2345105,1288,294)
{
Count=4
link(onEvent2,12008771:doExecute,[(1388,307)(1388,125)])
link(onEvent3,10489777:doExecute,[(1409,314)(1409,377)])
link(onEvent4,68149:doClose,[(1332,321)(1332,293)(695,293)(695,265)])
}
Add(Button,3363250,1446,263)
{
Left=370
Top=225
Width=100
Height=30
Caption="очистить список"
link(onClick,5747269:doEvent1,[(1488,269)(1488,279)])
}
Add(Hub,15357889,1505,245)
{
InCount=2
OutCount=1
link(onEvent1,11466364:doClear,[(1554,251)(1554,328)])
}
Add(Hub,4693190,875,427)
{
InCount=2
link(onEvent1,12648551:doString,[(901,433)(901,475)(709,475)(709,517)])
link(onEvent2,12980779:doText,[(1221,440)(1221,174)])
}
Add(Label,4753934,721,392)
{
Left=365
Top=125
Width=125
Caption="последняя команда"
}
Add(Math,7335355,1505,588)
{
link(onResult,14007165:doEvent1,[(1542,594)(1542,573)])
link(Op1,12013170:Count,[(1511,559)(1448,559)])
link(Op2,3547547:Text,[])
}
Add(MMTimer,11122287,1358,497)
{
Interval=100
Enable=1
link(onTimer,12013170:doNext,[(1416,503)(1416,517)])
}
Add(Edit,3547547,1512,504)
{
Left=420
Top=410
Width=45
Text="1"
}
Add(Button,793853,1288,511)
{
Left=370
Top=285
Width=100
Height=30
Caption="старт"
Point(onMouseDown)
link(onClick,11122287:doTimer,[(1339,517)(1339,503)])
}
Add(Button,576172,1194,564)
{
Left=370
Top=325
Width=100
Height=30
Caption="стоп"
link(onClick,7259390:doEvent1,[(1257,570)(1257,566)])
}
Add(Label,12848762,1675,549)
{
Left=430
Top=470
Width=23
Height=17
Caption="шаг"
}
Add(Counter,12013170,1442,511)
{
link(onNext,7335355:doOperation,[(1490,517)(1490,594)])
}
Add(Button,12320526,1341,578)
{
Left=370
Top=365
Width=100
Height=30
Caption="сброс"
link(onClick,12013170:doReset,[(1407,584)(1407,531)])
}
Add(If_else,7255536,1722,595)
{
Type=2
link(onTrue,7259390:doEvent2,[(1762,601)(1762,539)(1689,539)(1283,545)(1283,573)])
link(Op1,7335355:Result,[(1728,583)(1620,583)(1620,632)(1511,632)])
link(Op2,9300860:Text,[(1735,524)(1707,524)])
}
Add(Edit,9300860,1701,462)
{
Left=420
Top=440
Width=45
Text="0"
link(Str,6909489:Caption,[(1707,404)(1686,404)])
}
Add(Hub,12893670,1638,595)
{
OutCount=4
link(onEvent1,12848762:doText,[(1664,601)(1664,555)])
link(onEvent2,7255536:doCompare,[(1687,608)(1687,601)])
link(onEvent3,9865117:doOperation,[(1664,615)(1664,585)(1586,585)(1586,556)])
link(onEvent4,12500263:doGetString,[(1664,622)(1664,450)(1577,450)(1577,279)])
}
Add(Hub,7259390,1295,560)
{
InCount=2
OutCount=1
link(onEvent1,11122287:doStop,[(1333,566)(1333,510)])
}
Add(Math,1126122,1591,606)
{
OpType=1
Op2=1
link(onResult,12893670:doEvent1,[(1627,612)(1627,601)])
}
Add(Hub,14007165,1547,567)
{
OutCount=3
link(onEvent1,1126122:doOperation,[(1576,573)(1576,612)])
}
Add(Math,9865117,1598,550)
{
OpType=1
Op2=1
link(Op1,12848762:Caption,[(1604,538)(1642,538)(1642,593)(1681,593)])
}
Add(Label,15339694,1322,633)
{
Left=350
Top=410
Width=64
Height=27
Caption="первый шаг"
}
Add(Label,591582,1318,626)
{
Left=350
Top=440
Width=53
Height=17
Caption="посл. шаг"
}
Add(Label,14720052,1317,619)
{
Left=350
Top=470
Width=46
Height=17
Caption="тек. шаг"
}
Add(Hub,12742858,1645,385)
{
link(onEvent1,6909489:doText,[(1669,391)(1669,321)])
link(onEvent2,9300860:doText,[(1680,398)(1680,468)])
}
Add(Hub,8682750,1673,252)
{
link(onEvent1,5500393:doText,[(1705,258)(1705,244)])
link(onEvent2,96560:doEvent2,[(1699,265)(1699,395)(765,395)(765,524)])
}
Add(Label,392766,1318,626)
{
Left=45
Top=25
Width=196
Height=28
Font=[MS Sans Serif,16,1,0,1]
Caption="Ручное управление"
}
Add(Label,8188451,1317,619)
{
Left=355
Top=25
Width=291
Height=28
Font=[MS Sans Serif,16,1,0,1]
Caption="Автоматическое управление"
}
Add(Label,3811204,1315,612)
{
Left=695
Top=25
Width=108
Height=28
Font=[MS Sans Serif,16,1,0,1]
Caption="Настройка"
}


Редактировалось 1 раз(а), последний 2018-11-17 19:51:42
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 16884
Рейтинг: 1239
#2: 2018-11-17 20:24:03 ЛС | профиль | цитата
В гугле набери "Режим совместимости Windows 8"
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 3
Рейтинг: 0
#3: 2018-11-17 20:48:34 ЛС | профиль | цитата
К сожалению это было проверено в первую очередь. Ни автоматическое определение ни ручное не привели к исправлению ошибки. Вылетает во всех случаях.
карма: 0

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#4: 2018-11-17 21:40:59 ЛС | профиль | цитата
tvilsa писал(а):
но при попытке запуска в windows 8 вылетает с ошибкой

Странно, запустил на Win10 x64, никуда ничего не вылетело. Что надо нажать, чтобы вылетело?

P.S. Хотя схема ужасная.

Редактировалось 1 раз(а), последний 2018-11-17 21:41:47
карма: 22

0
Ответов: 3
Рейтинг: 0
#5: 2018-11-17 22:03:13 ЛС | профиль | цитата
не спорю так и есть. (где то в подписи у когото было, что отсутствие знаний пакета не уменьшает функциональность но повышает сложность кода , это как раз этот случай). с ошибкой разобрался её провоцирует компонент sleep. пока удалил.

--- Добавлено в 2018-11-17 22:04:20

вылетало сразу при запуске программы. нажимать ничего не надо было. все само :-D

Редактировалось 1 раз(а), последний 2018-11-17 22:04:20
карма: 0

0
Ответов: 1925
Рейтинг: 172
#6: 2018-11-17 23:26:41 ЛС | профиль | цитата
Я всегда этот компонент недолюбливал, чаще использовал таймер для задержек.
карма: 9
0
Ответов: 16884
Рейтинг: 1239
#7: 2018-11-23 20:51:54 ЛС | профиль | цитата
tvilsa,

Add(MainForm,2953706,21,105)
{
Width=175
Height=99
link(onCreate,15506003:doEnumPorts,[])
}
Add(ComboBox,1453292,133,119)
{
Left=20
Top=20
Height=21
Ctl3D=0
Text=""
DataType=1
ReadOnly=0
Point(EditText)
}
Add(EnumCOM,15506003,77,119)
{
OutType=0
link(onEnumPorts,1453292:doAdd,[])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
7
Сообщение
...
Прикрепленные файлы
(файлы не залиты)