HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуТаблица строк ← Ctrl123Ctrl →
Этот топик читают: Гость
Ответов: 182
Рейтинг: 14
#1: 2015-05-11 11:34:08 ЛС | профиль | цитата
Подскажите как сделать,чтоб при выборе определенного флажка ,в таблице строк отображалось материал и вес, по порядку с верху в низ. 
Add(CheckBox,13802234,147,98)
{
 Left=95
 Top=45
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Кокс"
}
Add(CheckBox,2805966,147,147)
{
 Left=95
 Top=75
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Стр-ка"
}
Add(CheckBox,11587112,147,196)
{
 Left=95
 Top=110
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeSi"
}
Add(CheckBox,13255151,147,245)
{
 Left=95
 Top=145
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeMn"
}
Add(StringTable,5839332,448,154)
{
 Left=455
 Top=25
 Width=200
 Height=210
 Columns=#8:Материал|3:Вес|
}
Add(Edit,15698706,224,98)
{
 Left=189
 Top=45
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="111"
}
Add(Edit,9727981,224,147)
{
 Left=189
 Top=75
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="202"
}
Add(Edit,2761462,224,196)
{
 Left=189
 Top=110
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="57"
}
Add(Edit,5625846,224,245)
{
 Left=189
 Top=145
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="88"
}
Add(Label,13483547,147,14)
{
 Left=95
 Top=17
 Width=74
 Height=17
 Caption="Материал"
}
Add(Label,6200967,224,14)
{
 Left=195
 Top=17
 Width=103
 Height=17
 Caption="Вес"
}
карма: 0

0
Ответов: 2271
Рейтинг: 677
#2: 2015-05-11 11:45:37 ЛС | профиль | цитата
Stalevar, не понятно какие данные должны отображаться в таблице? Откуда должны браться данные для таблицы: файл, база данных? Или вам нужно забить в таблицу данные введенные в текстовые поля ввода (элементы Edit)?
карма: 11

0
Ответов: 8928
Рейтинг: 823
#3: 2015-05-11 12:13:07 ЛС | профиль | цитата
Stalevar, вот именно
Другое дело посчитать сколько в таблице кг материала code_35608.txt
карма: 19

0
файлы: 1code_35608.txt [3.6KB] [472]
Ответов: 223
Рейтинг: 24
#4: 2015-05-11 12:26:59 ЛС | профиль | цитата
Stalevar если я правильно понял...так:
Add(MainForm,2953706,21,105)
{
 Width=539
}
Add(CheckBox,13802234,189,252)
{
 Left=95
 Top=45
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Кокс"
 link(onCheck,6950942:doWork1,[])
}
Add(CheckBox,2805966,189,301)
{
 Left=95
 Top=75
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Стр-ка"
 link(onCheck,6950942:doWork2,[(247,307)(247,265)])
}
Add(CheckBox,11587112,189,350)
{
 Left=95
 Top=110
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeSi"
 link(onCheck,6950942:doWork3,[(247,356)(247,272)])
}
Add(CheckBox,13255151,189,392)
{
 Left=95
 Top=145
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeMn"
 link(onCheck,6950942:doWork4,[(247,398)(247,279)])
}
Add(StringTable,5839332,525,259)
{
 Left=315
 Top=25
 Width=200
 Height=210
 Columns=#8:Материал|3:Вес|
}
Add(Edit,15698706,476,126)
{
 Left=189
 Top=45
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="111"
}
Add(Edit,9727981,483,126)
{
 Left=189
 Top=75
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="202"
}
Add(Edit,2761462,490,126)
{
 Left=189
 Top=110
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="57"
}
Add(Edit,5625846,497,126)
{
 Left=189
 Top=145
 Width=110
 Font=[Arial,8,0,0,1]
 Ctl3D=1
 WinStyle=4
 Layout="editors"
 Text="88"
}
Add(Label,13483547,196,203)
{
 Left=95
 Top=17
 Width=74
 Height=17
 Caption="Материал"
}
Add(Label,6200967,273,203)
{
 Left=195
 Top=17
 Width=103
 Height=17
 Caption="Вес"
}
Add(FormatStr,11899070,469,259)
{
 Mask="%1;%2"
 link(onFString,5839332:doAdd,[])
 link(Str2,13525030:Var,[])
}
Add(ChanelToIndex,6950942,273,252)
{
 Count=4
 link(onIndex,12532522:doEvent1,[])
}
Add(MultiSetParam,12920594,378,259)
{
 Parameters=#4:кокс|6:Стр-ка|4:FeSi|4:FeMn|0:|
 Count=1
 OutType=1
 link(onSet1,11899070:doString,[])
}
Add(GetIndexData,13525030,476,203)
{
 Count=4
 link(Data1,15698706:Text,[])
 link(Data2,9727981:Text,[])
 link(Data3,2761462:Text,[])
 link(Data4,5625846:Text,[])
}
Add(Hub,12532522,336,252)
{
 link(onEvent1,13525030:doIndex,[(413,258)(413,209)])
 link(onEvent2,12920594:doSet,[])
}
карма: 0

