HiAsm
HiAsm
Вверх ↑
ФорумыСоревнованияHiAsm contest дубль 2 ← Ctrl12345...91011121314Ctrl →
Этот топик читают: Гость
Ответов: 16884
Рейтинг: 1239
#181: 2009-09-13 22:10:31 ЛС | профиль | цитата
BeginEnd писал(а):
Пример работы группы RadioButton

code_14932.txt

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
2
файлы: 1code_14932.txt [3.3KB] [1049]
Голосовали:BeginEnd, Assasin
Ответов: 30
Рейтинг: 2
#182: 2009-09-13 22:50:44 ЛС | профиль | цитата
Tad, спасибо!
Врубился в Rnd и нашел Selected.
Для ценителей изящного - тоже самое

code_14933.txt

Еще один пример: работа CheckBox

Add(MainForm,5658186,21,238)
{
 Left=100
 Top=100
 Width=300
 Height=265
 Caption="Работа с CheckBox"
 link(onCreate,1539473:doRandomize,[(65,258)(65,202)])
}
Add(Edit,6913458,315,182)
{
 Left=147
 Top=100
 Width=39
 Text=""
}
Add(Edit,9167562,315,266)
{
 Left=147
 Top=132
 Width=39
 Text=""
}
Add(Timer,2818801,21,189)
{
 link(onTimer,1539473:doRandom,[])
}
Add(Random,1539473,77,189)
{
 link(onRandom,5732832:doText,[])
}
Add(Label,2548895,119,140)
{
 Left=37
 Top=102
 Width=55
 Height=17
 Caption="Исходный"
}
Add(Image,10164316,161,140)
{
 Left=8
 Top=5
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F3F0A8983D5F9D82176D56B4D19188AFD30213EF5986613520F8A4C884A088B18F5C83461F720120D31EE41E820CEFDA49A4FAAFB490D1FD2C21F13E0538F1D8EF45C05005C8DCABA]
}
Add(Label,8370322,77,140)
{
 Left=13
 Top=76
 Width=264
 Height=17
 Caption="При установке галочки происходит вывод в ячейку"
}
Add(Edit,5732832,119,189)
{
 Left=42
 Top=125
 Width=41
 Text=""
 link(onChange,7906569:doEvent1,[])
}
Add(CheckBox,12047057,203,147)
{
 Left=120
 Top=100
 Width=15
 Ctl3D=0
 Caption=""
 link(onCheck,9832292:doClear,[])
}
Add(CheckBox,2745602,203,231)
{
 Left=120
 Top=132
 Width=15
 Ctl3D=0
 Caption=""
 link(onCheck,10730646:doClear,[])
}
Add(If_else,12133421,203,189)
{
 Op2=Integer(1)
 link(onTrue,848997:doEvent2,[])
 link(Op1,12047057:Checked,[])
}
Add(Hub,7906569,161,189)
{
 OutCount=4
 link(onEvent1,12133421:doCompare,[])
 link(onEvent2,11309671:doCompare,[(197,202)(197,279)])
 link(onEvent3,1528061:doCompare,[(192,209)(192,363)])
 link(onEvent4,8154826:doCompare,[(186,216)(186,447)])
}
Add(If_else,11309671,203,273)
{
 Op2=Integer(1)
 link(onTrue,8694087:doEvent2,[])
 link(Op1,2745602:Checked,[])
}
Add(Hub,848997,287,182)
{
 InCount=2
 OutCount=1
 link(onEvent1,6913458:doText,[])
}
Add(Hub,8694087,287,266)
{
 InCount=2
 OutCount=1
 link(onEvent1,9167562:doText,[])
}
Add(Memory,9832292,245,140)
{
 link(onData,848997:doEvent1,[(281,146)(281,188)])
}
Add(Edit,6168987,315,350)
{
 Left=147
 Top=162
 Width=39
 Text=""
}
Add(CheckBox,2852061,203,315)
{
 Left=120
 Top=162
 Width=15
 Ctl3D=0
 Checked=0
 Caption=""
 link(onCheck,6957653:doClear,[])
}
Add(If_else,1528061,203,357)
{
 Op2=Integer(1)
 link(onTrue,9795391:doEvent2,[])
 link(Op1,2852061:Checked,[])
}
Add(Hub,9795391,287,350)
{
 InCount=2
 OutCount=1
 link(onEvent1,6168987:doText,[])
}
Add(Edit,15140416,315,434)
{
 Left=147
 Top=192
 Width=39
 Text=""
}
Add(CheckBox,7324124,203,399)
{
 Left=120
 Top=192
 Width=15
 Ctl3D=0
 Caption=""
 link(onCheck,16770340:doClear,[])
}
Add(If_else,8154826,203,441)
{
 Op2=Integer(1)
 link(onTrue,15290794:doEvent2,[])
 link(Op1,7324124:Checked,[])
}
Add(Hub,15290794,287,434)
{
 InCount=2
 OutCount=1
 link(onEvent1,15140416:doText,[])
}
Add(Memory,10730646,245,224)
{
 link(onData,8694087:doEvent1,[(281,230)(281,272)])
}
Add(Memory,6957653,245,308)
{
 link(onData,9795391:doEvent1,[(282,314)(282,356)])
}
Add(Memory,16770340,245,392)
{
 link(onData,15290794:doEvent1,[(282,398)(282,440)])
}
карма: 0

