HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуищу помощь в решении двух задач ← Ctrl1Ctrl →
Этот топик читают: Гость
Этот топик был перемещен из раздела "Помощь по среде"
Ответов: 32
Рейтинг: 0
#1: 2018-05-11 18:05:47 ЛС | профиль | цитата
задача1
radiobutton

как при помощи двух радиобаттонов переключать панели или группы элементов,
то есть выводить на рабочую область программы различные интерфейсы в зависимости от активности радиобатонов.
в реальном времени


задача2
TrackBarRush

В трекбар двигая ползунок мышкой, меняется значение на выходе, но
если кликать по полоске трекбара, ползунок скачет, а значение не меняется.
В простом TrackBar значение меняется - но он не красивый.


Как сделать так, что бы в TrackBarRush ползунок перескакивал в место клика (или любое ближайшее к нему значение) и при этом менялось значение на выходе соответствующее положению ползунка?
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 2193
Рейтинг: 673
#2: 2018-05-11 19:21:47 ЛС | профиль | цитата
Вариант решения задач:
Схема

Add(MainForm,4827801,329,210)
{
 Width=657
 Height=523
 Position=1
}
Add(RadioButton,8359796,399,210)
{
 Left=20
 Top=25
 Selected=0
 Caption="First"
 link(onSelect,8752307:doEvent1,[])
}
Add(RadioButton,1010563,399,280)
{
 Left=20
 Top=50
 Caption="Second"
 link(onSelect,6867899:doEvent1,[])
}
Add(ChildPanelEx,13956708,560,210)
{
}
BEGIN_SDK
  Add(EditMultiEx,6328165,21,21)
  {
   WorkCount=#9:doVisible|
   Width=475
   Height=228
   link(doVisible,11367188:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,11367188,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Point(doVisible)
  }
  Add(Edit,10528558,273,49)
  {
   Left=125
   Top=45
  }
  Add(Edit,15057719,266,119)
  {
   Left=120
   Top=115
  }
END_SDK
Add(ChildPanelEx,11758437,560,287)
{
}
BEGIN_SDK
  Add(EditMultiEx,6086173,21,21)
  {
   WorkCount=#9:doVisible|
   Width=580
   Height=361
   link(doVisible,8201074:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,8201074,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Visible=1
   Point(doVisible)
  }
  Add(Button,9259550,273,84)
  {
   Left=100
   Top=110
  }
  Add(Button,5904272,280,126)
  {
   Left=95
   Top=170
  }
END_SDK
Add(Hub,6867899,441,280)
{
 link(onEvent1,13868553:doData,[])
 link(onEvent2,9122192:doWork2,[])
}
Add(Hub,8752307,441,210)
{
 link(onEvent1,12706370:doWork2,[])
 link(onEvent2,15990697:doData,[])
}
Add(HubEx,12706370,539,210)
{
 link(onEvent,13956708:doVisible,[])
}
Add(HubEx,9122192,525,287)
{
 link(onEvent,11758437:doVisible,[])
}
Add(DoData,15990697,476,217)
{
 Data=Integer(0)
 link(onEventData,9122192:doWork1,[(529,223)])
}
Add(DoData,13868553,469,280)
{
 Data=Integer(0)
 link(onEventData,12706370:doWork3,[(543,286)])
}
Add(TrackBarRush,6912950,406,406)
{
 Left=80
 Top=435
 Width=455
 Point(onStop)
 Point(onMouseDown)
 link(onPosition,10983425:doWork1,[(452,412)])
 link(onStop,10983425:doWork2,[])
 link(onMouseDown,10983425:doWork3,[(452,426)])
}
Add(Label,10168921,539,413)
{
 Left=575
 Top=435
}
Add(ChangeMon,13538681,469,413)
{
 link(onData,10168921:doText,[])
 link(Data,6912950:Position,[(475,392)(393,392)(393,450)(412,450)])
}
Add(HubEx,10983425,448,413)
{
 link(onEvent,13538681:doData,[])
}

По поводу TrackBarRush возможно автор даст более точный ответ. У меня в схеме вариант использования.

Редактировалось 1 раз(а), последний 2018-05-11 19:23:11
карма: 10

0
Ответов: 32
Рейтинг: 0
#3: 2018-05-11 19:51:54 ЛС | профиль | цитата
Спасибо.
попробую сейчас
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#4: 2018-05-11 19:57:42 ЛС | профиль | цитата
sla8a, для 2-х панелей сойдёт.
А так для более двух.

Add(MainForm,4827801,245,105)
{
 Width=433
 Height=366
 Position=1
 link(onCreate,14023555:doWork1,[(321,125)(321,174)])
}
Add(RadioButton,8359796,245,168)
{
 Left=20
 Top=25
 Selected=0
 Caption="1"
 link(onSelect,14023555:doWork2,[])
}
Add(RadioButton,1010563,252,203)
{
 Left=20
 Top=50
 Caption="2"
 link(onSelect,15618207:doWork2,[])
}
Add(ChildPanelEx,13956708,469,322)
{
}
BEGIN_SDK
  Add(EditMultiEx,6328165,21,21)
  {
   WorkCount=#9:doVisible|
   Width=475
   Height=228
   link(doVisible,11367188:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,11367188,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Point(doVisible)
  }
  Add(Edit,10528558,273,49)
  {
   Left=125
   Top=45
   Text="1"
  }
  Add(Edit,15057719,266,119)
  {
   Left=120
   Top=115
   Text="1"
  }
END_SDK
Add(ChildPanelEx,11758437,427,329)
{
}
BEGIN_SDK
  Add(EditMultiEx,6086173,21,21)
  {
   WorkCount=#9:doVisible|
   Width=580
   Height=361
   link(doVisible,8201074:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,8201074,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Point(doVisible)
  }
  Add(Button,9259550,189,84)
  {
   Left=100
   Top=110
   Caption="2"
  }
  Add(Button,5904272,196,126)
  {
   Left=95
   Top=170
   Caption="2"
  }
END_SDK
Add(BitsToInt,14717029,245,322)
{
 link(onNumber,15702835:doBits,[])
 link(Bit1,8359796:Selected,[])
 link(Bit2,1010563:Selected,[])
 link(Bit3,9686432:Selected,[])
 link(Bit4,8580143:Selected,[])
}
Add(IntToBits,15702835,294,322)
{
 Count=4
 Data_0=Integer(0)
 Data_1=Integer(1)
 link(onBit1,13956708:doVisible,[])
 link(onBit2,11758437:doVisible,[])
 link(onBit3,7574160:doVisible,[])
 link(onBit4,10337800:doVisible,[])
}
Add(HubEx,14023555,309,168)
{
 Angle=3
 link(onEvent,14717029:doNumber,[(313,152)(233,152)(233,328)])
}
Add(ChildPanelEx,7574160,385,336)
{
}
BEGIN_SDK
  Add(EditMultiEx,2776007,21,21)
  {
   WorkCount=#9:doVisible|
   Width=475
   Height=228
   link(doVisible,12694615:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,12694615,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Point(doVisible)
  }
  Add(Edit,6548840,273,49)
  {
   Left=125
   Top=45
   Text="3"
  }
  Add(Edit,2986514,266,119)
  {
   Left=120
   Top=115
   Text="3"
  }
END_SDK
Add(ChildPanelEx,10337800,343,343)
{
}
BEGIN_SDK
  Add(EditMultiEx,2795405,21,21)
  {
   WorkCount=#9:doVisible|
   Width=580
   Height=361
   link(doVisible,14560545:doVisible,[(73,27)(73,104)])
  }
  Add(Panel,14560545,126,91)
  {
   Left=95
   Top=5
   Width=316
   Height=319
   Point(doVisible)
  }
  Add(Button,13037305,273,84)
  {
   Left=100
   Top=110
   Caption="4"
  }
  Add(Button,8930801,280,126)
  {
   Left=95
   Top=170
   Caption="4"
  }
END_SDK
Add(RadioButton,9686432,259,238)
{
 Left=20
 Top=75
 Caption="3"
 link(onSelect,15618207:doWork3,[(313,244)])
}
Add(RadioButton,8580143,266,273)
{
 Left=20
 Top=100
 Caption="4"
 link(onSelect,15618207:doWork1,[(321,279)(321,209)])
}
Add(HubEx,15618207,309,203)
{
 Angle=3
 link(onEvent,14023555:doWork3,[])
}


Редактировалось 1 раз(а), последний 2018-05-12 09:20:22
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 32
Рейтинг: 0
#5: 2018-05-11 20:06:36 ЛС | профиль | цитата
Ибо я нуб
подскажите как схему вставить в проект?

или проект выложите плиз с расширением sha

--- Добавлено в 2018-05-11 20:10:06

я таким образом переключение панелей радиобатоноами реализовал
через задницу-но работает


Редактировалось 1 раз(а), последний 2018-05-11 20:10:06
карма: 0

0
Ответов: 8887
Рейтинг: 823
#6: 2018-05-11 20:30:41 ЛС | профиль | цитата
konsys, схему выделить в HiAsm, нажать "Копировать" в поле ответа нажать теги "Код" и "Вставить" скопированное между тегами. Для обратной операции нажать левый верхний угол окна кода, он выделится и скопируется. В поле HiAsm нажать "вставить". 


Add(TrackBarRush,14461224,196,84)
{
 Left=35
 Top=30
 Width=200
 Max=200
 Frequency=20
 AbsPosition=0
 Point(MouseX)
 Point(onMouseDown)
 link(onPosition,11506462:doWork1,[(263,90)])
 link(onMouseDown,1222923:doEvent1,[])
}
Add(Label,270632,196,147)
{
 Left=270
 Top=30
 Width=75
 link(Text,14461224:Position,[])
}
Add(Hub,1222923,238,91)
{
 link(onEvent1,7889222:doData,[(270,97)(270,76)(137,76)(137,97)])
 link(onEvent2,11506462:doWork2,[])
}
Add(DoData,7889222,147,91)
{
 link(onEventData,14461224:doPosition2,[])
 link(Data,14461224:MouseX,[(153,82)(188,82)(188,124)(209,124)])
}
Add(HubEx,11506462,259,98)
{
 Angle=1
 link(onEvent,270632:doText,[(263,132)(186,132)(186,153)])
}
карма: 19

0
Ответов: 32
Рейтинг: 0
#7: 2018-05-11 20:30:58 ЛС | профиль | цитата
Разобрался как схему открыть.
копировать в нотепад
сохранить
сменить расширение
открыть прогой

--- Добавлено в 2018-05-11 20:33:12

Леонид, спасибо
ваш совет проще, чем я мудрил

Редактировалось 1 раз(а), последний 2018-05-11 20:33:12
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#8: 2018-05-11 20:34:20 ЛС | профиль | цитата
konsys писал(а):
Разобрался как схему открыть.
Нихрена ты не разобрался.
То о чем писал Леонид
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 32
Рейтинг: 0
#9: 2018-05-11 20:35:02 ЛС | профиль | цитата
sla8a,
вы меняя спасли.
то что надо

--- Добавлено в 2018-05-11 20:36:30

Tad, я свой ответ написал немного ранее поста Леонида
а затем сделал так как Леонид написал
и теперь я почти гуру.

Редактировалось 1 раз(а), последний 2018-05-11 20:36:30
карма: 0

0
9
ФорумыПомощь по пакетуищу помощь в решении двух задач ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2020
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика