Вверх ↑
Этот топик читают: Гость
Ответов: 307
Рейтинг: 26
#1: 2021-11-18 11:01:33 ЛС | профиль | цитата
Имею программу с двумя языками.
Смена языка происходит только после перезагрузки программы.
Строки для перевода хранятся внутри программы не в файле *.lng.
Как можно реализовать смену языка без перезагрузки?
карма: 2
0
Ответов: 5227
Рейтинг: 587
#2: 2021-11-18 12:52:54 ЛС | профиль | цитата
envoy_sky, тебе нужно создать рекурсивную функцию от MainForm и менять в контролах свойство Caption из списка. ~10-15 строк кода...
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 8921
Рейтинг: 823
#3: 2021-11-18 13:15:14 ЛС | профиль | цитата
envoy_sky,
Пример


Add(MainForm,2953706,119,63)
{
link(onCreate,12772019:doWork1,[(165,83)])
}
Add(ComboBox,200185,378,161)
{
Left=215
Top=20
Width=150
Height=21
}
Add(RadioButton,12921042,119,105)
{
Left=5
Top=5
Selected=0
Caption="Русс"
link(onSelect,12772019:doWork2,[])
}
Add(RadioButton,13827722,119,147)
{
Left=5
Top=45
Caption="Engl"
link(onSelect,6930502:doWork2,[(165,153)(165,118)])
}
Add(StrList,9882984,182,42)
{
Strings=#7:Данные1|7:Данные2|7:Данные3|15:Нажать :"Ентер"|9:Сохранить|7:Открыть|5:Выход|6:Ошибка|
}
Add(StrList,11408147,231,42)
{
Strings=#5:Data1|5:Data2|5:Data3|14:Press: "Enter"|4:Save|4:Open|6:Output|5:Error|
}
Add(Label,11462670,378,203)
{
Left=105
Top=25
}
Add(Label,12975146,378,217)
{
Left=105
Top=60
}
Add(Label,8308922,378,231)
{
Left=105
Top=105
}
Add(Label,3661723,378,245)
{
Left=105
Top=140
}
Add(Label,7412324,378,252)
{
Left=105
Top=175
}
Add(ChanelToIndex,6930502,182,105)
{
link(onIndex,5676825:doIndex,[])
}
Add(ArrayEnum,9112403,231,161)
{
link(onItem,3762331:doEvent,[])
link(Array,5676825:Var,[])
}
Add(Hub,3120204,280,105)
{
link(onEvent1,200185:doClear,[(347,111)(347,174)])
link(onEvent2,9112403:doEnum,[(305,118)(305,146)(221,146)(221,167)])
}
Add(GetIndexData,5676825,231,105)
{
link(onIndex,3120204:doEvent1,[])
link(Data1,9882984:Array,[(237,96)(202,96)])
link(Data2,11408147:Array,[(244,96)(251,96)])
}
Add(IndexToChanel,3762331,294,161)
{
Count=8
Point(Index)
link(onEvent1,1818562:doWork2,[])
link(onEvent2,409298:doWork2,[])
link(onEvent3,409298:doWork3,[(340,181)])
link(onEvent4,11462670:doText,[(368,188)(368,209)])
link(onEvent5,12975146:doText,[(361,195)(361,223)])
link(onEvent6,8308922:doText,[(354,202)(354,237)])
link(onEvent7,3661723:doText,[(347,209)(347,251)])
link(onEvent8,7412324:doText,[(340,216)(340,258)])
link(Index,9112403:Index,[(300,152)(286,152)(286,201)(244,201)])
}
Add(HubEx,1818562,336,161)
{
link(onEvent,200185:doAdd,[])
}
Add(HubEx,409298,336,168)
{
Angle=3
link(onEvent,1818562:doWork3,[])
}
Add(HubEx,12772019,161,105)
{
link(onEvent,6930502:doWork1,[])
}

карма: 19

0
Ответов: 307
Рейтинг: 26
#4: 2021-11-18 18:18:41 ЛС | профиль | цитата
Леонид
Спасибо большое! Сделал через коммутатор выбор языка.
language change.gif