0
файлы: 1code_14933.txt [3.4KB] [1086]
Ответов: 16884
Рейтинг: 1239
#183: 2009-09-14 00:13:13 ЛС | профиль | цитата
BeginEnd писал(а):
Врубился в Rnd и нашел Selected.
ещё формула.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 30
Рейтинг: 2
#184: 2009-09-19 17:26:53 ЛС | профиль | цитата
Tad писал(а):

ещё формула

До формулы я тоже додумался

Пример на обработку потоков
code_14980.txt
карма: 0

0
файлы: 1code_14980.txt [3.9KB] [1140]
Разработчик
Ответов: 26322
Рейтинг: 2147
#185: 2009-09-19 17:52:33 ЛС | профиль | цитата
BeginEnd писал(а):
Пример на обработку потоков

А зачем там три MT_Enum 



Add(Edit,6913458,637,343)
{
 Left=202
 Top=103
 Width=39
 Text=""
}
Add(Edit,9167562,637,462)
{
 Left=202
 Top=139
 Width=39
 Text=""
}
Add(Timer,2818801,182,182)
{
 Interval=5000
 link(onTimer,14375551:doEvent1,[])
}
Add(Random,1539473,294,224)
{
 link(onRandom,5732832:doText,[])
}
Add(Label,8370322,315,147)
{
 Left=73
 Top=78
 Width=139
 Height=17
 Caption="Переключатель потоков"
}
Add(Edit,5732832,336,224)
{
 Left=32
 Top=102
 Width=41
 Text=""
}
Add(ComboBox,7680595,567,273)
{
 Left=110
 Top=104
 Height=21
 Strings=#1:0|1:1|1:2|
 DataType=1
}
Add(MainForm,1705750,182,217)
{
 Left=100
 Top=100
 Width=270
 Height=250
 Caption="Работа с потоком МТ"
 link(onActivate,14375551:doEvent2,[(235,223)(235,195)])
 link(onCreate,11991331:doEvent1,[])
}
Add(Random,1931246,294,287)
{
 link(onRandom,7814710:doText,[])
}
Add(Edit,7814710,336,287)
{
 Left=32
 Top=138
 Width=41
 Text=""
}
Add(Hub,11991331,224,231)
{
 OutCount=3
 link(onEvent1,1539473:doRandomize,[])
 link(onEvent2,1931246:doRandomize,[(259,244)(259,300)])
 link(onEvent3,9516833:doRandomize,[(251,251)(251,356)])
}
Add(Hub,14375551,252,182)
{
 InCount=2
 OutCount=3
 link(onEvent1,1539473:doRandom,[(286,188)(286,230)])
 link(onEvent2,1931246:doRandom,[(280,195)(280,293)])
 link(onEvent3,9516833:doRandom,[(274,202)(274,349)])
}
Add(MT_AddData,47677,399,343)
{
 Count=3
 Data=Integer(0)
 InputMT=1
 link(onAdd,7994879:doEnum,[])
 link(Data1,5732832:Text,[(405,273)(342,273)])
 link(Data2,7814710:Text,[(412,325)(342,325)])
 link(Data3,899784:Text,[(419,331)(381,331)(381,387)(342,387)])
}
Add(Hub,4608925,511,343)
{
 OutCount=3
 link(onEvent1,10056801:doCompare,[])
 link(onEvent2,1545311:doCompare,[(547,356)(547,468)])
 link(onEvent3,15360365:doCompare,[(541,363)(541,587)])
}
Add(Random,9516833,294,343)
{
 link(onRandom,899784:doText,[])
}
Add(Edit,899784,336,343)
{
 Left=32
 Top=179
 Width=41
 Text=""
 link(onChange,47677:doAdd,[])
}
Add(Edit,10453520,637,581)
{
 Left=202
 Top=179
 Width=39
 Text=""
}
Add(MT_Enum,7994879,462,343)
{
 link(onItem,4608925:doEvent1,[])
}
Add(If_else,10056801,567,343)
{
 link(onTrue,6913458:doText,[])
 link(Op1,8943053:Var3,[(573,331)(557,331)(557,397)])
 link(Op2,7680595:String,[])
}
Add(ComboBox,7890526,567,392)
{
 Left=110
 Top=139
 Height=21
 Strings=#1:0|1:1|1:2|
 DataType=1
}
Add(If_else,1545311,567,462)
{
 link(onTrue,9167562:doText,[])
 link(Op1,2905713:Var3,[(573,453)])
 link(Op2,7890526:String,[])
}
Add(ComboBox,9635951,567,511)
{
 Left=110
 Top=179
 Height=21
 Strings=#1:0|1:1|1:2|
 DataType=1
}
Add(If_else,15360365,567,581)
{
 link(onTrue,10453520:doText,[])
 link(Op1,2905713:Var2,[(573,506)(475,506)])
 link(Op2,9635951:String,[])
}
Add(Label,16305101,357,147)
{
 Left=13
 Top=103
 Width=10
 Caption="0"
}
Add(Label,2033701,399,147)
{
 Left=13
 Top=138
 Width=10
 Caption="1"
}
Add(Label,15274741,441,147)
{
 Left=13
 Top=179
 Width=10
 Caption="2"
}
Add(Image,11528805,182,140)
{
 Left=10
 Top=10
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F8F0E199044116C06AC6A1132C82461F5C88036EA515984DD4FAA7FD1FD8EEA3AD2A03C030862BA1FDD37100C510DD3816A333677D05A3DB1EEA704A29A808F47C80598EE81852B6A2863E391EB9EC1A79EB4B0C79D02B0A507440E22C4034100C9665A11]
}
Add(Image,1103497,224,140)
{
 Left=85
 Top=10
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F8F0E199044116C06AC6A1132C82461F5C88036EA515984DD8FDFBFB84C42F81ADD75D8ED423611178FC5020689518FAC0AC486F1B1AB473513621736F58A2CB854C3C4202A6070A90836F5982A50DD834F3DAA7B709B0F134335FF980421F5101530F85C0657F8A0AB80400E455CE18FA90204BD3409C52FB28AFFF5D9BA84D20FAA8A1E4342EA5155AC353D6729E0844BAD80D339CBB5A6844CA40E04003776BB6E]
}
Add(GetDataEx,8943053,469,392)
{
 link(Data,7994879:Index,[])
}
Add(GetDataEx,2905713,469,448)
{
 link(Data,8943053:Var2,[])
}
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#186: 2009-09-19 22:33:53 ЛС | профиль | цитата
Да.... Чем дальше в лес, тем толще партизаны.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 30
Рейтинг: 2
#187: 2009-09-20 00:50:33 ЛС | профиль | цитата
Пример на обработку асинхронных потоков
code_14983.txt
карма: 0

