KPG, Add(MainForm,14657622,182,154) { Width=764 link(onCreate,2551932:doReplace,[]) } Add(Edit,6626354,245,112) { Width=748 Align=2 Font=[MS Sans Serif,10,0,0,1] Text="ССС дддннннннеееееемммм ппппппрррррооооооггггггрррррааааааммммммммииииииссссссттттттаааааа!!!!!!" } Add(ArrayEnum,14767397,385,189) { link(onItem,8085234:doEvent1,[]) link(onEndEnum,4023903:doEvent1,[(431,202)(431,258)]) link(Array,13226017:Array,[]) } Add(StrList,13226017,371,112) { Strings=#1:С|1: |1:д|1:н|1:е|1:м|1: |1:п|1:р|1:о|1:г|1:р|1:а|1:м|1:м|1:и|1:с|1:т|1:а|1:!| } Add(Replace,2551932,245,168) { SubStr=" " link(onReplace,13830191:doEnum,[]) link(Str,6626354:Text,[]) } Add(Str_Enum,13830191,301,168) { Delimiter="" link(onEnum,16267152:doAdd,[]) link(onEndEnum,6107346:doWork1,[(361,181)]) } Add(StrList,16267152,497,168) { Point(doGetIndex) Point(onGetIndex) link(onGetIndex,11976430:doEvent1,[]) } Add(Hub,11976430,553,175) { link(onEvent1,16267152:doDelete,[(578,181)(578,160)(487,160)(487,188)]) link(onEvent2,12933730:doCase,[]) } Add(Case,12933730,588,182) { Value=Integer(-1) DataOnTrue=String( ) link(onNextCase,435879:doWork2,[]) link(onTrue,4383336:doEvent1,[]) } Add(Memory,14743216,735,133) { Default=String( ) } Add(Hub,8085234,441,189) { link(onEvent1,14743216:doValue,[(466,195)(466,139)]) link(onEvent2,16267152:doGetIndex,[]) } Add(If_else,5110466,497,266) { Type=2 Op1=Integer(1) Op2=Integer(0) link(onFalse,6107346:doWork3,[(539,279)(539,313)(361,313)]) link(Op2,16267152:Count,[]) } Add(StrCat,1752997,728,182) { Point(doClear) link(Str1,8888575:Var1,[(734,173)(720,173)(720,222)]) link(Str2,14743216:Value,[]) } Add(GetDataEx,8888575,728,217) { link(Data,1752997:Result,[]) } Add(Memo,13941591,728,252) { Top=20 Width=748 Height=241 Align=5 Font=[Lucida Console,12,0,0,204] ScrollBars=3 link(Str,8888575:Var2,[]) } Add(Hub,4023903,455,252) { link(onEvent1,10146146:doEvent1,[]) link(onEvent2,5110466:doCompare,[(487,265)(487,272)]) } Add(HubEx,6107346,357,189) { link(onEvent,14767397:doEnum,[]) } Add(Hub,10146146,651,252) { link(onEvent1,13941591:doAdd,[]) link(onEvent2,1752997:doClear,[(697,265)(697,195)]) } Add(Hub,4383336,644,189) { link(onEvent1,14743216:doClear,[(669,195)(669,146)]) link(onEvent2,435879:doWork3,[(690,202)]) } Add(HubEx,435879,686,182) { link(onEvent,1752997:doStrCat,[]) }
Редактировалось 1 раз(а), последний 2022-12-17 22:11:18
|