Здравствуйте! Помогите новичку...

Форумы Помощь по пакетуЗдравствуйте! Помогите новичку... ← Ctrl1 2 3 4 5 67Ctrl →

Этот топик читают: Гость

Ответов: 212

Рейтинг: 2

#91: 2017-06-13 19:58:27 ЛС | профиль | цитата

Подскажите с Align. Если установить два блока (оба caBottom), то как определить верхний из них? Пока не трогаешь слои, то все определяется по факту - как расположишь, так и разместятся. Но стоит один из них отправить на задний план, как он тут же ставится в самый низ (по вертикали).
Иными словами: как можно сбросить блок на задний план, но не пустить его в начало caBottom, где находится его конкурент.
А вот и заготовка:



Add(ChildPanel,611880,216,47)
{
}
BEGIN_SDK
  Add(EditMulti,15866095,21,21)
  {
  }
  Add(Panel,4565513,35,105)
  {
   Left=90
   Width=208
   Height=255
   Color=16760767
   Caption="Вертикальн. блок. Второй план (из 3-х)"
  }
END_SDK
Add(ChildPanel,5917912,277,44)
{
}
BEGIN_SDK
  Add(EditMulti,10395794,21,21)
  {
  }
  Add(Panel,16173533,35,105)
  {
   Top=212
   Width=384
   Align=4
   Color=8421631
   Caption="Нижний блок. Передний план."
  }
END_SDK
Add(ChildPanel,13988435,159,49)
{
}
BEGIN_SDK
  Add(EditMulti,782452,21,21)
  {
  }
  Add(Panel,6524748,44,105)
  {
   Top=162
   Width=384
   Align=4
   Color=16744448
   Font=[MS Sans Serif,8,0,-16777193,1]
   Caption="Верхний блок: должен быть на заднем плане"
  }
END_SDK

карма: 0

Незнание HiAsm не снижает возможностей, но сильно увеличивает схему

Ответов: 9906

Рейтинг: 351

#92: 2017-06-14 11:32:32 ЛС | профиль | цитата


Add(ChildPanel,5917912,252,112)
{
}
BEGIN_SDK
  Add(EditMulti,10395794,21,21)
  {
   WorkCount=1
   link(doWork1,16173533:doBringToFront,[(102,27)(102,111)])
  }
  Add(Panel,16173533,112,98)
  {
   Top=211
   Width=384
   Align=4
   Color=8421631
   Caption="Нижний блок. Передний план."
   Point(doBringToFront)
  }
END_SDK
Add(MainForm,2953706,189,98)
{
 link(onCreate,5917912:doWork1,[])
}
Add(ChildPanel,13988435,273,98)
{
}
BEGIN_SDK
  Add(EditMulti,782452,21,21)
  {
  }
  Add(Panel,6524748,44,105)
  {
   Top=161
   Width=384
   Align=4
   Color=16744448
   Font=[MS Sans Serif,8,0,-16777193,1]
   Caption="Верхний блок: должен быть на заднем плане"
  }
END_SDK
Add(ChildPanel,611880,294,70)
{
}
BEGIN_SDK
  Add(EditMulti,15866095,21,21)
  {
  }
  Add(Panel,4565513,35,105)
  {
   Left=90
   Width=208
   Height=255
   Color=16760767
   Caption="Вертикальн. блок. Второй план (из 3-х)"
  }
END_SDK

карма: 9

Ответов: 8918

Рейтинг: 823

#93: 2017-06-14 17:56:01 ЛС | профиль | цитата

Galkov, ТС наверное точки попутал

И "над", и "под" работают, как и предполагалось

Add(ChildPanel,5917912,392,119)
{
}
BEGIN_SDK
  Add(EditMulti,10395794,21,21)
  {
   WorkCount=1
   link(doWork1,16173533:doSendToBack,[(102,27)(102,118)])
  }
  Add(Panel,16173533,112,98)
  {
   Top=211
   Width=384
   Align=4
   Color=8421631
   Caption="Нижний блок. Передний план."
   Point(doBringToFront)
   Point(doSendToBack)
  }