0
файлы: 1code_14983.txt [4.1KB] [1053]
Разработчик
Ответов: 26322
Рейтинг: 2147
#188: 2009-09-20 01:06:34 ЛС | профиль | цитата
BeginEnd, то, что ты сотворил, к асинхронным потокам не имеет никакого отношения.
------------ Дoбавленo в 01.11:
Да, а нельзя ли пояснить, чем обусловлено применение перенаправителя потоков -- EventFromData, где прекрасно справляется Memory, тк как событие onGet происходит раньше onData
карма: 22

0
Ответов: 30
Рейтинг: 2
#189: 2009-09-20 08:11:50 ЛС | профиль | цитата
nesco писал(а):

к асинхронным потокам не имеет никакого отношения

Возможно, но потоки - не одновременные


чем обусловлено применение перенаправителя потоков -- EventFromData

Я ведь учусь!
А с Memory правильнее?

Add(Edit,6913458,483,210)
{
 Left=261
 Top=105
 Width=39
 Text=""
}
Add(Timer,2818801,63,210)
{
 link(onTimer,1539473:doRandom,[])
}
Add(Random,1539473,154,210)
{
 link(onRandom,5732832:doText,[])
}
Add(Label,8370322,161,126)
{
 Left=145
 Top=76
 Width=139
 Height=17
 Caption="Переключатель потоков"
}
Add(Edit,5732832,196,210)
{
 Left=73
 Top=104
 Width=41
 Text=""
 link(onChange,5892827:doAdd,[])
}
Add(ComboBox,7680595,434,140)
{
 Left=158
 Top=104
 Width=85
 Height=21
 Strings=#6:первый|6:второй|6:третий|
 DataType=1
}
Add(MainForm,1705750,63,168)
{
 Left=100
 Top=100
 Width=350
 Height=250
 Caption="Работа с асинхронными потоками"
 link(onCreate,11991331:doEvent1,[])
}
Add(Random,1931246,154,294)
{
 link(onRandom,7814710:doText,[])
}
Add(Edit,7814710,196,294)
{
 Left=73
 Top=140
 Width=41
 Text=""
 link(onChange,4882364:doAdd,[])
}
Add(Hub,11991331,105,182)
{
 OutCount=3
 link(onEvent1,1539473:doRandomize,[(147,188)(147,223)])
 link(onEvent2,1931246:doRandomize,[(140,195)(140,307)])
 link(onEvent3,9516833:doRandomize,[(132,202)(132,398)])
}
Add(Hub,14375551,301,210)
{
 InCount=3
 OutCount=1
 link(onEvent1,2869318:doGet,[])
}
Add(Hub,4608925,399,210)
{
 OutCount=3
 link(onEvent1,10056801:doCompare,[])
 link(onEvent2,8132893:doCompare,[(427,223)(427,335)])
 link(onEvent3,14084543:doCompare,[(421,230)(421,457)])
}
Add(Random,9516833,154,385)
{
 link(onRandom,899784:doText,[])
}
Add(Edit,899784,196,385)
{
 Left=73
 Top=181
 Width=41
 Text=""
 link(onChange,7110446:doAdd,[])
}
Add(If_else,10056801,434,210)
{
 Op1=Integer(0)
 Op2=Integer(0)
 link(onTrue,6913458:doText,[])
 link(Op1,8087447:Var3,[(440,198)])
 link(Op2,7680595:String,[])
}
Add(Label,16305101,238,168)
{
 Left=10
 Top=104
 Width=45
 Height=14
 Caption="первый"
}
Add(Label,2033701,238,252)
{
 Left=10
 Top=139
 Width=45
 Caption="второй"
}
Add(Label,15274741,238,336)
{
 Left=10
 Top=180
 Width=40
 Caption="третий"
}
Add(Image,11528805,63,126)
{
 Left=10
 Top=10
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F8F0E199044116C06AC6A1132C82461F5C88036EA515984DD4FAA7FD1FD8EEABAC10651DD86CA93670041EC218EC983A846D5416BF5A4BA7FA0C39A96AA494D6BA4A748FAA6610031659D37]
}
Add(Image,1103497,105,126)
{
 Left=85
 Top=10
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F8F0E199044116C06AC6A1132C82461F5C88036EA515984DD4FAA7FD1FD8EEABAC105E5194010337CD0430B8221AA613A507D86CD9FB4564FACFB2981A49940AA6A52D307E9FE199CE98E180800903E9A3B]
}
Add(MT_Add,5892827,238,210)
{
 InputMT=1
 link(onAdd,14375551:doEvent1,[])
 link(Data,16305101:Caption,[])
}
Add(MT_Get,2869318,336,210)
{
 link(onData,4608925:doEvent1,[])
 link(onGet,14739259:doValue,[(373,223)(373,153)])
}
Add(MT_Add,4882364,238,294)
{
 InputMT=1
 link(onAdd,14375551:doEvent2,[(280,300)(280,223)])
 link(Data,2033701:Caption,[])
}
Add(Timer,12836535,63,294)
{
 Interval=1500
 link(onTimer,1931246:doRandom,[])
}
Add(MT_Add,7110446,238,385)
{
 InputMT=1
 link(onAdd,14375551:doEvent3,[(288,391)(288,230)])
 link(Data,15274741:Caption,[])
}
Add(Timer,7169998,63,385)
{
 Interval=2000
 link(onTimer,9516833:doRandom,[])
}
Add(Edit,710408,483,329)
{
 Left=261
 Top=141
 Width=39
 Text=""
}
Add(ComboBox,16624445,434,259)
{
 Left=158
 Top=141
 Width=85
 Height=21
 Strings=#6:первый|6:второй|6:третий|
 DataType=1
}
Add(If_else,8132893,434,329)
{
 Op1=Integer(0)
 Op2=Integer(0)
 link(onTrue,710408:doText,[])
 link(Op1,15787368:Var3,[(440,310)])
 link(Op2,16624445:String,[])
}
Add(Edit,11640551,483,451)
{
 Left=261
 Top=181
 Width=39
 Text=""
}
Add(ComboBox,10802119,434,374)
{
 Left=158
 Top=181
 Width=85
 Height=21
 Strings=#6:первый|6:второй|6:третий|
 DataType=1
}
Add(If_else,14084543,434,451)
{
 link(onTrue,11640551:doText,[])
 link(Op1,15787368:Var2,[(440,430)(391,430)])
 link(Op2,10802119:String,[])
}
Add(GetDataEx,8087447,378,189)
{
 link(Data,14739259:Value,[])
}
Add(GetDataEx,15787368,378,301)
{
 link(Data,8087447:Var2,[])
}
Add(Memory,14739259,385,147)
{
}
карма: 0

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#190: 2009-09-20 12:49:17 ЛС | профиль | цитата
BeginEnd писал(а):
А с Memory правильнее?