--- Добавлено в 2021-11-18 18:32:32

andrestudio писал(а):
тебе нужно создать рекурсивную функцию от MainForm

Если бы я мог создать её, я бы не просил помощи.
Если вам не трудно то прошу помочь.

Редактировалось 2 раз(а), последний 2021-11-18 19:12:51
карма: 2
0
Ответов: 5227
Рейтинг: 587
#5: 2021-11-18 21:58:05 ЛС | профиль | цитата
envoy_sky, вряд ли это решением можно назвать (хотя если по 5 кнопок и надписей сойдёт)
Леонид, не в обиду только, хорошо

envoy_sky писал(а):
Если бы я мог создать её, я бы не просил помощи.
Если вам не трудно то прошу помочь.

Блин всегда был готов помочь но только помогалка уже устала.
К примеру, ты попросил поделится компонентами, я поделился, https://forum.hiasm.com/post/310067
вот больше чем уверен что будут его использовать только в путь (будет востребован взамен диких слоёв)
и что все только качают и пользуются а элементарное спасибо сказать в облом. И на х.. мне такая помощь нужна
Тут на моём форуме чел ещё и возмутился что якобы ему картинки настапиз.... Во народ пошёл, палец о палец не ударит а ему вынь да положи
Ладно чёт заговорил не по теме, а тема интересная и не раскрытая, даже достойна компонента
Вот решение которое я предлагал -> https://forum.hiasm.com/getfile/39311
а вот результат
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 307
Рейтинг: 26
#6: 2021-11-19 09:06:08 ЛС | профиль | цитата
andrestudio писал(а):
Вот решение которое я предлагал

А если три или четыре языка?
У Леонида это возможно.

--- Добавлено в 2021-11-19 09:22:10

andrestudio писал(а):
Во народ пошёл, палец о палец не ударит а ему вынь да положи

Если вы хотите своё творение продавать так и напишите.
Создайте ветку себе, выложите демки, напишите цены.
Я уверен найдутся люди которые захотят приобрести

Если просто делаете за Спасибо то выкладывайте на сайт без лишний разговоров.
(это сугубо моё мнение, как думают форумчане я не знаю)

Редактировалось 5 раз(а), последний 2021-11-19 09:27:52
карма: 2
0
Ответов: 322
Рейтинг: 8
#7: 2021-11-19 09:58:02 ЛС | профиль | цитата
envoy_sky писал(а):
Если просто делаете за Спасибо то выкладывайте на сайт без лишний разговоров.

И я про тоже!
andrestudio писал(а):
andrestudio
Хочешь хвалиться, хвались на своём сайте. Хочешь продавать продавай.
Здесь пользователи ищут помощи и если не собираешься помогать, не нужно хвалится, все и так понимают что у тебя всё получается нормально.
Удачи.
карма: 0

0
Ответов: 307
Рейтинг: 26
#8: 2021-11-19 11:09:41 ЛС | профиль | цитата
Dad2016 писал(а):
Хочешь продавать продавай.

Я не спорю, труд должен быть вознаграждён если этого хочет человек, может и ради славы делать, не брав с людей нечего.
Он талантлив как программист, я бы сказал что он один из суперкодеров этого форума, но вот не может он организовать реализацию своего потенциала.
Ему нужно делать 50/50 бесплатно (средние компоненты) и платно (сложные компоненты) с ценой.
Народ и знать его будет и брать будут более сложные компоненты.
Это моё личное мнение.

Редактировалось 2 раз(а), последний 2021-11-19 11:29:55
карма: 2
0
Ответов: 2058
Рейтинг: 28
#9: 2021-11-19 14:26:28 ЛС | профиль | цитата
К стати. А можно узнать по какой цене опытные программисты будут делать компоненты. Например компоненты для работы с FFMPEG сколько будут стоять?
карма: 1

0
Ответов: 322
Рейтинг: 8
#10: 2021-11-19 14:35:42 ЛС | профиль | цитата
envoy_sky писал(а):
50/50

Полностью согласен
Очень жалко, что сейчас пользователя TAD не слышно.

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

0
Ответов: 307
Рейтинг: 26
#11: 2021-11-19 17:55:51 ЛС | профиль | цитата
Dad2016 писал(а):
TAD

Он тут причём?
карма: 2
0
Ответов: 5227
Рейтинг: 587
#12: 2021-11-19 19:49:48 ЛС | профиль | цитата
И чё? всё это вместо спасибо.
envoy_sky писал(а):
А если три или четыре языка?
У Леонида это возможно.

Да делай как хочешь, дело твоё. Когда запутаешься в линках поймёшь что был не прав.
Dad2016 писал(а):
andrestudio
Хочешь хвалиться, хвались на своём сайте

Чё, конфетку не дали и обиделся что ли?
Dad2016 писал(а):
Здесь пользователи ищут помощи и если не собираешься помогать, не нужно хвалится

Я тут решение сделал а ты его просто скачал. Я затратил пол часа времени, ты пару секунд. Разницу улавливаешь?
А теперь расскажи мне кому ты хоть за год чем то помог на этом форуме?
Или ты считаешь что я недостаточно своих работ сюда выкладываю для твоей скачки.
Dad2016 писал(а):
envoy_sky писал(а):
50/50

Полностью согласен

С чем ты там согласен
А может ты считаешь что я просто конвеер по выпуску компонентов Вы какую там траву курите
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 307
Рейтинг: 26
#13: 2021-11-19 22:57:01 ЛС | профиль | цитата
Нечего не курим.
Захочешь помочь, помоги.
Можешь помочь за деньги, пиши цену.
Без лишней димагогии, как есть.
Могу, сделаю, цена.
Можешь по доброте душевной, помоги бесплатно.
Всё закрыли тему.

Редактировалось 1 раз(а), последний 2021-11-19 22:58:32
карма: 2
0
Ответов: 5227
Рейтинг: 587
#14: 2021-11-20 13:25:52 ЛС | профиль | цитата
envoy_sky писал(а):
Всё закрыли тему.

Вы та закрыли а у меня такой осадок в душе остался что опять побухать захотелось...
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 307
Рейтинг: 26
#15: 2021-11-20 20:04:50 ЛС | профиль | цитата
andrestudio писал(а):
побухать захотелось...

Хватит бухать.
Вот нашёл интересный редактор, глянь

Add(MainForm,2953706,182,308)
{
Width=776
Height=612
Position=1
Point(onKeyDown)
Point(onMouseDown)
Point(Handle)
Point(doPicture)
link(onKeyDown,9045727:doCompare,[(274,335)(274,300)])
link(onMouseDown,10252402:doWork2,[])
}
Add(Button,13264657,266,175)
{
Left=245
Top=170
Width=125
Height=35
TabOrder=-1
Point(Handle)
}
Add(ChildPanelPoly,4849299,630,336)
{
Childrens=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|2:11|2:12|
Selected="base"
link(onFString,6867075:doWork1,[])
link(Handle,7843376:Var2,[])
}
BEGIN_SDK
Add(EditPolyMulti,3918951,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Point(##add)
Point(##clear)
}
Add(Panel,4462083,49,77)
{
Left=60
Top=170
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,16380919,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=433
Height=235
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(45,27)(45,139)])
}
Add(Panel,14296015,294,126)
{
Width=5
Height=5
Color=0
Cursor=13
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
link(onMove,16380919:onFString,[(423,139)(423,27)])
}
Add(PosWindow,9458534,175,77)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,175,133)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
}
Add(GetDataEx,1173458,175,49)
{
link(Data,16380919:Handle,[(181,41)(27,41)])
}
Add(Hub,3227836,119,133)
{
InCount=2
OutCount=3
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(166,146)(166,181)])
}
Add(MathParse,16481360,224,175)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doTop,[(274,181)(274,146)])
link(X1,9458534:CurrentTop,[(230,122)(188,122)])
}
Add(SendMessage,9814408,350,126)
{
WParam=61444
Point(Message)
link(Handle,1173458:Var3,[(356,54)])
link(Message,15286136:Value,[])
}
Add(Memory,15286136,371,70)
{
Default=Integer(274)
}
Add(Timer,940514,49,161)
{
Interval=10
link(onTimer,3227836:doEvent2,[(96,167)(96,146)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,9608062,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=419
Height=214
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(49,27)(49,146)])
}
Add(Panel,14296015,315,133)
{
Width=5
Height=5
Color=0
Cursor=12
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,175,84)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,175,140)
{
MathStr="(%1+round(%2/2))-3"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
link(X2,832532:CurrentWidth,[(188,133)(251,133)])
}
Add(SizeWindow,832532,245,84)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,175,56)
{
link(Data,9608062:Handle,[(181,38)(27,38)])
}
Add(Hub,3227836,133,140)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(160,153)(160,188)])
}
Add(MathParse,16481360,224,182)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doTop,[(300,188)(300,153)])
link(X1,9458534:CurrentTop,[(230,126)(188,126)])
}
Add(SendMessage,9814408,364,133)
{
WParam=61443
Point(Message)
link(Handle,9914298:Var3,[(370,68)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,245,63)
{
link(Data,1173458:Var3,[(251,61)])
}
Add(Memory,15286136,385,77)
{
Default=Integer(274)
}
Add(Timer,940514,49,161)
{
Interval=10
link(onTimer,3227836:doEvent2,[(107,167)(107,153)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,16511707,14,14)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=454
Height=228
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(42,20)(42,139)])
}
Add(Panel,14296015,308,126)
{
Width=5
Height=5
Color=0
Cursor=11
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,175,77)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,175,133)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
link(X2,832532:CurrentWidth,[(188,126)(251,126)])
}
Add(SizeWindow,832532,245,77)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,175,35)
{
link(Data,16511707:Handle,[(181,28)(20,28)])
}
Add(Hub,3227836,133,133)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(160,146)(160,181)])
}
Add(MathParse,16481360,224,175)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doTop,[(276,181)(276,146)])
link(X1,9458534:CurrentTop,[(230,119)(188,119)])
}
Add(SendMessage,9814408,378,126)
{
WParam=61445
Point(Message)
link(Handle,9914298:Var3,[(384,61)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,245,56)
{
link(Data,1173458:Var3,[(251,40)])
}
Add(Memory,15286136,399,56)
{
Default=Integer(274)
}
Add(Timer,940514,42,161)
{
Interval=10
link(onTimer,3227836:doEvent2,[(100,167)(100,146)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,885414,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=426
Height=221
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(98,27)(98,139)])
}
Add(Panel,14296015,294,126)
{
Width=5
Height=5
Color=0
Cursor=14
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,168,77)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,168,133)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
}
Add(SizeWindow,832532,238,77)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,168,49)
{
link(Data,885414:Handle,[(174,35)(27,35)])
}
Add(Hub,3227836,126,133)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(159,146)(159,181)])
}
Add(MathParse,16481360,217,175)
{
MathStr="(%1+round(%2/2))-2"
ResultType=0
link(onResult,14296015:doTop,[(268,181)(268,146)])
link(X1,9458534:CurrentTop,[(223,122)(181,122)])
link(X2,832532:CurrentHeight,[(230,152)(251,152)])
}
Add(SendMessage,9814408,350,126)
{
WParam=61441
Point(Message)
link(Handle,9914298:Var3,[(356,61)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,238,56)
{
link(Data,1173458:Var3,[(244,54)])
}
Add(Memory,15286136,371,70)
{
Default=Integer(274)
}
Add(Timer,940514,42,161)
{
Interval=10
link(onTimer,3227836:doEvent2,[(100,167)(100,146)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,15781290,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=419
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(67,27)(67,132)])
}
Add(Panel,14296015,280,119)
{
Width=5
Height=5
Color=0
Cursor=14
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,154,70)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,154,126)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
link(X2,832532:CurrentWidth,[(167,121)(230,121)])
}
Add(SizeWindow,832532,224,70)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,154,42)
{
link(Data,15781290:Handle,[(160,32)(27,32)])
}
Add(Hub,3227836,112,126)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(145,139)(145,174)])
}
Add(MathParse,16481360,203,168)
{
MathStr="(%1+round(%2/2))-2"
ResultType=0
link(onResult,14296015:doTop,[(254,174)(254,139)])
link(X1,9458534:CurrentTop,[(209,115)(167,115)])
link(X2,832532:CurrentHeight,[(216,142)(237,142)])
}
Add(SendMessage,9814408,336,119)
{
WParam=61442
Point(Message)
link(Handle,9914298:Var3,[(342,54)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,224,49)
{
link(Data,1173458:Var3,[(230,47)])
}
Add(Memory,15286136,357,63)
{
Default=Integer(274)
}
Add(Timer,940514,42,154)
{
Interval=10
link(onTimer,3227836:doEvent2,[(86,160)(86,139)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,7136711,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=419
Height=221
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(70,27)(70,139)])
}
Add(Panel,14296015,287,126)
{
Width=5
Height=5
Color=0
Cursor=11
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,161,77)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,161,133)
{
DataCount=1
MathStr="%1-2"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
}
Add(SizeWindow,832532,231,77)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,161,49)
{
link(Data,7136711:Handle,[(167,35)(27,35)])
}
Add(Hub,3227836,119,133)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(152,146)(152,181)])
}
Add(MathParse,16481360,210,175)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doTop,[(261,181)(261,146)])
link(X1,9458534:CurrentTop,[(216,122)(174,122)])
link(X2,832532:CurrentHeight,[(223,142)(244,142)])
}
Add(SendMessage,9814408,343,126)
{
WParam=61447
Point(Message)
link(Handle,9914298:Var3,[(349,61)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,231,56)
{
link(Data,1173458:Var3,[(237,54)])
}
Add(Memory,15286136,364,70)
{
Default=Integer(274)
}
Add(Timer,940514,35,161)
{
Interval=10
link(onTimer,3227836:doEvent2,[(93,167)(93,146)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,15398353,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=426
Height=242
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(67,27)(67,153)])
}
Add(Panel,14296015,301,140)
{
Width=5
Height=5
Color=0
Cursor=12
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
}
Add(PosWindow,9458534,154,91)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,154,147)
{
MathStr="(%1+round(%2/2))-3"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
link(X2,832532:CurrentWidth,[(167,140)(230,140)])
}
Add(SizeWindow,832532,224,91)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,154,63)
{
link(Data,15398353:Handle,[(160,42)(27,42)])
}
Add(Hub,3227836,112,147)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(139,160)(139,195)])
}
Add(MathParse,16481360,203,189)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doTop,[(279,195)(279,160)])
link(X1,9458534:CurrentTop,[(209,133)(167,133)])
link(X2,832532:CurrentHeight,[(216,165)(237,165)])
}
Add(SendMessage,9814408,357,140)
{
WParam=61446
Point(Message)
link(Handle,9914298:Var3,[(363,75)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,224,70)
{
link(Data,1173458:Var3,[(230,68)])
}
Add(Memory,15286136,378,84)
{
Default=Integer(274)
}
Add(Timer,940514,35,168)
{
Interval=10
link(onTimer,3227836:doEvent2,[(86,174)(86,160)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,13809774,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=440
Height=221
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(73,27)(73,146)])
}
Add(Panel,14296015,301,133)
{
Width=5
Height=5
Color=0
Cursor=13
Point(doLeft)
Point(doTop)
Point(onMove)
link(onClick,9814408:doSendMessage,[])
link(onMove,13809774:onFString,[(426,146)(426,27)])
}
Add(PosWindow,9458534,168,84)
{
link(Handle,1173458:Var2,[])
}
Add(MathParse,7110261,168,140)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doLeft,[])
link(X1,9458534:CurrentLeft,[])
link(X2,832532:CurrentWidth,[(181,133)(244,133)])
}
Add(SizeWindow,832532,238,84)
{
link(Handle,9914298:Var2,[])
}
Add(GetDataEx,1173458,168,42)
{
link(Data,13809774:Handle,[(174,32)(27,32)])
}
Add(Hub,3227836,126,140)
{
InCount=2
link(onEvent1,7110261:doCalc,[])
link(onEvent2,16481360:doCalc,[(153,153)(153,188)])
}
Add(MathParse,16481360,217,182)
{
MathStr="(%1+%2)-3"
ResultType=0
link(onResult,14296015:doTop,[(269,188)(269,153)])
link(X1,9458534:CurrentTop,[(223,126)(181,126)])
link(X2,832532:CurrentHeight,[(230,160)(251,160)])
}
Add(SendMessage,9814408,357,133)
{
WParam=61448
Point(Message)
link(Handle,9914298:Var3,[(363,68)])
link(Message,15286136:Value,[])
}
Add(GetDataEx,9914298,238,63)
{
link(Data,1173458:Var3,[(244,47)])
}
Add(Memory,15286136,378,77)
{
Default=Integer(274)
}
Add(Timer,940514,35,168)
{
Interval=10
link(onTimer,3227836:doEvent2,[(93,174)(93,153)])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,8721403,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=307
Height=179
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(46,27)(46,118)])
}
Add(Panel,11889828,224,105)
{
Top=1
Width=1
Height=1000
Color=8421376
Point(doLeft)
}
Add(PosWindow,9458534,168,49)
{
link(Handle,8721403:Handle,[(174,42)(27,42)])
}
Add(Hub,3227836,119,112)
{
InCount=2
OutCount=1
link(onEvent1,3064757:doData,[])
}
Add(Timer,940514,35,140)
{
Interval=10
link(onTimer,3227836:doEvent2,[(95,146)(95,125)])
}
Add(DoData,3064757,168,112)
{
link(onEventData,11889828:doLeft,[])
link(Data,9458534:CurrentLeft,[])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,9022692,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=279
Height=172
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(73,27)(73,104)])
}
Add(Panel,11889828,224,91)
{
Left=1
Width=1000
Height=1
Color=8421376
Point(doTop)
}
Add(PosWindow,9458534,161,49)
{
link(Handle,9022692:Handle,[(167,38)(27,38)])
}
Add(Hub,3227836,119,98)
{
InCount=2
OutCount=1
link(onEvent1,3064757:doData,[])
}
Add(Timer,940514,35,126)
{
Interval=10
link(onTimer,3227836:doEvent2,[(95,132)(95,111)])
}
Add(DoData,3064757,168,98)
{
link(onEventData,11889828:doTop,[])
link(Data,9458534:CurrentTop,[])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,3337866,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=433
Height=256
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(81,27)(81,146)])
}
Add(Panel,11889828,308,133)
{
Top=1
Width=1
Height=1000
Color=8421376
Point(doLeft)
}
Add(PosWindow,9458534,189,77)
{
link(Handle,11572872:Var2,[])
}
Add(Hub,3227836,140,140)
{
InCount=2
OutCount=1
link(onEvent1,10349072:doOperation,[])
}
Add(Timer,940514,56,168)
{
Interval=10
link(onTimer,3227836:doEvent2,[(116,174)(116,153)])
}
Add(SizeWindow,832532,252,77)
{
link(Handle,11572872:Var3,[(258,54)])
}
Add(GetDataEx,11572872,189,49)
{
link(Data,3337866:Handle,[(195,41)(27,41)])
}
Add(Math,10349072,245,140)
{
link(onResult,11889828:doLeft,[])
link(Op1,9458534:CurrentLeft,[(251,131)(195,131)])
link(Op2,832532:CurrentWidth,[])
}
END_SDK
BEGIN_SDK
Add(EditPolyMulti,9302199,21,21)
{
WorkCount=#5:##add|7:##clear|
EventCount=#9:onFString|
DataCount=#6:Handle|
Width=335
Point(##add)
Point(##clear)
link(##add,3227836:doEvent1,[(73,27)(73,125)])
}
Add(Panel,11889828,266,112)
{
Left=1
Width=1000
Height=1
Color=8421376
Point(doTop)
}
Add(PosWindow,9458534,168,70)
{
link(Handle,14552984:Var2,[])
}
Add(Hub,3227836,126,119)
{
InCount=2
OutCount=1
link(onEvent1,14559710:doOperation,[])
}
Add(Timer,940514,42,147)
{
Interval=10
link(onTimer,3227836:doEvent2,[(102,153)(102,132)])
}
Add(Math,14559710,175,119)
{
link(onResult,11889828:doTop,[])
link(Op1,9458534:CurrentTop,[])
link(Op2,832532:CurrentHeight,[(188,111)(244,111)])
}
Add(SizeWindow,832532,231,70)
{
link(Handle,14552984:Var3,[(237,54)])
}
Add(GetDataEx,14552984,168,49)
{
link(Data,9302199:Handle,[(174,46)(27,46)])
}
END_SDK
Add(For,5540523,525,294)
{
Start=1
End=12
link(onEvent,4849299:##add,[(576,300)(576,342)])
link(End,5617198:Var,[])
}
Add(MouseEvent,7510426,616,175)
{
Point(Handle)
}
Add(LineBreak,11875882,595,238)
{
Caption="handle"
Type=1
link(Data,11612673:Var1,[(601,222)])
Primary=[9396843,-371,161]
}
Add(Switch,4280962,441,329)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(onOn)
Point(onOff)
Point(doOn)
link(onSwitch,16267233:doValue,[(486,335)(486,279)])
link(onOn,5540523:doFor,[(499,342)(499,300)])
link(onOff,4849299:##clear,[])
}
Add(If_else,9045727,287,294)
{
Op2=Integer(120)
link(onTrue,4280962:doSwitch,[(416,300)(416,335)])
}
Add(Memo,10066612,210,175)
{
Left=130
Top=305
Width=130
Height=125
}
Add(Memory,16267233,630,273)
{
Point(Data)
link(Data,11612673:Var2,[])
}
Add(ChildPanel,14090281,322,175)
{
}
BEGIN_SDK
Add(EditMulti,11020806,21,21)
{
}
Add(Panel,4193134,35,105)
{
Left=530
Top=350
Width=170
Height=145
}
END_SDK
Add(GetDataEx,7843376,630,315)
{
link(Data,16267233:Value,[])
}
Add(Hub,3355640,350,364)
{
OutCount=3
link(onEvent1,6307204:doWork3,[(417,370)])
link(onEvent2,4280962:doOn,[(430,377)(430,349)])
link(onEvent3,9958155:doCompare,[(376,384)(376,486)(166,486)(166,440)])
}
Add(HubEx,6307204,413,336)
{
link(onEvent,4280962:doReset,[])
}
Add(ChangeMon,7123757,511,427)
{
link(onData,12343610:doCase,[])
}
Add(KeyMask,5955803,616,434)
{
Ctrl=1
Key=1
link(onTrue,2265492:doMove,[])
}
Add(Keyboard,13058469,455,427)
{
Key=1
link(onReadKey,7123757:doData,[])
}
Add(Timer,6378185,406,427)
{
Interval=10
link(onTimer,13058469:doReadKey,[])
}
Add(Case,12343610,560,427)
{
Value=Integer(1)
DataOnTrue=Integer(1)
link(onNextCase,3355640:doEvent1,[(604,433)(604,406)(330,406)(330,370)])
link(onTrue,5955803:doCheckMask,[])
}
Add(MoveWindow,2265492,672,441)
{
link(Handle,13457396:Var2,[])
}
Add(If_else,9958155,182,434)
{
link(onTrue,10252402:doWork3,[(291,440)])
link(Op1,10550867:Var2,[])
link(Op2,9396843:Var,[(195,424)(230,424)])
}
Add(GetDataEx,11612673,630,217)
{
link(Data,7510426:Handle,[])
}
Add(HubEx,10252402,287,336)
{
link(onEvent,6307204:doWork2,[])
}
Add(CheckBox,2858432,203,49)
{
Left=15
Top=10
Width=130
Caption="Маркеры вкл/выкл"
link(onCheck,6147096:doSwitch,[])
}
Add(Switch,6147096,259,49)
{
DataOn=Integer(12)
DataOff=Integer(8)
link(onSwitch,8158014:doValue,[])
}
Add(GlobalVar,8158014,322,49)
{
Name="mark"
Data=Integer(8)
}
Add(GlobalVar,5617198,532,238)
{
Name="mark"
Data=Integer(8)
}
Add(InfoTip,1768751,175,140)
{
Info=#10:подопытные|
Width=309
Height=102
}
Add(Label,14963162,399,42)
{
Left=15
Top=35
Width=160
Height=17
Caption="F9 - вкл/выкл редактирование"
}
Add(Label,3555682,455,42)
{
Left=15
Top=60
Width=211
Height=17
Caption="MouseDown+Ctrl перемещение элемента"
}
Add(LED,3864398,427,175)
{
Left=35
Top=285
}
Add(Grapher,4525533,378,175)
{
Left=550
Top=170
}
Add(GetDataEx,10550867,182,364)
{
link(Data,2953706:Handle,[])
}
Add(MultiElement,13488214,126,385)
{
link(Data1,10550867:Var1,[(132,369)])
}
BEGIN_SDK
Add(EditMulti,5233552,21,21)
{
DataCount=1
Width=419
Height=410
}
Add(For,13753032,266,231)
{
End=2000
Step=10
link(onEvent,10595303:doDraw,[])
}
Add(Img_Point,10595303,329,231)
{
Color=8421504
Point(X)
Point(Y)
link(Bitmap,4116076:Var2,[])
link(X,13753032:Position,[(342,219)(310,219)(310,276)(272,276)])
link(Y,7483476:Position,[(349,219)(385,219)(385,290)(216,290)])
}
Add(For,7483476,210,231)
{
End=2000
Step=10
link(onEvent,13753032:doFor,[])
link(onStop,6986541:doTimer,[(253,244)(253,314)])
}
Add(Bitmap,10827405,329,140)
{
HWidth=2000
HHeight=2000
FillColor=-16777201
Point(doCreate)
}
Add(Img_Bmp,16069914,84,231)
{
DrawSource=1
TransparentColor=-16777201
link(Bitmap,5233552:Data1,[(90,60)(27,60)])
link(SourceBitmap,4116076:Var1,[(97,201)])
}
Add(Timer,9894546,119,154)
{
Interval=10
AutoStop=1
link(onTimer,300764:doEvent1,[])
}
Add(GetDataEx,4116076,329,196)
{
link(Data,10827405:Bitmap,[])
}
Add(Hub,300764,168,154)
{
link(onEvent1,10827405:doCreate,[])
link(onEvent2,7483476:doFor,[(195,167)(195,237)])
}
Add(Timer,6986541,273,308)
{
Interval=20
Enable=1
link(onTimer,16069914:doDraw,[(317,314)(317,356)(75,356)(75,237)])
}
END_SDK
Add(Label,15077563,756,336)
{
Left=595
Top=15
Width=155
Height=80
Color=0
Font=[Courier New,12,0,16777215,204]
AutoSize=1
}
Add(MultiElement,6867075,700,336)
{
link(onEvent1,15077563:doText,[])
link(Data1,13457396:Var3,[(706,327)])
}
BEGIN_SDK
Add(EditMulti,13380051,21,21)
{
EventCount=1
WorkCount=1
DataCount=1
Width=237
Height=179
link(doWork1,15295344:doString,[(59,27)(59,153)])
}
Add(PosWindow,9458534,98,77)
{
link(Handle,1726868:Var2,[])
}
Add(SizeWindow,832532,154,77)
{
link(Handle,1726868:Var3,[(160,54)])
}
Add(GetDataEx,1726868,98,49)
{
link(Data,13380051:Data1,[(104,35)(27,35)])
}
Add(FormatStr,15295344,98,147)
{
DataCount=4
Mask="Left: %1 \r\nTop: %2\r\nWidth: %3\r\nHeight: %4\r\n"
link(onFString,13380051:onEvent1,[(206,153)(206,27)])
link(Str1,9458534:CurrentLeft,[])
link(Str2,9458534:CurrentTop,[])
link(Str3,832532:CurrentWidth,[(118,128)(160,128)])
link(Str4,832532:CurrentHeight,[(125,136)(167,136)])
}
END_SDK
Add(GetDataEx,13457396,672,322)
{
link(Data,7843376:Var3,[(678,320)])
}

карма: 2
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)