END_SDK
Add(MainForm,3119032,245,119)
{
}
Add(ChildPanel,13988435,392,77)
{
}
BEGIN_SDK
  Add(EditMulti,782452,21,21)
  {
   WorkCount=1
   VOffset=5
   link(doWork1,6524748:doSendToBack,[(102,32)(102,83)])
  }
  Add(Panel,6524748,121,63)
  {
   Top=161
   Width=384
   Align=4
   Color=16744448
   Font=[MS Sans Serif,8,0,-16777193,1]
   Caption="Верхний блок: должен быть на заднем плане"
   Point(doBringToFront)
   Point(doSendToBack)
  }
END_SDK
Add(ChildPanel,611880,392,35)
{
}
BEGIN_SDK
  Add(EditMulti,15866095,21,21)
  {
   WorkCount=1
   link(doWork1,4565513:doSendToBack,[(130,27)(130,83)])
  }
  Add(Panel,4565513,140,63)
  {
   Left=90
   Width=208
   Height=255
   Color=16760767
   Caption="Вертикальн. блок. Второй план (из 3-х)"
   Point(doBringToFront)
   Point(doSendToBack)
  }
END_SDK
Add(Timer,14607432,245,70)
{
 Interval=400
 link(onTimer,15973372:doNext,[])
}
Add(Counter,15973372,294,70)
{
 Max=2
 link(onNext,14513492:doEvent,[])
}
Add(IndexToChanel,14513492,343,70)
{
 Count=3
 link(onEvent1,611880:doWork1,[(382,76)(382,41)])
 link(onEvent2,13988435:doWork1,[])
 link(onEvent3,5917912:doWork1,[(382,90)(382,125)])
}

Редактировалось 1 раз(а), последний 2017-06-16 00:12:25

карма: 19

Ответов: 212

Рейтинг: 2

#94: 2017-06-16 10:34:17 ЛС | профиль | цитата

Спасибо!! Спасибо! А я уже было начал смиряться

Эх, как здорово!
Но подозреваю, что в HiAsm заложен вирус: стоит открыть эту программу, как уже не оторваться. На одно "посижу минут 10" уходит несколько часов. Думаю, это вирус такой

карма: 0

Незнание HiAsm не снижает возможностей, но сильно увеличивает схему

Ответов: 212

Рейтинг: 2

#95: 2017-06-16 19:08:54 ЛС | профиль | цитата

Не понимаю я этот Тулбар Лайаут! Не могу понять! Все делаю, как в примерах, не получается, все картинки складываются в стопочку друг на друга, а не сеткой!



Add(MainForm,9313895,63,42)
{
 Width=537
 Height=492
}
Add(ChildScrollBox,14986880,196,42)
{
}
BEGIN_SDK
  Add(EditMulti,14579416,420,210)
  {
   WorkCount=2
   VarCount=2
   Width=272
   Height=179
   VOffset=14
   PColor(doWork1,16755200)
   PColor(doWork2,16711935)
   link(doWork1,13563605:doEvent1,[])
   link(doWork2,1612140:##clear,[(437,237)(437,321)])
   link(Var1,1612140:##count,[(426,371)(636,371)])
  }
  Add(ScrollBox,4007144,371,287)
  {
   Top=107
   Width=521
   Height=347
   Align=5
   Color=15397089
   Layout="parent.MyImage"
   Point(Width)
  }
  Add(ChildPanelEx,1612140,630,294)
  {
   Mode=1
  }
  BEGIN_SDK
    Add(EditMultiEx,11543816,21,21)
    {
     WorkCount=#5:##add|8:##select|6:doLoad|7:##clear|7:doWidth|8:doHeight|
     EventCount=#8:onResize|
     VarCount=#7:##count|7:##index|12:##eventIndex|
     Width=209
     Height=207
     Point(##add)
     Point(##select)
     Point(##clear)
     Point(##count)
     Point(##index)
     Point(##eventIndex)
     link(doLoad,8674628:doLoad,[])
     link(doWidth,6686648:doWidth,[(73,55)(73,146)])
     link(doHeight,6686648:doHeight,[(73,62)(73,153)])
     link(##count,8674628:ImageBitmap,[(27,78)(97,78)])
    }
    Add(Panel,6686648,126,133)
    {
     Width=115
     Height=130
     Color=15780518
     Layout="parent.MyImage"
     Point(onResize)
     Point(doWidth)
     Point(doHeight)
    }
    Add(Image,8674628,91,35)
    {
     Left=2
     Top=2
     Width=214
     Height=158
     Align=5
     Color=65535
     link(onClick,11543816:onResize,[(159,41)(159,27)])
    }
  END_SDK
  Add(Hub,13563605,490,224)
  {
   OutCount=4
   PColor(onEvent1,16755200)
   PColor(onEvent2,16755200)
   PColor(onEvent3,16755200)
   link(onEvent1,1612140:##add,[(571,230)(571,300)])
   link(onEvent2,61617:doResize,[])
   link(onEvent3,1612140:doLoad,[(513,244)(513,314)])
  }
  Add(ToolBarLayout,61617,525,231)
  {
   Name="MyCells"
   Space=2
   Padding=30
  }
END_SDK
Add(ChildPanel,12877256,133,42)
{
 link(onEvent1,14986880:doWork1,[])
 link(onEvent2,14986880:doWork2,[])
}
BEGIN_SDK
  Add(EditMulti,6028224,511,238)
  {
   EventCount=2
  }
  Add(Panel,9994112,455,322)
  {
   Top=5
   Width=515
   Height=100
   Align=2
  }
  Add(Button,2334403,538,337)
  {
   Left=55
   Top=35
   Width=90
   Caption="Показать"
   link(onClick,2652920:doEvent1,[(579,343)(579,342)])
  }
  Add(FileSearch,10445709,644,343)
  {
   link(onSearch,12348148:doLoad,[])
   link(Dir,14699836:Text,[])
  }
  Add(Img_Loader,12348148,749,343)
  {
   PColor(onLoad,16755200)
   link(onLoad,6028224:onEvent1,[(796,349)(796,244)])
  }
  Add(Edit,14699836,651,294)
  {
   Left=45
   Top=16
   Width=325
   Text="C:\Users\Public\Pictures\Sample Pictures"
  }
  Add(Hub,2652920,595,336)
  {
   InCount=2
   PColor(onEvent1,16711935)
   link(onEvent1,6028224:onEvent2,[(710,342)(710,251)])
   link(onEvent2,10445709:doSearch,[])
  }
END_SDK

карма: 0

Незнание HiAsm не снижает возможностей, но сильно увеличивает схему

Ответов: 8918

Рейтинг: 823

#96: 2017-06-16 21:48:00 ЛС | профиль | цитата

inter1, внутри панели прокрутки НИЧЕГО нет, поэтому и считать "Тулбар=у Лайаут" нечего, вот и стопочка. (Хорошо, что не посылает матом

)

С панелью


Add(MainForm,9313895,238,70)
{
 Width=537
 Height=492
}
Add(ChildScrollBox,14986880,371,70)
{
}
BEGIN_SDK
  Add(EditMulti,14579416,21,21)
  {
   WorkCount=2
   VarCount=2
   Width=272
   Height=179
   VOffset=14
   PColor(doWork1,16755200)
   PColor(doWork2,16711935)
   link(doWork1,3720468:doWork1,[])
   link(doWork2,3720468:doWork2,[])
   link(Var1,3720468:Var1,[(27,75)(55,75)])
  }
  Add(ScrollBox,4007144,119,84)
  {
   Top=107
   Width=521
   Height=347
   Align=5
   Color=15397089
   Layout="parent.MyImage"
   Point(Width)
  }
  Add(ChildPanel,3720468,49,35)
  {
  }
  BEGIN_SDK
    Add(EditMulti,11158442,21,21)
    {
     WorkCount=2
     VarCount=1
     link(doWork1,15545110:doEvent1,[(81,27)(81,69)])
     link(doWork2,12416728:##clear,[(74,34)(74,160)])
     link(Var1,12416728:##count,[(27,187)(237,187)])
    }
    Add(Panel,3492459,35,105)
    {
     Width=1200
     Height=900
    }
    Add(ChildPanelEx,12416728,231,133)
    {
     Mode=1
    }
    BEGIN_SDK
      Add(EditMultiEx,11035397,21,21)
      {
       WorkCount=#5:##add|8:##select|6:doLoad|7:##clear|7:doWidth|8:doHeight|
       EventCount=#8:onResize|
       VarCount=#7:##count|7:##index|12:##eventIndex|
       Width=209
       Height=207
       Point(##add)
       Point(##select)
       Point(##clear)
       Point(##count)
       Point(##index)
       Point(##eventIndex)
       link(doLoad,7084242:doLoad,[])
       link(doWidth,12754428:doWidth,[(73,55)(73,146)])
       link(doHeight,12754428:doHeight,[(61,62)(61,153)])
       link(##count,7084242:ImageBitmap,[(27,78)(97,78)])
      }
      Add(Panel,12754428,126,133)
      {
       Width=115
       Height=130
       Color=15780518
       Layout="parent.MyCells"
       Point(onResize)
       Point(doWidth)
       Point(doHeight)
      }
      Add(Image,7084242,91,35)
      {
       Left=2
       Top=2
       Width=214
       Height=158
       Align=5
       Color=65535
       link(onClick,11035397:onResize,[(159,41)(159,27)])
      }
    END_SDK
    Add(Hub,15545110,91,63)
    {
     OutCount=4
     PColor(onEvent1,16755200)
     PColor(onEvent2,16755200)
     PColor(onEvent3,16755200)
     link(onEvent1,12416728:##add,[(172,69)(172,139)])
     link(onEvent2,15043278:doResize,[])
     link(onEvent3,12416728:doLoad,[(114,83)(114,153)])
    }
    Add(ToolBarLayout,15043278,126,70)
    {
     Name="MyCells"
     Space=2
     Padding=30
     WidthScale=20
     HeightScale=20
     VPadding=20
     HPadding=20
    }
  END_SDK
END_SDK
Add(ChildPanel,12877256,308,70)
{
 link(onEvent1,14986880:doWork1,[])
 link(onEvent2,14986880:doWork2,[])
}
BEGIN_SDK
  Add(EditMulti,6028224,511,238)
  {
   EventCount=2
  }
  Add(Panel,9994112,455,322)
  {
   Top=5
   Width=515
   Height=100
   Align=2
  }
  Add(Button,2334403,538,337)
  {
   Left=55
   Top=35
   Width=90
   Caption="Показать"
   link(onClick,2652920:doEvent1,[(579,343)(579,342)])
  }
  Add(FileSearch,10445709,644,343)
  {
   link(onSearch,12348148:doLoad,[])
   link(Dir,14699836:Text,[])
  }
  Add(Img_Loader,12348148,749,343)
  {
   PColor(onLoad,16755200)
   link(onLoad,6028224:onEvent1,[(796,349)(796,244)])
  }
  Add(Edit,14699836,651,294)
  {
   Left=45
   Top=16
   Width=325
   Text="C:\Users\"
  }
  Add(Hub,2652920,595,336)
  {
   InCount=2
   PColor(onEvent1,16711935)
   link(onEvent1,6028224:onEvent2,[(710,342)(710,251)])
   link(onEvent2,10445709:doSearch,[])
  }
END_SDK

карма: 19

Ответов: 212

Рейтинг: 2

#97: 2017-06-16 22:04:09 ЛС | профиль | цитата

Хм... А как же тогда?

Просто надо, чтобы картинки выстраивались в cols и rows, в зависимости от ширины области. Поэтому я пытался использовать ToolBarLayout. У меня получилось выстроить в три колонки, но количество колонок не динамично и не зависит от ширины области, в которой генерируются.




Add(MainForm,9313895,420,56)
{
 Width=537
 Height=492
}
Add(ChildScrollBox,14986880,553,56)
{
}
BEGIN_SDK
  Add(EditMulti,14579416,420,210)
  {
   WorkCount=2
   VarCount=2
   Width=272
   Height=179
   VOffset=14
   PColor(doWork1,16755200)
   PColor(doWork2,16711935)
   link(doWork1,13563605:doEvent1,[])
   link(doWork2,1612140:##clear,[(437,237)(437,321)])
   link(Var1,1612140:##count,[(426,371)(636,371)])
  }
  Add(ScrollBox,4007144,371,287)
  {
   Top=107
   Width=521
   Height=347
   Align=5
   Color=15397089
   Layout="parent.MyImage"
   Point(Width)
  }
  Add(ChildPanelEx,1612140,630,294)
  {
   Mode=1
  }
  BEGIN_SDK
    Add(EditMultiEx,11543816,21,21)
    {
     WorkCount=#5:##add|8:##select|6:doLoad|7:##clear|7:doWidth|8:doHeight|
     EventCount=#8:onResize|
     VarCount=#7:##count|7:##index|12:##eventIndex|
     Width=209
     Height=207
     Point(##add)
     Point(##select)
     Point(##clear)
     Point(##count)
     Point(##index)
     Point(##eventIndex)
     link(doLoad,8674628:doLoad,[])
     link(doWidth,6686648:doWidth,[(73,55)(73,146)])
     link(doHeight,6686648:doHeight,[(73,62)(73,153)])
     link(##count,8674628:ImageBitmap,[(27,78)(97,78)])
    }
    Add(Panel,6686648,126,133)
    {
     Width=115
     Height=130
     Color=15780518
     Layout="parent.MyImage"
     Point(onResize)
     Point(doWidth)
     Point(doHeight)
    }
    Add(Image,8674628,91,35)
    {
     Left=2
     Top=2
     Width=214
     Height=158
     Align=5
     Color=65535
     link(onClick,11543816:onResize,[(159,41)(159,27)])
    }
  END_SDK
  Add(Hub,13563605,490,224)
  {
   OutCount=4
   PColor(onEvent1,16755200)
   PColor(onEvent2,16755200)
   PColor(onEvent3,16755200)
   link(onEvent1,1612140:##add,[(571,230)(571,300)])
   link(onEvent2,61617:doResize,[])
   link(onEvent3,1612140:doLoad,[(513,244)(513,314)])
  }
  Add(ToolBarLayout,61617,525,231)
  {
   Name="MyCells"
   Space=2
   Padding=30
  }
  Add(GridLayout,14878703,630,231)
  {
   Name="MyImage"
   Space=10
   Padding=10
   Rows=1
   Cols=4
  }
END_SDK
Add(ChildPanel,12877256,490,56)
{
 link(onEvent1,14986880:doWork1,[])
 link(onEvent2,14986880:doWork2,[])
}
BEGIN_SDK
  Add(EditMulti,6028224,511,238)
  {
   EventCount=2
  }
  Add(Panel,9994112,455,322)
  {
   Top=5
   Width=515
   Height=100
   Align=2
  }
  Add(Button,2334403,538,337)
  {
   Left=55
   Top=35
   Width=90
   Caption="Показать"
   link(onClick,2652920:doEvent1,[(579,343)(579,342)])
  }
  Add(FileSearch,10445709,644,343)
  {
   link(onSearch,12348148:doLoad,[])
   link(Dir,14699836:Text,[])
  }
  Add(Img_Loader,12348148,749,343)
  {
   PColor(onLoad,16755200)
   link(onLoad,6028224:onEvent1,[(796,349)(796,244)])
  }
  Add(Edit,14699836,651,294)
  {
   Left=45
   Top=16
   Width=325
   Text="C:\Users\Public\Pictures\Sample Pictures"
  }
  Add(Hub,2652920,595,336)
  {
   InCount=2
   PColor(onEvent1,16711935)
   link(onEvent1,6028224:onEvent2,[(710,342)(710,251)])
   link(onEvent2,10445709:doSearch,[])
  }
END_SDK

карма: 0

Незнание HiAsm не снижает возможностей, но сильно увеличивает схему

Ответов: 212

Рейтинг: 2

#98: 2017-06-16 23:25:07 ЛС | профиль | цитата

Я сделал это! Все складывается рядочками. Теперь только как-то надо сделать, чтобы количество столбцов менялось при изменении размеров окна.



Add(EditMulti,14579416,420,210)
{
 WorkCount=2
 VarCount=2
 Width=272
 Height=179
 VOffset=14
 PColor(doWork1,16755200)
 PColor(doWork2,16711935)
 link(doWork1,13563605:doEvent1,[])
 link(doWork2,1612140:##clear,[(437,237)(437,321)])
 link(Var1,1612140:##count,[(426,371)(636,371)])
}
Add(ScrollBox,4007144,371,287)
{
 Top=107
 Width=521
 Height=347
 Align=5
 Color=15397089
 Layout="parent.MyImage"
 Point(Width)
}
Add(ChildPanelEx,1612140,630,294)
{
 Mode=1
}
BEGIN_SDK
  Add(EditMultiEx,11543816,21,21)
  {
   WorkCount=#5:##add|8:##select|6:doLoad|7:##clear|7:doWidth|8:doHeight|
   EventCount=#8:onResize|
   VarCount=#7:##count|7:##index|12:##eventIndex|
   Width=209
   Height=207
   Point(##add)
   Point(##select)
   Point(##clear)
   Point(##count)
   Point(##index)
   Point(##eventIndex)
   link(doLoad,8674628:doLoad,[])
   link(doWidth,6686648:doWidth,[(73,55)(73,146)])
   link(doHeight,6686648:doHeight,[(73,62)(73,153)])
   link(##count,8674628:ImageBitmap,[(27,78)(97,78)])
  }
  Add(Panel,6686648,126,133)
  {
   Width=115
   Height=130
   Color=15780518
   Layout="parent.MyImage"
   Point(onResize)
   Point(doWidth)
   Point(doHeight)
  }
  Add(Image,8674628,91,35)
  {
   Left=2
   Top=2
   Width=214
   Height=158
   Align=5
   Color=65535
   link(onClick,11543816:onResize,[(159,41)(159,27)])
  }
END_SDK
Add(Hub,13563605,490,224)
{
 OutCount=5
 PColor(onEvent1,65280)
 PColor(onEvent2,16755200)
 PColor(onEvent3,16755200)
 link(onEvent2,1612140:##add,[(528,237)(528,300)])
 link(onEvent4,1612140:doLoad,[(519,251)(519,314)])
 link(onEvent5,5891209:doTimer,[(528,258)(528,230)])
}
Add(GridLayout,14878703,651,217)
{
 Name="MyImage"
 Space=10
 Padding=10
 Rows=1
 Cols=4
 Point(doSort)
}
Add(Timer,5891209,553,224)
{
 Interval=20
 AutoStop=14
 Point(onStop)
 link(onTimer,14878703:doResize,[(629,230)(629,223)])
}

карма: 0

Незнание HiAsm не снижает возможностей, но сильно увеличивает схему

Форумы Помощь по пакетуЗдравствуйте! Помогите новичку... ← Ctrl1 2 3 4 5 67Ctrl →


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