Предпочтительней
карма: 22

0
Ответов: 30
Рейтинг: 2
#191: 2009-09-20 19:10:53 ЛС | профиль | цитата
Пример таблицы для небольшой базы данных...
Не загружается код! Режет на 20-25 строке!!!


Add(MainForm,2953706,14,105)
{
 Left=100
 Top=100
 Width=460
 Height=460
 Caption="ListBox как база данных и обработка StringTable"
 link(onCreate,16700154:doEvent1,[])
}
Add(StringTable,5073620,434,301)
{
 Left=15
 Top=185
 Width=405
 Height=210
 Columns=#8:Название|6:Ед.изм|10:Количество|4:Цена|9:Стоимость|
 Grid=0
 ColumnClick=1
}
Add(ArrayEnum,11159684,91,119)
{
 link(onItem,971342:doSplit,[])
 link(Array,6158621:Var2,[])
}
Add(Memory,9867380,91,175)
{
 Default=Integer(0)
 Point(Data)
 link(onData,10319918:doEvent1,[(221,181)(221,132)])
}
Add(Edit,9430810,273,210)
{
 Left=155
 Top=145
 Width=70
 Height=21
 Text=""
 DataType=4
 Point(doSetFocus)
 link(Str,3880255:Value,[])
}
Add(ComboBox,15850584,182,126)
{
 Left=15
 Top=145
 Width=130
 Height=21
 link(onClick,10319918:doEvent2,[])
}
Add(Button,15364708,42,266)
{
 Left=235
 Top=145
 Width=60
 Caption="Добавить"
 link(onClick,7368544:doOperation,[])
}
Add(FormatStr,13151170,301,357)
{
 DataCount=4
 Mask="%2; %1; %3; %4"
 Point(FString)
 link(onFString,11077754:doEvent1,[])
 link(Str1,1576501:Var3,[(307,254)])
 link(Str2,4111713:Left,[])
 link(Str3,14959253:Var2,[])
 link(Str4,7994642:Result,[(328,330)(335,330)])
}
Add(StrPart,971342,133,119)
{
 Char=";"
 link(onPart,15850584:doAdd,[(173,132)(173,132)])
}
Add(GetDataEx,6158621,84,91)
{
 link(Data,6127557:Array,[])
}
Add(ArrayRW,9497987,259,126)
{
 link(onRead,4111713:doSplit,[])
 link(Array,6158621:Var3,[(265,100)])
}
Add(ListBox,6127557,77,42)
{
 Left=270
 Top=50
 Width=150
 Visible=1
 Strings=#17:Картина; шт "2000|18:Корзина; шт "120.3|15:Картонка; ru "2|
}
Add(Hub,2569792,210,308)
{
 OutCount=5
 link(onEvent1,7994642:doOperation,[(298,314)(298,258)])
 link(onEvent2,617833:doOperation,[])
 link(onEvent3,13151170:doString,[(292,328)(292,363)])
 link(onEvent4,10268944:doString,[(285,335)(285,398)])
 link(onEvent5,9504547:doEvent2,[(237,342)(237,230)])
}
Add(Hub,10319918,231,126)
{
 InCount=2
 OutCount=1
 link(onEvent1,9497987:doRead,[])
}
Add(Message,11784536,189,266)
{
 Message="Повторите ввод"
 Caption="Ошибка кол-ва"
 link(onMessage,9504547:doEvent1,[(230,272)(230,223)])
}
Add(Hub,16700154,63,119)
{
 link(onEvent1,11159684:doEnum,[])
 link(onEvent2,9867380:doClear,[(84,132)(84,188)])
}
Add(GetDataEx,1576501,266,245)
{
 link(Data,9430810:Text,[])
}
Add(Math,7994642,329,252)
{
 OpType=2
 link(onResult,4977916:doOperation,[])
 link(Op2,14959253:Var3,[(342,233)])
}
Add(If_else,5203811,147,266)
{
 Type=3
 Op2=Real(0)
 link(onTrue,11784536:doMessage,[])
 link(onFalse,2569792:doEvent1,[(184,279)(184,314)])
}
Add(Memory,3880255,273,168)
{
 Default=String()
}
Add(Math,4977916,371,252)
{
 link(onResult,11664498:doValue,[])
 link(Op2,11664498:Value,[(384,242)(410,242)(410,289)(440,289)])
}
Add(FormatStr,10268944,336,392)
{
 Mask=";;;Итого:; %1"
 link(onFString,11077754:doEvent2,[(375,398)(375,370)])
 link(Str1,4977916:Result,[(342,299)(377,299)])
}
Add(Hub,11077754,385,357)
{
 InCount=2
 OutCount=1
 link(onEvent1,5073620:doAdd,[(424,363)(424,307)])
}
Add(Math,617833,357,315)
{
 OpType=1
 Op2=1
 ResultType=0
 Default=1
 link(onResult,5073620:doDelete,[])
 link(Op1,5073620:Count,[(363,306)(399,306)(399,349)(440,349)])
}
Add(Memory,11664498,434,252)
{
 Default=Integer(0)
 Point(Data)
}
Add(Button,13853038,343,189)
{
 Left=355
 Top=145
 Width=65
 Caption="Очистить"
 link(onClick,8669506:doEvent1,[])
}
Add(Label,13854662,252,56)
{
 Left=155
 Top=125
 Width=70
 Caption="Количество"
}
Add(Label,14552742,210,56)
{
 Left=15
 Top=125
 Width=95
 Caption="Наименование"
}
Add(Image,6390079,119,56)
{
 Left=20
 Top=25
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F4F0E6460B8574D1822ABB74C87C1B5A608363244569FCC439A7A52CD1F0EEA416104C220F5203E3A1E75CF60724F90170CAE3545B09121BAFA641E1084A887B1612C109B32F3F103900DE4960DA441008904012A]
}
Add(Image,15406640,161,56)
{
 Left=100
 Top=25
 Width=60
 Height=60
 ViewStyle=1
 Picture=[ZIPC204000078DA73F23DC4C200064E40AC01C41250CCC820C0C00CA41BA0F228A08681E10150521EC8FC5F3F1CE081D00391072271CA02E50E84228B2C08256422AA8A058108365F040CE25281CCE30B41D21982E0A3A9F785D0BC21A8AEE00D8189C05440600398C71B80A63A00049155C0D57B82481E1FDCFE85A84053EF41ACFA04308F1B8B7A985802AA7A57B09C0B16F52EC82A50D5FFAFE77240558DE063570F546183A4DA069B0A10747044B0392D6010970A741E3688A6DE96A07A5B549E82AD82252EB50A960AB6844D1C1A1000A08D1EB7]
}
Add(Hub,8669506,392,189)
{
 link(onEvent1,11664498:doClear,[(424,195)(424,265)])
 link(onEvent2,5073620:doClear,[(417,202)(417,314)])
}
Add(Math,7368544,105,266)
{
 OpType=2
 Op2=1
 link(onResult,5203811:doCompare,[])
 link(Op1,1576501:Var1,[(111,254)])
}
Add(Hub,9504547,245,217)
{
 InCount=2
 link(onEvent1,9430810:doText2,[])
 link(onEvent2,9430810:doSetFocus,[])
}
Add(StrPart,4111713,308,126)
{
 Char="""
 Point(Left)
 Point(Right)
}
Add(GetDataEx,14959253,308,224)
{
 link(Data,4111713:Right,[])
}
карма: 0

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#192: 2009-09-20 19:19:36 ЛС | профиль | цитата
BeginEnd писал(а):
Режет на 20-25 строке!!!

Измени раскладку на русскую перед копированием, если не прокатит, значит, кидай на файлобменник
карма: 22

1
Голосовали:BeginEnd
Ответов: 30
Рейтинг: 2
#193: 2009-09-20 19:22:29 ЛС | профиль | цитата
nesco писал(а):

Измени раскладку на русскую

Спасибо! Помогло. Код в предыдущем сообщении.
карма: 0

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#194: 2009-09-20 19:43:44 ЛС | профиль | цитата
Гы, как раз недавно кто-то спрашивал про подсчет суммы в колонке таблицы
карма: 22

0
Ответов: 30
Рейтинг: 2
#195: 2009-09-20 19:51:30 ЛС | профиль | цитата
nesco писал(а):

недавно кто-то спрашивал про подсчет суммы в колонке таблицы


Я про это тоже видел.
Даже докрапал к подсказке.
code_14990.txt
карма: 0

0
файлы: 1code_14990.txt [2KB] [1048]
ФорумыСоревнованияHiAsm contest дубль 2 ← Ctrl12345...91011121314Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика