Вверх ↑
Ответов: 68
Рейтинг: 0
#1: 2022-10-28 17:35:54 ЛС | профиль | цитата
ric писал(а):
В справку надо заглядывать по чаще

Add(MainForm,11922845,497,224)
{
Width=287
Height=232
}
Add(Button,15343263,532,336)
{
Left=15
Top=10
Width=140
TabOrder=-1
Caption="заменить на пробел"
link(onClick,13466306:doMultiReplace,[])
}
Add(Memo,8892279,595,266)
{
Left=15
Top=35
Width=235
Height=140
Strings=#20:1-1-1-1-1-1-1-22222215:333311111555555|3:213|8:81915161|
ScrollBars=2
}
Add(MultiReplace,13466306,616,336)
{
link(onResult,8892279:doText,[(689,342)(689,252)(579,252)(579,293)])
link(Text,8892279:Text,[(622,317)(601,317)])
link(ReplaceList,2328807:Text,[(629,317)(650,317)])
}
Add(Edit,2328807,644,266)
{
@Hint=#8:1=пробел|
Left=165
Top=10
Width=85
Text="1=\ \;"
AddHint(53,-65,43,13,Text)
AddHint(43,-86,63,13,@Hint)
}

|
Первым делом и заглянул ) Кстати там примеры корявые.
Вот кусок программы моей. В ReplaceList в модуле MultiReplace прописаны пробелы. А они не ставятся. Если вставить текст в поле ДЛЯ вида 2020/5050/6060, то он заменится на 2020,5050,6060. Пробелов не будет.
Add(MainForm,2953706,21,105)
{
Width=675
Height=520
}
Add(Memo,1047243,1260,105)
{
Left=10
Top=380
Width=560
Font=[MS Sans Serif,8,0,0,204]
link(onChange,5246067:doRussianKbd,[])
}
Add(Button,9566726,1218,161)
{
Left=10
Top=350
Width=70
Caption="Копировать"
link(onClick,15896286:doPutText,[])
}
Add(Clipboard,15896286,1260,161)
{
Point(PutText)
link(PutText,1047243:Text,[])
}
Add(Hub,6505118,889,126)
{
InCount=9
OutCount=1
link(onEvent1,7065329:doString,[])
}
Add(FormatStr,7065329,924,126)
{
DataCount=9
Mask="%1%2%3%4%9%5%6%7%8"
link(onFString,1047243:doText,[])
link(Str1,7753586:String,[(930,118)(139,118)])
link(Str2,688585:Text,[(937,118)(181,118)])
link(Str3,16390556:Value,[(944,114)(629,114)(629,499)(314,499)])
link(Str4,13483997:Value,[(951,114)(769,114)(769,205)(573,205)])
link(Str5,10319880:Value,[(958,114)(772,114)(772,352)(573,352)])
link(Str6,11855064:Value,[(965,114)(769,114)(769,408)(573,408)])
link(Str7,13165277:Value,[(972,114)(769,114)(769,492)(566,492)])
link(Str8,1602056:Value,[(979,114)(773,114)(773,646)(566,646)])
link(Str9,7358153:Value,[(986,114)(776,114)(776,793)(566,793)])
}
Add(KeyboardLayout,5246067,1316,98)
{
}
Add(ComboBox,7753586,126,77)
{
Left=100
Top=10
Width=120
Height=21
Strings=#0:|14:Чёрный [Black]|25:Фото чёрный [Photo Black]|28:Матовый чёрный [Matte Black]|14:Голубой [Cyan]|27:Светло-голубой [Light Cyan]|19:Пурпурный [Magenta]|32:Светло-пурпурный [Light Magenta]|15:Жёлтый [Yellow]|13:Красный [Red]|12:Серый [Gray]|25:Светло-серый [Light Gray]|12:Синий [Blue]|
Text=""
ReadOnly=0
DropDownCount=80
link(onClick,6505118:doEvent1,[(524,90)(524,132)])
}
Add(Label,4373426,126,35)
{
Left=10
Top=15
Width=29
Height=17
Caption="Цвет"
}
Add(Edit,5812158,252,133)
{
Left=180
Top=40
Width=40
Text=""
link(onChange,14575967:doEvent2,[(289,139)(289,153)(205,153)(205,188)])
}
Add(CheckBox,7633038,119,168)
{
Left=100
Top=40
Width=80
Caption="Количество"
link(onCheck,4373306:doCase,[])
}
Add(FormatStr,8250489,252,175)
{
Mask="%1 x "
Point(FString)
link(onFString,13207797:doValue,[(302,181)(302,167)])
link(Str1,5812158:Text,[])
}
Add(Case,4373306,161,168)
{
Value=String(1)
link(onNextCase,13207797:doClear,[])
link(onTrue,14575967:doEvent1,[])
}
Add(Memory,13207797,308,161)
{
link(onData,1562718:doEvent2,[(352,167)(352,325)(205,325)(205,482)])
}
Add(Hub,14575967,217,175)
{
InCount=3
OutCount=3
link(onEvent3,8250489:doString,[(247,195)(247,181)])
}
Add(ComboBox,16131654,497,126)
{
Left=100
Top=95
Width=120
Height=21
Strings=#0:|6:флакон|8:канистра|5:пакет|7:коробка|
Text=""
ReadOnly=0
DropDownCount=80
link(onClick,14592789:doEvent2,[(541,139)(541,163)(464,163)(464,188)])
}
Add(CheckBox,5172458,378,168)
{
Left=10
Top=95
Width=70
Caption="Упаковка"
link(onCheck,1523344:doCase,[])
}
Add(Edit,16764114,539,126)
{
Left=230
Top=95
Width=105
Text=""
link(onChange,14592789:doEvent3,[(583,132)(583,164)(464,164)(464,195)])
}
Add(CheckBox,13470645,119,266)
{
Left=405
Top=40
Width=35
Caption="мл"
link(onCheck,14721925:doCase,[])
}
Add(CheckBox,6910270,119,462)
{
Left=10
Top=40
Width=60
Caption="Ресурс"
link(onCheck,5821401:doCase,[])
}
Add(Edit,5358191,273,413)
{
Left=230
Top=40
Width=105
Text=""
link(onChange,1562718:doEvent3,[(317,419)(317,454)(205,454)(205,489)])
}
Add(Edit,688585,175,77)
{
Left=230
Top=10
Width=105
Text=""
link(onChange,6505118:doEvent2,[(548,83)(548,139)])
}
Add(CheckBox,5882613,119,217)
{
Left=340
Top=40
Width=65
Caption="страниц"
link(onCheck,11164368:doCase,[])
}
Add(CheckBox,13864317,371,602)
{
Left=10
Top=200
Width=45
Caption="Для"
link(onCheck,10553986:doCase,[])
}
Add(Edit,9201018,504,504)
{
Left=100
Top=200
Width=540
Height=85
Text=""
link(onChange,10281728:doMultiReplace,[(548,510)(548,538)(492,538)(492,566)])
}
Add(CheckBox,12017167,119,364)
{
Left=505
Top=40
Width=80
Caption="килограмм"
link(onCheck,8821536:doCase,[])
}
Add(CheckBox,13405229,119,315)
{
Left=445
Top=40
Caption="грамм"
link(onCheck,16534275:doCase,[])
}
Add(FormatStr,16048838,252,469)
{
DataCount=6
Mask=", %1%2%3%4%5%6"
Point(FString)
link(onFString,16390556:doValue,[(302,475)(302,461)])
link(Str1,13207797:Value,[(258,331)(314,331)])
link(Str2,5358191:Text,[(265,457)(279,457)])
link(Str3,6119085:Value,[(272,355)(314,355)])
link(Str4,16242409:Value,[(279,380)(314,380)])
link(Str5,13361885:Value,[(286,405)(314,405)])
link(Str6,7812047:Value,[(293,429)(314,429)])
}
Add(Case,5821401,161,462)
{
Value=String(1)
link(onNextCase,16390556:doClear,[])
link(onTrue,1562718:doEvent1,[])
}
Add(Memory,16390556,308,455)
{
link(onData,6505118:doEvent3,[(614,461)(614,146)])
}
Add(Hub,1562718,217,469)
{
InCount=7
OutCount=3
link(onEvent3,16048838:doString,[(247,489)(247,475)])
}
Add(FormatStr,10701806,511,175)
{
Mask=", %1%2"
Point(FString)
link(onFString,13483997:doValue,[(561,181)(561,167)])
link(Str1,16131654:String,[(517,167)(510,167)])
link(Str2,16764114:Text,[(524,167)(545,167)])
}
Add(Case,1523344,420,168)
{
Value=String(1)
link(onNextCase,13483997:doClear,[])
link(onTrue,14592789:doEvent1,[])
}
Add(Memory,13483997,567,161)
{
link(onData,6505118:doEvent4,[(751,167)(751,153)])
}
Add(Hub,14592789,476,175)
{
InCount=3
OutCount=3
link(onEvent3,10701806:doString,[(506,195)(506,181)])
}
Add(FormatStr,7711659,252,322)
{
Mask=" гр"
Point(FString)
link(onFString,13361885:doValue,[(302,328)(302,314)])
}
Add(Case,16534275,161,315)
{
Value=String(1)
link(onNextCase,13361885:doClear,[])
link(onTrue,6345173:doEvent1,[])
}
Add(Memory,13361885,308,308)
{
link(onData,1562718:doEvent6,[(352,314)(352,412)(205,412)(205,510)])
}
Add(Hub,6345173,217,322)
{
InCount=3
OutCount=3
link(onEvent3,7711659:doString,[(247,342)(247,328)])
}
Add(FormatStr,4530990,504,609)
{
Mask=", для %1"
Point(FString)
link(onFString,1602056:doValue,[(554,615)(554,601)])
link(Str1,10281728:Result,[])
}
Add(Case,10553986,413,602)
{
Value=String(1)
link(onNextCase,1602056:doClear,[])
link(onTrue,15103514:doEvent1,[])
}
Add(Memory,1602056,560,595)
{
link(onData,6505118:doEvent8,[(740,601)(740,181)])
}
Add(Hub,15103514,469,609)
{
InCount=3
OutCount=3
link(onEvent3,4530990:doString,[(499,629)(499,615)])
}
Add(FormatStr,1921720,252,371)
{
Mask=" кг"
Point(FString)
link(onFString,7812047:doValue,[(302,377)(302,363)])
}
Add(Case,8821536,161,364)
{
Value=String(1)
link(onNextCase,7812047:doClear,[])
link(onTrue,12691564:doEvent1,[])
}
Add(Memory,7812047,308,357)
{
link(onData,1562718:doEvent7,[(352,363)(352,440)(205,440)(205,517)])
}
Add(Hub,12691564,217,371)
{
InCount=3
OutCount=3
link(onEvent3,1921720:doString,[(247,391)(247,377)])
}
Add(FormatStr,16135352,252,224)
{
Mask=" страниц"
Point(FString)
link(onFString,6119085:doValue,[(302,230)(302,216)])
}
Add(Case,11164368,161,217)
{
Value=String(1)
link(onNextCase,6119085:doClear,[])
link(onTrue,11230450:doEvent1,[])
}
Add(Memory,6119085,308,210)
{
link(onData,1562718:doEvent4,[(352,216)(352,356)(205,356)(205,496)])
}
Add(Hub,11230450,217,224)
{
InCount=3
OutCount=3
link(onEvent3,16135352:doString,[(247,244)(247,230)])
}
Add(FormatStr,113426,252,273)
{
Mask=" мл"
Point(FString)
link(onFString,16242409:doValue,[(302,279)(302,265)])
}
Add(Case,14721925,161,266)
{
Value=String(1)
link(onNextCase,16242409:doClear,[])
link(onTrue,7452048:doEvent1,[])
}
Add(Memory,16242409,308,259)
{
link(onData,1562718:doEvent5,[(352,265)(352,384)(205,384)(205,503)])
}
Add(Hub,7452048,217,273)
{
InCount=3
OutCount=3
link(onEvent3,113426:doString,[(247,293)(247,279)])
}
Add(Edit,3188876,518,280)
{
Left=450
Top=95
Width=120
Text=""
link(onChange,10460318:doEvent2,[(555,286)(555,300)(464,300)(464,335)])
}
Add(CheckBox,4405506,378,315)
{
Left=340
Top=95
Width=70
Caption="Фасовка"
link(onCheck,15738923:doCase,[])
}
Add(FormatStr,15920355,511,322)
{
Mask=", фасовка %1%2"
Point(FString)
link(onFString,10319880:doValue,[(561,328)(561,314)])
link(Str1,15858124:Value,[(517,289)(573,289)])
link(Str2,3188876:Text,[])
}
Add(Case,15738923,420,315)
{
Value=String(1)
link(onNextCase,10319880:doClear,[])
link(onTrue,10460318:doEvent1,[])
}
Add(Memory,10319880,567,308)
{
link(onData,6505118:doEvent5,[(751,314)(751,160)])
}
Add(Hub,10460318,476,322)
{
InCount=3
OutCount=3
link(onEvent3,15920355:doString,[(506,342)(506,328)])
}
Add(CheckBox,14634464,378,231)
{
Left=410
Top=95
Width=40
Caption="РФ"
link(onCheck,2939809:doCase,[])
}
Add(FormatStr,14284749,511,238)
{
Mask="РФ"
Point(FString)
link(onFString,15858124:doValue,[(561,244)(561,230)])
}
Add(Case,2939809,420,231)
{
Value=String(1)
link(onNextCase,15858124:doClear,[])
link(onTrue,14350264:doEvent1,[])
}
Add(Memory,15858124,567,224)
{
link(onData,10460318:doEvent3,[(611,230)(611,286)(464,286)(464,342)])
}
Add(Hub,14350264,476,238)
{
InCount=3
OutCount=3
link(onEvent3,14284749:doString,[(506,258)(506,244)])
}
Add(CheckBox,8077495,378,371)
{
Left=10
Top=125
Width=80
Caption="Химический"
link(onCheck,10729737:doCase,[])
}
Add(FormatStr,1892004,511,378)
{
Mask=", химический"
Point(FString)
link(onFString,11855064:doValue,[(561,384)(561,370)])
}
Add(Case,10729737,420,371)
{
Value=String(1)
link(onNextCase,11855064:doClear,[])
link(onTrue,6199045:doEvent1,[])
}
Add(Memory,11855064,567,364)
{
link(onData,6505118:doEvent6,[(744,370)(744,167)])
}
Add(Hub,6199045,476,378)
{
InCount=3
OutCount=3
link(onEvent3,1892004:doString,[(506,398)(506,384)])
}
Add(Label,6346140,378,126)
{
Left=10
Top=75
Width=35
Height=17
Caption="Тонер"
}
Add(Edit,7188752,504,420)
{
Left=160
Top=125
Width=320
Text=""
link(onChange,6415069:doEvent2,[(548,426)(548,440)(457,440)(457,475)])
}
Add(CheckBox,10630891,371,455)
{
Left=100
Top=125
Width=60
Caption="Другое"
link(onCheck,4713045:doCase,[])
}
Add(FormatStr,4870932,504,462)
{
Mask=", %1"
Point(FString)
link(onFString,13165277:doValue,[(554,468)(554,454)])
link(Str1,7188752:Text,[])
}
Add(Case,4713045,413,455)
{
Value=String(1)
link(onNextCase,13165277:doClear,[])
link(onTrue,6415069:doEvent1,[])
}
Add(Memory,13165277,560,448)
{
link(onData,6505118:doEvent7,[(740,454)(740,174)])
}
Add(Hub,6415069,469,462)
{
InCount=3
OutCount=3
link(onEvent3,4870932:doString,[(499,482)(499,468)])
}
Add(Edit,11017113,504,826)
{
Left=170
Top=170
Width=100
Text=""
link(onChange,9666172:doEvent2,[(548,832)(548,846)(457,846)(457,881)])
}
Add(CheckBox,8400345,371,861)
{
Left=10
Top=170
Width=60
Caption="Аналог"
link(onCheck,6891744:doCase,[])
}
Add(FormatStr,827663,504,868)
{
DataCount=4
Mask=", аналог %3%4 %1%2"
Point(FString)
link(onFString,7358153:doValue,[(554,874)(554,860)])
link(Str1,11017113:Text,[])
link(Str2,71682:Value,[(517,835)(566,835)])
link(Str3,4266601:Value,[(524,772)(566,772)])
link(Str4,6471744:Value,[(531,793)(566,793)])
}
Add(Case,6891744,413,861)
{
Value=String(1)
link(onNextCase,7358153:doClear,[])
link(onTrue,9666172:doEvent1,[])
}
Add(Memory,7358153,560,854)
{
link(onData,6505118:doEvent9,[(740,860)(740,188)])
}
Add(Hub,9666172,469,868)
{
InCount=5
OutCount=3
link(onEvent3,827663:doString,[(499,888)(499,874)])
}
Add(Edit,16535472,504,742)
{
Left=415
Top=170
Width=100
Text=""
link(onChange,14381822:doEvent2,[(548,748)(548,762)(457,762)(457,797)])
}
Add(CheckBox,8969012,371,777)
{
Left=290
Top=170
Width=120
Caption="Артикул картриджа"
link(onCheck,5993488:doCase,[])
}
Add(FormatStr,8515677,504,784)
{
Mask=" [%1]"
Point(FString)
link(onFString,71682:doValue,[(554,790)(554,776)])
link(Str1,16535472:Text,[])
}
Add(Case,5993488,413,777)
{
Value=String(1)
link(onNextCase,71682:doClear,[])
link(onTrue,14381822:doEvent1,[])
}
Add(Memory,71682,560,770)
{
link(onData,9666172:doEvent3,[(604,776)(604,832)(457,832)(457,888)])
}
Add(Hub,14381822,469,784)
{
InCount=3
OutCount=3
link(onEvent3,8515677:doString,[(499,804)(499,790)])
}
Add(CheckBox,8819338,371,651)
{
Left=70
Top=160
Width=80
Caption="картриджа"
link(onCheck,12003545:doCase,[])
}
Add(CheckBox,14967462,371,693)
{
Left=70
Top=180
Width=95
Caption="фотобарабана"
link(onCheck,10208378:doCase,[])
}
Add(FormatStr,7299958,504,658)
{
Mask="картриджа"
Point(FString)
link(onFString,4266601:doValue,[(554,664)(554,650)])
}
Add(Case,12003545,413,651)
{
Value=String(1)
link(onNextCase,4266601:doClear,[])
link(onTrue,7263089:doEvent1,[])
}
Add(Memory,4266601,560,644)
{
link(onData,9666172:doEvent5,[(604,650)(604,776)(457,776)(457,902)])
}
Add(Hub,7263089,469,658)
{
InCount=3
OutCount=3
link(onEvent3,7299958:doString,[(499,678)(499,664)])
}
Add(FormatStr,16664218,504,700)
{
Mask="фотобарабана"
Point(FString)
link(onFString,6471744:doValue,[(554,706)(554,692)])
}
Add(Case,10208378,413,693)
{
Value=String(1)
link(onNextCase,6471744:doClear,[])
link(onTrue,3332884:doEvent1,[])
}
Add(Memory,6471744,560,686)
{
link(onData,9666172:doEvent4,[(604,692)(604,794)(457,794)(457,895)])
}
Add(Hub,3332884,469,700)
{
InCount=3
OutCount=3
link(onEvent3,16664218:doString,[(499,720)(499,706)])
}
Add(MultiReplace,10281728,504,560)
{
ReplaceList="/~, §\r\n/ ~, §\r\n;~, §"
Delimiter="~"
EndSymbol="§"
link(onResult,15103514:doEvent2,[(548,566)(548,594)(457,594)(457,622)])
link(Text,9201018:Text,[])
}
карма: 1

0
Редактировалось 1 раз(а), последний 2022-10-28 17:36:21