0
файлы: 1code_35610.txt [2.1KB] [362]
Ответов: 182
Рейтинг: 14
#5: 2015-05-11 15:55:16 ЛС | профиль | цитата
wasya, Да, почти так.
Нужно только чтоб материал и вес отображались только выбранные. Если я ставлю флажок "Кокс" и "FeSi" то они должны появиться в таблице в месте с весом на против, а если я убрал флажок "Кокс" то с таблички должно пропасть Кокс и его вес, а FeSi переместится на верхнюю строчку.
------------ Дoбавленo в 15.55:
И еще не получается изменить цвет шрифта. Делаю цвет фона черный,цвет шрифта зеленый, а получается цвет фона черный пока не выбрал материал.
карма: 0

0
Ответов: 223
Рейтинг: 24
#6: 2015-05-11 16:31:29 ЛС | профиль | цитата
Так...
Add(CheckBox,13802234,252,273)
{
 Left=95
 Top=45
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Кокс"
 link(onCheck,6950942:doWork1,[])
}
Add(CheckBox,2805966,259,280)
{
 Left=95
 Top=75
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Стр-ка"
 link(onCheck,6950942:doWork2,[])
}
Add(CheckBox,11587112,266,287)
{
 Left=95
 Top=110
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeSi"
 link(onCheck,6950942:doWork3,[])
}
Add(CheckBox,13255151,273,294)
{
 Left=95
 Top=145
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeMn"
 link(onCheck,6950942:doWork4,[])
}
Add(StringTable,5839332,637,476)
{
 Left=185
 Top=15
 Width=200
 Height=210
 Columns=#8:Материал|3:Вес|
}
Add(Label,13483547,252,224)
{
 Left=95
 Top=17
 Width=74
 Height=17
 Caption="Материал"
}
Add(ChanelToIndex,6950942,343,273)
{
 Count=4
 link(onIndex,12532522:doEvent1,[])
}
Add(Hub,12532522,385,273)
{
 OutCount=4
 link(onEvent1,5839332:doClear,[(518,279)(518,489)])
 link(onEvent2,1819855:doClear,[(458,286)(458,426)])
 link(onEvent3,10270263:doClear,[(411,293)(411,329)(380,329)(380,364)])
 link(onEvent4,14089666:doString,[(411,300)(411,329)(230,329)(230,357)])
}
Add(ArrayEnum,1202295,406,413)
{
 link(onItem,7859907:doCompare,[])
 link(onEndEnum,7052209:doEnum,[(485,426)(485,482)])
 link(Array,10270263:Array,[])
}
Add(If_else,7859907,455,413)
{
 Op2=Integer(1)
 link(onTrue,1819855:doAdd,[])
 link(Op1,1202295:Item,[(461,401)(448,401)(448,457)(412,457)])
}
Add(StrList,1819855,517,413)
{
 link(Str,1202295:Index,[(523,401)(488,401)(488,457)(419,457)])
}
Add(FormatStr,14089666,252,351)
{
 DataCount=4
 Mask="%1;%2;%3;%4"
 link(onFString,13006858:doEnum,[])
 link(Str1,13802234:Checked,[])
 link(Str2,2805966:Checked,[])
 link(Str3,11587112:Checked,[])
 link(Str4,13255151:Checked,[])
}
Add(Str_Enum,13006858,315,351)
{
 link(onEnum,10270263:doAdd,[])
 link(onEndEnum,1202295:doEnum,[(377,364)(377,419)])
}
Add(StrList,10270263,392,351)
{
}
Add(StrList,2897385,574,413)
{
 Strings=#8:Кокс;111|10:Стр-ка;222|8:FeSi;214|8:FeMn;345|
}
Add(ArrayRW,5328255,588,476)
{
 link(onRead,5839332:doAdd,[])
 link(Array,2897385:Array,[])
}
Add(ArrayEnum,7052209,531,476)
{
 link(onItem,5328255:doRead,[])
 link(Array,1819855:Array,[])
}
карма: 0

1
Голосовали:Stalevar
Ответов: 182
Рейтинг: 14
#7: 2015-05-11 16:40:11 ЛС | профиль | цитата
wasya, Большое спасибо.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#8: 2015-05-11 22:29:50 ЛС | профиль | цитата
wasya, а меньшей кровью никак нельзя было ?
code_35618.txt
А включив точку doSort, получить список в StringTable в алфавитном порядке:
Add(MainForm,5356133,203,126)
{
 Width=319
}
Add(CheckBox,13802234,203,175)
{
 Left=10
 Top=45
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Кокс"
 link(onCheck,12532522:doEvent1,[])
}
Add(CheckBox,2805966,210,182)
{
 Left=10
 Top=75
 Width=70
 Color=65535
 TabOrder=-1
 Caption="Стр-ка"
 link(onCheck,12532522:doEvent2,[])
}
Add(CheckBox,11587112,217,189)
{
 Left=10
 Top=110
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeSi"
 link(onCheck,12532522:doEvent3,[])
}
Add(CheckBox,13255151,224,196)
{
 Left=10
 Top=145
 Width=70
 Color=65535
 TabOrder=-1
 Caption="FeMn"
 link(onCheck,12532522:doEvent4,[])
}
Add(StringTable,5839332,448,252)
{
 Left=85
 Top=15
 Width=175
 Height=210
 Columns=#8:Материал|3:Вес|
 Point(doSort)
}
Add(Label,13483547,266,126)
{
 Left=10
 Top=17
 Width=74
 Height=17
 Caption="Материал"
}
Add(Hub,12532522,287,175)
{
 InCount=4
 link(onEvent1,5839332:doClear,[(435,181)(435,265)])
 link(onEvent2,14089666:doString,[(312,188)(312,238)(191,238)(191,258)])
}
Add(If_else,7859907,315,252)
{
 Op2=Integer(1)
 link(onTrue,5328255:doRead,[])
}
Add(FormatStr,14089666,203,252)
{
 DataCount=4
 Mask="%1;%2;%3;%4"
 link(onFString,13912246:doEnum,[])
 link(Str1,13802234:Checked,[])
 link(Str2,2805966:Checked,[])
 link(Str3,11587112:Checked,[])
 link(Str4,13255151:Checked,[])
}
Add(StrList,2897385,371,189)
{
 Strings=#0:|8:Кокс;111|10:Стр-ка;222|8:FeSi;214|8:FeMn;345|
}
Add(ArrayRW,5328255,385,252)
{
 link(onRead,5839332:doAdd,[])
 link(Array,2897385:Array,[])
 link(Index,13912246:NumSubStr,[(398,240)(365,240)(365,301)(265,301)])
}
Add(Str_Enum,13912246,259,252)
{
 link(onEnum,7859907:doCompare,[])
 link(onEndEnum,5839332:doSort,[(306,265)(306,293)])
}
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_35618.txt [1.6KB] [387]
Ответов: 2271
Рейтинг: 677
#9: 2015-05-12 01:56:00 ЛС | профиль | цитата
Stalevar, может вам подойдет другой интерфейс?
Все в одной таблице: code_35620.txt
Если что прочитайте: Менеджеры
карма: 11

0
файлы: 1code_35620.txt [5.2KB] [621]
Ответов: 182
Рейтинг: 14
#10: 2015-05-14 14:15:47 ЛС | профиль | цитата
Вес нужно брать из текстового поля. Со шрифтом так и не получается, зеленый сделать. Ну и текст по вертикали тоже не делается.
code_35635.txt
карма: 0

0
файлы: 1code_35635.txt [3.7KB] [402]
Ответов: 223
Рейтинг: 24
#11: 2015-05-14 15:11:07 ЛС | профиль | цитата
Stalevar - взял часть схемы у Tadа она короче (Вес нужно брать из текстового поля) ниже.Где текст дожен быть зеленый и где по вертикали???

code_35637.txt
карма: 0

0
файлы: 1code_35637.txt [3.9KB] [415]
Ответов: 182
Рейтинг: 14
#12: 2015-05-14 15:23:14 ЛС | профиль | цитата
Зеленый на черном фоне,в таблице строк. По вертикали, в текстовом поле ввода где сейчас красный фон.
карма: 0

0
Ответов: 223
Рейтинг: 24
#13: 2015-05-14 15:49:32 ЛС | профиль | цитата
Stalevar - вертикальный текст было где-то на форуме.Цвет сделал так:

code_35638.txt
карма: 0

1
файлы: 1code_35638.txt [4.2KB] [376]
Голосовали:Stalevar
Ответов: 182
Рейтинг: 14
#14: 2015-05-14 16:08:15 ЛС | профиль | цитата
Спасибо.
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#15: 2015-05-15 08:41:53 ЛС | профиль | цитата
Stalevar писал(а):
По вертикали
А это как ?

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1stalevar_1.png [2KB] [682]
ФорумыПомощь по пакетуТаблица строк ← Ctrl123Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика