Можно воспользоваться нестандартным элементом: AdjustControls(Настройки интерфейса) что упростит настройку интерфейсных элементов. Add(Edit,2900382,427,203) { Left=145 Top=40 TabOrder=1 Name="Edit1" Text="" Point(doSetFocus) Point(onSetFocus) link(onSetFocus,4051188:doStrCatDlm,[]) } Add(Edit,11802280,427,259) { Left=145 Top=75 TabOrder=2 Name="Edit2" Text="" Point(onSetFocus) link(onSetFocus,5485134:doStrCatDlm,[]) } Add(Edit,14683328,427,315) { Left=145 Top=110 TabOrder=3 Name="Edit3" Text="" Point(onSetFocus) link(onSetFocus,13389485:doStrCatDlm,[]) } Add(Edit,13031914,427,378) { Left=145 Top=145 TabOrder=4 Name="Edit4" Text="" Point(onSetFocus) link(onSetFocus,15028634:doStrCatDlm,[]) } Add(MainForm,2953706,427,119) { Width=531 Position=1 } Add(ChildPanel,13577154,560,217) { } BEGIN_SDK Add(EditMulti,2315616,21,21) { EventCount=1 WorkCount=1 Width=783 Height=550 link(doWork1,11382835:doSplit,[]) } Add(Panel,2899805,133,105) { Left=300 Top=20 Width=196 Height=191 Color=-16777215 } Add(Button,8123954,224,105) { Left=10 Top=10 Height=40 TabOrder=-1 Caption="1" Data=String(1) link(onClick,16068034:doWork2,[]) } Add(Button,15621436,266,112) { Left=70 Top=10 Height=40 TabOrder=-1 Caption="2" Data=String(2) link(onClick,6603526:doWork2,[]) } Add(Button,10858996,308,119) { Left=130 Top=10 Height=40 TabOrder=-1 Caption="3" Data=String(3) link(onClick,7020218:doWork2,[]) } Add(Button,13304092,224,154) { Left=10 Top=55 Height=40 TabOrder=-1 Caption="4" Data=String(4) link(onClick,6074418:doWork2,[]) } Add(Button,6365898,266,161) { Left=70 Top=55 Height=40 TabOrder=-1 Caption="5" Data=String(5) link(onClick,6502993:doWork2,[]) } Add(Button,215202,308,168) { Left=130 Top=55 Height=40 TabOrder=-1 Caption="6" Data=String(6) link(onClick,5929663:doWork2,[]) } Add(Button,16730402,224,203) { Left=10 Top=100 Height=40 TabOrder=-1 Caption="7" Data=String(7) link(onClick,2150922:doWork2,[]) } Add(Button,13675507,266,210) { Left=70 Top=100 Height=40 TabOrder=-1 Caption="8" Data=String(8) link(onClick,12681268:doWork2,[]) } Add(Button,11389870,308,217) { Left=130 Top=100 Height=40 TabOrder=-1 Caption="9" Data=String(9) link(onClick,694154:doWork2,[]) } Add(Button,9892486,266,259) { Left=70 Top=145 Height=40 TabOrder=-1 Caption="0" Data=String(0) link(onClick,694154:doWork3,[(418,265)]) } Add(HubEx,16068034,414,105) { Angle=3 link(onEvent,42866:doString,[(418,104)]) } Add(HubEx,6603526,414,112) { Angle=3 link(onEvent,16068034:doWork3,[]) } Add(HubEx,7020218,414,119) { Angle=3 link(onEvent,6603526:doWork3,[]) } Add(HubEx,6074418,414,154) { Angle=3 link(onEvent,7020218:doWork3,[]) } Add(HubEx,6502993,414,161) { Angle=3 link(onEvent,6074418:doWork3,[]) } Add(HubEx,5929663,414,168) { Angle=3 link(onEvent,6502993:doWork3,[]) } Add(HubEx,2150922,414,203) { Angle=3 link(onEvent,5929663:doWork3,[]) } Add(HubEx,12681268,414,210) { Angle=3 link(onEvent,2150922:doWork3,[]) } Add(HubEx,694154,414,217) { Angle=3 link(onEvent,12681268:doWork3,[]) } Add(FormatStr,42866,441,98) { DataCount=3 Mask="%1=Text=%2%3\r\n%1=SetFocus" link(onFString,9750058:doSet,[]) link(Str1,11382835:Part1,[]) link(Str2,11382835:Part2,[]) } Add(AdjustControls,9750058,490,98) { } Add(MultiStrPart,11382835,441,21) { } END_SDK Add(StrCatDelim,4051188,469,217) { Delimiter=";" Str1="Edit1" link(onStrCatDlm,1472928:doWork2,[]) link(Str2,2900382:Text,[(482,205)(463,205)(463,246)(433,246)]) } Add(StrCatDelim,5485134,469,273) { Delimiter=";" Str1="Edit2" link(onStrCatDlm,13127859:doWork2,[]) link(Str2,11802280:Text,[(482,261)(465,261)(465,302)(433,302)]) } Add(StrCatDelim,13389485,469,329) { Delimiter=";" Str1="Edit3" link(onStrCatDlm,4431572:doWork2,[]) link(Str2,14683328:Text,[(482,317)(463,317)(463,368)(433,368)]) } Add(StrCatDelim,15028634,469,392) { Delimiter=";" Str1="Edit4" link(onStrCatDlm,4431572:doWork3,[(508,398)]) link(Str2,13031914:Text,[(482,380)(463,380)(463,421)(433,421)]) } Add(HubEx,1472928,504,217) { link(onEvent,13577154:doWork1,[]) } Add(HubEx,13127859,504,273) { Angle=3 link(onEvent,1472928:doWork3,[]) } Add(HubEx,4431572,504,329) { Angle=3 link(onEvent,13127859:doWork3,[]) }
При таком решении можно и очистить и ввести одной кнопкой нужные данные. В схеме нажатием клавиши Tab переход между Edit-ами, кнопками набор числа. Еще можно добавить при получении Edit-ом фокуса чтоб сдвигалась каретка в конец (doPosition). На стандартных компонентах (пример работы с SendMessage): Add(Edit,2900382,427,203) { Left=145 Top=40 TabOrder=1 Text="" Point(doSetFocus) Point(onSetFocus) Point(Handle) link(onSetFocus,8125823:doData,[]) } Add(Edit,11802280,427,259) { Left=145 Top=75 TabOrder=2 Text="" Point(onSetFocus) Point(Handle) link(onSetFocus,7965549:doData,[]) } Add(Edit,14683328,427,315) { Left=145 Top=110 TabOrder=3 Text="" Point(onSetFocus) Point(Handle) link(onSetFocus,9668951:doData,[]) } Add(Edit,13031914,427,378) { Left=145 Top=145 TabOrder=4 Text="" Point(onSetFocus) Point(Handle) link(onSetFocus,16230459:doData,[]) } Add(MainForm,2953706,427,119) { Width=531 Position=1 } Add(ChildPanel,13577154,574,217) { } BEGIN_SDK Add(EditMulti,2315616,21,21) { WorkCount=1 Width=846 Height=550 link(doWork1,9883853:doValue,[(283,27)(283,69)]) } Add(Panel,2899805,84,259) { Left=300 Top=20 Width=196 Height=191 Color=-16777215 } Add(Button,8123954,175,259) { Left=10 Top=10 Height=40 TabOrder=-1 Caption="1" Data=String(1) link(onClick,16068034:doWork2,[]) } Add(Button,15621436,217,266) { Left=70 Top=10 Height=40 TabOrder=-1 Caption="2" Data=String(2) link(onClick,6603526:doWork2,[]) } Add(Button,10858996,259,273) { Left=130 Top=10 Height=40 TabOrder=-1 Caption="3" Data=String(3) link(onClick,7020218:doWork2,[]) } Add(Button,13304092,175,308) { Left=10 Top=55 Height=40 TabOrder=-1 Caption="4" Data=String(4) link(onClick,6074418:doWork2,[]) } Add(Button,6365898,217,315) { Left=70 Top=55 Height=40 TabOrder=-1 Caption="5" Data=String(5) link(onClick,6502993:doWork2,[]) } Add(Button,215202,259,322) { Left=130 Top=55 Height=40 TabOrder=-1 Caption="6" Data=String(6) link(onClick,5929663:doWork2,[]) } Add(Button,16730402,175,357) { Left=10 Top=100 Height=40 TabOrder=-1 Caption="7" Data=String(7) link(onClick,2150922:doWork2,[]) } Add(Button,13675507,217,364) { Left=70 Top=100 Height=40 TabOrder=-1 Caption="8" Data=String(8) link(onClick,12681268:doWork2,[]) } Add(Button,11389870,259,371) { Left=130 Top=100 Height=40 TabOrder=-1 Caption="9" Data=String(9) link(onClick,694154:doWork2,[]) } Add(Button,9892486,217,413) { Left=70 Top=145 Height=40 TabOrder=-1 Caption="0" Data=String(0) link(onClick,694154:doWork3,[(369,419)]) } Add(HubEx,16068034,365,259) { Angle=3 link(onEvent,7274262:doEvent1,[(369,251)]) } Add(HubEx,6603526,365,266) { Angle=3 link(onEvent,16068034:doWork3,[]) } Add(HubEx,7020218,365,273) { Angle=3 link(onEvent,6603526:doWork3,[]) } Add(HubEx,6074418,365,308) { Angle=3 link(onEvent,7020218:doWork3,[]) } Add(HubEx,6502993,365,315) { Angle=3 link(onEvent,6074418:doWork3,[]) } Add(HubEx,5929663,365,322) { Angle=3 link(onEvent,6502993:doWork3,[]) } Add(HubEx,2150922,365,357) { Angle=3 link(onEvent,5929663:doWork3,[]) } Add(HubEx,12681268,365,364) { Angle=3 link(onEvent,2150922:doWork3,[]) } Add(HubEx,694154,365,371) { Angle=3 link(onEvent,12681268:doWork3,[]) } Add(Hub,7274262,406,245) { OutCount=3 link(onEvent1,5834539:doData,[]) link(onEvent2,839236:doStrCat,[(447,258)(447,356)]) link(onEvent3,13473150:doSendMessage,[(437,265)(437,496)]) } Add(SendMessage,15421399,546,301) { Message=13 link(onSend,16305821:doGet,[]) link(Handle,2212676:Var2,[]) link(LParam,1164314:Memory,[(566,285)(615,285)]) } Add(MemoryStream,1164314,595,238) { Point(Memory) Point(doPosition) Point(doSize) } Add(DataToFile,16305821,595,294) { Type=6 Point(doPosition) link(onGet,14944298:doValue,[]) link(Stream,1164314:Stream,[]) } Add(Hub,8233292,511,245) { OutCount=3 link(onEvent1,1164314:doClear,[]) link(onEvent2,1164314:doSize,[(588,258)(588,265)]) link(onEvent3,15421399:doSendMessage,[(535,265)(535,307)]) } Add(DoData,5834539,462,245) { Data=Integer(100000) link(onEventData,8233292:doEvent1,[]) AddHint(-5,-24,51,13,Data) } Add(WinTools,6963430,707,322) { Point(doCaption) link(Handle,2212676:Var3,[(713,159)]) } Add(StrCat,839236,644,350) { link(onStrCat,6963430:doCaption,[]) link(Str1,14944298:Value,[]) } Add(Memory,14944298,644,294) { } Add(SendMessage,13473150,525,490) { @Hint=#19:Устанавливает фокус| Point(Message) link(Handle,2212676:Var1,[(531,159)]) link(Message,5973309:Value,[]) AddHint(51,15,127,13,@Hint) } Add(GetDataEx,2212676,546,154) { link(Data,9883853:Value,[]) } Add(Memory,5973309,546,441) { Default=Integer(7) AddHint(-2,-19,21,13,Default) } Add(Memory,9883853,546,63) { Default=Integer(-1) AddHint(4,-21,24,13,Default) } END_SDK Add(DoData,8125823,483,217) { link(onEventData,4612438:doWork2,[]) link(Data,2900382:Handle,[(489,205)(465,205)(465,247)(440,247)]) } Add(DoData,7965549,483,273) { link(onEventData,8333327:doWork2,[]) link(Data,11802280:Handle,[(489,261)(465,261)(465,303)(440,303)]) } Add(DoData,9668951,483,329) { link(onEventData,15050674:doWork2,[]) link(Data,14683328:Handle,[(489,317)(465,317)(465,359)(440,359)]) } Add(DoData,16230459,483,392) { link(onEventData,15050674:doWork3,[(529,398)]) link(Data,13031914:Handle,[(489,380)(465,380)(465,422)(440,422)]) } Add(HubEx,4612438,525,217) { link(onEvent,13577154:doWork1,[]) } Add(HubEx,8333327,525,273) { Angle=3 link(onEvent,4612438:doWork3,[]) } Add(HubEx,15050674,525,329) { Angle=3 link(onEvent,8333327:doWork3,[]) }
Вот так подсвечивается редактируемый Edit: Add(Edit,2900382,427,196) { Left=145 Top=40 TabOrder=1 Text="" Point(onSetFocus) Point(Handle) Point(doSelectAll) link(onSetFocus,9712476:doEvent1,[]) } Add(Edit,11802280,427,266) { Left=145 Top=75 TabOrder=2 Text="" Point(onSetFocus) Point(Handle) Point(doSelectAll) link(onSetFocus,10204604:doEvent1,[]) } Add(Edit,14683328,427,329) { Left=145 Top=110 TabOrder=3 Text="" Point(onSetFocus) Point(Handle) Point(doSelectAll) link(onSetFocus,6151629:doEvent1,[]) } Add(Edit,13031914,427,399) { Left=145 Top=145 TabOrder=4 Text="" Point(onSetFocus) Point(Handle) Point(doSelectAll) link(onSetFocus,6456103:doEvent1,[]) } Add(MainForm,2953706,427,119) { Width=531 Position=1 } Add(ChildPanel,13577154,490,525) { } BEGIN_SDK Add(EditMulti,2315616,21,21) { WorkCount=1 Width=846 Height=550 link(doWork1,9883853:doValue,[(283,27)(283,69)]) } Add(Panel,2899805,84,259) { Left=300 Top=20 Width=196 Height=191 Color=-16777215 } Add(Button,8123954,175,259) { Left=10 Top=10 Height=40 TabOrder=-1 Caption="1" Data=String(1) link(onClick,16068034:doWork2,[]) } Add(Button,15621436,217,266) { Left=70 Top=10 Height=40 TabOrder=-1 Caption="2" Data=String(2) link(onClick,6603526:doWork2,[]) } Add(Button,10858996,259,273) { Left=130 Top=10 Height=40 TabOrder=-1 Caption="3" Data=String(3) link(onClick,7020218:doWork2,[]) } Add(Button,13304092,175,308) { Left=10 Top=55 Height=40 TabOrder=-1 Caption="4" Data=String(4) link(onClick,6074418:doWork2,[]) } Add(Button,6365898,217,315) { Left=70 Top=55 Height=40 TabOrder=-1 Caption="5" Data=String(5) link(onClick,6502993:doWork2,[]) } Add(Button,215202,259,322) { Left=130 Top=55 Height=40 TabOrder=-1 Caption="6" Data=String(6) link(onClick,5929663:doWork2,[]) } Add(Button,16730402,175,357) { Left=10 Top=100 Height=40 TabOrder=-1 Caption="7" Data=String(7) link(onClick,2150922:doWork2,[]) } Add(Button,13675507,217,364) { Left=70 Top=100 Height=40 TabOrder=-1 Caption="8" Data=String(8) link(onClick,12681268:doWork2,[]) } Add(Button,11389870,259,371) { Left=130 Top=100 Height=40 TabOrder=-1 Caption="9" Data=String(9) link(onClick,694154:doWork2,[]) } Add(Button,9892486,217,413) { Left=70 Top=145 Height=40 TabOrder=-1 Caption="0" Data=String(0) link(onClick,694154:doWork3,[(369,419)]) } Add(HubEx,16068034,365,259) { Angle=3 link(onEvent,7274262:doEvent1,[(369,251)]) } Add(HubEx,6603526,365,266) { Angle=3 link(onEvent,16068034:doWork3,[]) } Add(HubEx,7020218,365,273) { Angle=3 link(onEvent,6603526:doWork3,[]) } Add(HubEx,6074418,365,308) { Angle=3 link(onEvent,7020218:doWork3,[]) } Add(HubEx,6502993,365,315) { Angle=3 link(onEvent,6074418:doWork3,[]) } Add(HubEx,5929663,365,322) { Angle=3 link(onEvent,6502993:doWork3,[]) } Add(HubEx,2150922,365,357) { Angle=3 link(onEvent,5929663:doWork3,[]) } Add(HubEx,12681268,365,364) { Angle=3 link(onEvent,2150922:doWork3,[]) } Add(HubEx,694154,365,371) { Angle=3 link(onEvent,12681268:doWork3,[]) } Add(Hub,7274262,406,245) { OutCount=3 link(onEvent1,5834539:doData,[]) link(onEvent2,839236:doStrCat,[(447,258)(447,356)]) link(onEvent3,13473150:doSendMessage,[(437,265)(437,496)]) } Add(SendMessage,15421399,546,301) { Message=13 link(onSend,16305821:doGet,[]) link(Handle,2212676:Var2,[]) link(LParam,1164314:Memory,[(566,285)(615,285)]) } Add(MemoryStream,1164314,595,238) { Point(Memory) Point(doPosition) Point(doSize) } Add(DataToFile,16305821,595,294) { Type=6 Point(doPosition) link(onGet,14944298:doValue,[]) link(Stream,1164314:Stream,[]) } Add(Hub,8233292,511,245) { OutCount=3 link(onEvent1,1164314:doClear,[]) link(onEvent2,1164314:doSize,[(588,258)(588,265)]) link(onEvent3,15421399:doSendMessage,[(535,265)(535,307)]) } Add(DoData,5834539,462,245) { Data=Integer(100000) link(onEventData,8233292:doEvent1,[]) AddHint(-5,-24,51,13,Data) } Add(WinTools,6963430,707,322) { Point(doCaption) link(Handle,2212676:Var3,[(713,159)]) } Add(StrCat,839236,644,350) { link(onStrCat,6963430:doCaption,[]) link(Str1,14944298:Value,[]) } Add(Memory,14944298,644,294) { } Add(SendMessage,13473150,525,490) { @Hint=#19:Устанавливает фокус| Point(Message) link(Handle,2212676:Var1,[(531,159)]) link(Message,5973309:Value,[]) AddHint(51,15,127,13,@Hint) } Add(GetDataEx,2212676,546,154) { link(Data,9883853:Value,[]) } Add(Memory,5973309,546,441) { Default=Integer(7) AddHint(-2,-19,21,13,Default) } Add(Memory,9883853,546,63) { Default=Integer(-1) AddHint(4,-21,24,13,Default) } END_SDK Add(DoData,8125823,504,210) { link(onEventData,5539680:doWork,[]) link(Data,2900382:Handle,[(510,198)(465,198)(465,240)(440,240)]) } Add(DoData,7965549,497,280) { link(onEventData,10681657:doWork,[]) link(Data,11802280:Handle,[(503,268)(465,268)(465,310)(440,310)]) } Add(DoData,9668951,497,343) { link(onEventData,8528988:doWork,[]) link(Data,14683328:Handle,[(503,331)(465,331)(465,373)(440,373)]) } Add(DoData,16230459,497,413) { link(onEventData,637310:doWork,[]) link(Data,13031914:Handle,[(503,401)(465,401)(465,442)(440,442)]) } Add(LineBreakEx,5539680,546,210) { Caption="fcs" } Add(LineBreakEx,10681657,539,280) { Caption="fcs" } Add(LineBreakEx,8528988,539,343) { Caption="fcs" } Add(LineBreakEx,637310,539,413) { Caption="fcs" } Add(LineBreakEx,2787946,448,525) { Caption="fcs" Type=1 link(OnEvent,13577154:doWork1,[]) } Add(Hub,9712476,469,210) { link(onEvent1,8125823:doData,[]) link(onEvent2,2900382:doSelectAll,[(491,223)(491,246)(415,246)(415,216)]) } Add(Hub,10204604,469,280) { link(onEvent1,7965549:doData,[]) link(onEvent2,11802280:doSelectAll,[(494,293)(494,314)(415,314)(415,286)]) } Add(Hub,6151629,469,343) { link(onEvent1,9668951:doData,[]) link(onEvent2,14683328:doSelectAll,[(490,356)(490,380)(415,380)(415,349)]) } Add(Hub,6456103,469,413) { link(onEvent1,16230459:doData,[]) link(onEvent2,13031914:doSelectAll,[(491,426)(491,453)(414,453)(414,419)]) }
Редактировалось 2 раз(а), последний 2025-03-13 11:53:33
|