HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуПанель прокрутки ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 249
Рейтинг: 4
#1: 2022-10-15 13:40:18 ЛС | профиль | цитата
как сделать чтоб при добавлении элемента в нее, элемент был в поле зрения, то есть скрол прокручивался в самый низ. я туплю и не как не в курю, была-бы точка максимальная длинна скрола тогда вопросов нет а тут я затупил 


Add(ChildPanel,6527287,182,119)
{
 link(onEvent1,16063724:doWork1,[])
}
BEGIN_SDK
  Add(EditMulti,4366545,119,56)
  {
   EventCount=1
  }
  Add(Panel,15046377,210,91)
  {
   Width=318
   Height=30
   Align=2
   BevelInner=0
  }
  Add(Button,8833920,312,99)
  {
   Left=5
   Top=5
   Font=[Arial,8,0,0,1]
   Caption="Add"
   link(onClick,4366545:onEvent1,[(392,105)(392,62)])
  }
END_SDK
Add(ChildScrollBox,16063724,238,119)
{
 @Hint=#15:Спасибо olDjeka|
}
BEGIN_SDK
  Add(EditMulti,6395808,168,56)
  {
   WorkCount=1
   Width=335
   Height=361
   link(doWork1,14088804:doEvent1,[(176,62)(176,90)])
  }
  Add(ScrollBox,3575537,378,203)
  {
   Top=30
   Width=318
   Height=127
   Align=5
   Point(doSetFocus)
  }
  Add(ChildPanelEx,12820836,378,84)
  {
   Mode=1
   link(onClick,5664572:doDeferredEvent,[])
   link(Text,12820836:##handle,[(384,74)(359,74)(359,127)(384,127)])
   link(onMouseWheel,9893551:doCompare,[(423,97)(423,135)(198,135)(198,160)])
  }
  BEGIN_SDK
    Add(EditMultiEx,8038962,189,42)
    {
     WorkCount=#5:##Add|9:##hdelete|6:doText|
     EventCount=#7:onClick|12:onMouseWheel|
     VarCount=#8:##handle|
     DataCount=#4:Text|
     Width=286
     Height=214
     Point(##Add)
     Point(##hdelete)
     Point(##handle)
     link(##Add,15720799:doText,[(238,48)(238,69)])
     link(doText,1986715:doText,[(203,62)(203,188)])
    }
    Add(Panel,13351110,385,112)
    {
     Width=326
     Height=122
     Align=2
     BorderWidth=0
     Point(Handle)
     Point(onMouseWheel)
     link(onMouseWheel,8038962:onMouseWheel,[(446,125)(446,55)])
    }
    Add(Label,15720799,287,63)
    {
     Left=15
     Top=55
     link(Text,8038962:Text,[(293,53)(195,53)])
    }
    Add(DoData,6806243,287,112)
    {
     link(onEventData,8038962:onClick,[(351,118)(351,48)])
     link(Data,15720799:Caption,[])
    }
    Add(Button,6756008,217,112)
    {
     Left=220
     Top=90
     Caption="del"
     link(onClick,6806243:doData,[])
    }
    Add(Label,1986715,217,182)
    {
     Left=15
     Top=90
    }
  END_SDK
  Add(DeferredEvent,5664572,441,84)
  {
   InData=0
   link(onDeferredEvent,12820836:##hdelete,[(487,90)(487,65)(366,65)(366,97)])
  }
  Add(Hub,14088804,189,84)
  {
   OutCount=4
   link(onEvent1,12820836:##Add,[])
   link(onEvent2,3575537:doSetFocus,[(339,97)(339,223)])
   link(onEvent3,4187969:doWork1,[(327,104)])
  }
  Add(Math,13267456,273,154)
  {
   Op2=32
   ResultType=0
   link(onResult,4187969:doWork2,[])
   link(Op1,5153740:Var2,[(279,142)(352,142)])
  }
  Add(If_else,9893551,210,154)
  {
   Type=1
   Op2=Integer(0)
   link(onTrue,13267456:doOperation,[])
   link(onFalse,7005202:doOperation,[(257,167)(257,209)])
  }
  Add(Math,7005202,273,203)
  {
   OpType=1
   Op2=32
   ResultType=0
   link(onResult,15979489:doWork2,[])
   link(Op1,5153740:Var1,[(279,194)])
  }
  Add(GetDataEx,5153740,346,189)
  {
   Angle=2
   link(Data,3575537:VPos,[(352,247)(391,247)])
  }
  Add(HubEx,15979489,323,203)
  {
   Angle=1
   link(onEvent,3575537:doVScroll,[(327,216)])
  }
  Add(HubEx,4187969,323,154)
  {
   Angle=1
   link(onEvent,15979489:doWork1,[])
  }
END_SDK
Add(MainForm,314817,98,77)
{
 Width=334
 Height=261
 Caption=""
 Position=1
}
карма: 1

0
Ответов: 814
Рейтинг: 176
#2: 2022-10-15 15:42:11 ЛС | профиль | цитата
ric писал(а):
как сделать чтоб при добавлении элемента в нее, элемент был в поле зрения, то есть скрол прокручивался в самый низ


Add(ChildPanel,6527287,392,119)
{
 link(onEvent1,16063724:doWork1,[])
}
BEGIN_SDK
  Add(EditMulti,4366545,119,56)
  {
   EventCount=1
  }
  Add(Panel,15046377,210,91)
  {
   Width=318
   Height=30
   Align=2
   BevelInner=0
  }
  Add(Button,8833920,312,99)
  {
   Left=5
   Top=5
   Font=[Arial,8,0,0,1]
   Caption="Add"
   link(onClick,4366545:onEvent1,[(392,105)(392,62)])
  }
END_SDK
Add(ChildScrollBox,16063724,448,119)
{
 @Hint=#15:Спасибо olDjeka|
}
BEGIN_SDK
  Add(EditMulti,6395808,168,56)
  {
   WorkCount=1
   Width=335
   Height=361
   link(doWork1,14088804:doEvent1,[(176,62)(176,90)])
  }
  Add(ScrollBox,3575537,385,147)
  {
   Top=30
   Width=318
   Height=127
   Align=5
   Point(doSetFocus)
  }
  Add(ChildPanelEx,12820836,378,84)
  {
   Mode=1
   link(onClick,5664572:doDeferredEvent,[])
   link(Text,12820836:##handle,[(384,74)(359,74)(359,127)(384,127)])
  }
  BEGIN_SDK
    Add(EditMultiEx,8038962,189,42)
    {
     WorkCount=#5:##Add|9:##hdelete|6:doText|
     EventCount=#7:onClick|12:onMouseWheel|
     VarCount=#8:##handle|
     DataCount=#4:Text|
     Width=286
     Height=214
     Point(##Add)
     Point(##hdelete)
     Point(##handle)
     link(##Add,15720799:doText,[(238,48)(238,69)])
     link(doText,1986715:doText,[(203,62)(203,188)])
    }
    Add(Panel,13351110,385,112)
    {
     Width=326
     Height=122
     Align=2
     BorderWidth=0
     Point(Handle)
     Point(onMouseWheel)
     link(onMouseWheel,8038962:onMouseWheel,[(446,125)(446,55)])
    }
    Add(Label,15720799,287,63)
    {
     Left=15
     Top=55
     link(Text,8038962:Text,[(293,53)(195,53)])
    }
    Add(DoData,6806243,287,112)
    {
     link(onEventData,8038962:onClick,[(351,118)(351,48)])
     link(Data,15720799:Caption,[])
    }
    Add(Button,6756008,217,112)
    {
     Left=220
     Top=90
     Caption="del"
     link(onClick,6806243:doData,[])
    }
    Add(Label,1986715,217,182)
    {
     Left=15
     Top=90
    }
  END_SDK
  Add(DeferredEvent,5664572,441,84)
  {
   InData=0
   link(onDeferredEvent,12820836:##hdelete,[(487,90)(487,65)(366,65)(366,97)])
  }
  Add(Hub,14088804,189,84)
  {
   OutCount=5
   link(onEvent1,12820836:##Add,[])
   link(onEvent2,13267456:doOperation,[(305,97)(305,160)])
  }
  Add(Math,13267456,315,154)
  {
   Op2=122
   ResultType=0
   link(onResult,3575537:doVScroll,[])
   link(Op1,13267456:Result,[(321,145)(300,145)(300,194)(321,194)])
  }
END_SDK
Add(MainForm,314817,336,119)
{
 Width=334
 Height=261
 Caption=""
 Position=1
}
карма: 16

0
Ответов: 2293
Рейтинг: 678
#3: 2022-10-15 16:16:43 ЛС | профиль | цитата
Зачем подсчет, если можно получить данные с Top: 

Add(ChildPanel,6527287,483,203)
{
 link(onEvent1,16063724:doWork1,[])
}
BEGIN_SDK
  Add(EditMulti,4366545,119,56)
  {
   EventCount=1
  }
  Add(Panel,15046377,210,91)
  {
   Width=318
   Height=30
   Align=2
   BevelInner=0
  }
  Add(Button,8833920,312,99)
  {
   Left=5
   Top=5
   Font=[Arial,8,0,0,1]
   Caption="Add"
   link(onClick,4366545:onEvent1,[(392,105)(392,62)])
  }
END_SDK
Add(ChildScrollBox,16063724,539,203)
{
 @Hint=#15:Спасибо olDjeka|
}
BEGIN_SDK
  Add(EditMulti,6395808,168,56)
  {
   WorkCount=1
   Width=328
   Height=214
   link(doWork1,14088804:doEvent1,[(176,62)(176,90)])
  }
  Add(ScrollBox,3575537,350,147)
  {
   Top=30
   Width=318
   Height=127
   Align=5
   Point(doSetFocus)
  }
  Add(ChildPanelEx,12820836,287,84)
  {
   Mode=1
   link(onClick,5664572:doDeferredEvent,[])
   link(Text,12820836:##handle,[(293,74)(268,74)(268,127)(293,127)])
  }
  BEGIN_SDK
    Add(EditMultiEx,8038962,189,42)
    {
     WorkCount=#5:##Add|9:##hdelete|6:doText|
     EventCount=#7:onClick|12:onMouseWheel|
     VarCount=#8:##handle|3:Top|
     DataCount=#4:Text|
     Width=286
     Height=214
     Point(##Add)
     Point(##hdelete)
     Point(##handle)
     link(##Add,15720799:doText,[(238,48)(238,69)])
     link(doText,1986715:doText,[(203,62)(203,188)])
     link(Top,13351110:Top,[(202,232)(398,232)])
    }
    Add(Panel,13351110,385,112)
    {
     Width=326
     Height=122
     Align=2
     BorderWidth=0
     Point(Handle)
     Point(onMouseWheel)
     Point(Top)
     link(onMouseWheel,8038962:onMouseWheel,[(446,125)(446,55)])
    }
    Add(Label,15720799,287,63)
    {
     Left=15
     Top=55
     link(Text,8038962:Text,[(293,53)(195,53)])
    }
    Add(DoData,6806243,287,112)
    {
     link(onEventData,8038962:onClick,[(351,118)(351,48)])
     link(Data,15720799:Caption,[])
    }
    Add(Button,6756008,217,112)
    {
     Left=220
     Top=90
     Caption="del"
     link(onClick,6806243:doData,[])
    }
    Add(Label,1986715,217,182)
    {
     Left=15
     Top=90
    }
  END_SDK
  Add(DeferredEvent,5664572,350,84)
  {
   InData=0
   link(onDeferredEvent,12820836:##hdelete,[(396,90)(396,65)(275,65)(275,97)])
  }
  Add(Hub,14088804,189,84)
  {
   link(onEvent1,12820836:##Add,[])
   link(onEvent2,1147358:doData,[(249,97)(249,160)])
  }
  Add(DoData,1147358,294,154)
  {
   link(onEventData,3575537:doVScroll,[])
   link(Data,12820836:Top,[])
  }
END_SDK
Add(MainForm,314817,427,203)
{
 Width=334
 Height=261
 Caption=""
}
карма: 11

0
Ответов: 249
Рейтинг: 4
#4: 2022-10-15 17:50:07 ЛС | профиль | цитата
эти варианты не работают я их пробовал, после второго клика невидно часть понели, и после прокрутки вверх и добавления уже не правильно показывает.
Видео
карма: 1

0
Ответов: 2293
Рейтинг: 678
#5: 2022-10-15 18:28:11 ЛС | профиль | цитата
ric, компилятор FPC?
Попробуйте так:
Add(ChildPanel,6527287,518,168)
{
 link(onEvent1,16063724:doWork1,[])
}
BEGIN_SDK
  Add(EditMulti,4366545,119,56)
  {
   EventCount=1
  }
  Add(Panel,15046377,210,91)
  {
   Width=318
   Height=30
   Align=2
   BevelInner=0
  }
  Add(Button,8833920,312,99)
  {
   Left=5
   Top=5
   Font=[Arial,8,0,0,1]
   Caption="Add"
   link(onClick,4366545:onEvent1,[(392,105)(392,62)])
  }
END_SDK
Add(ChildScrollBox,16063724,574,168)
{
 @Hint=#15:Спасибо olDjeka|
}
BEGIN_SDK
  Add(EditMulti,6395808,168,56)
  {
   WorkCount=1
   Width=328
   Height=214
   link(doWork1,14088804:doEvent1,[(176,62)(176,90)])
  }
  Add(ScrollBox,3575537,399,147)
  {
   Top=30
   Width=318
   Height=127
   Align=5
   Point(doSetFocus)
  }
  Add(ChildPanelEx,12820836,287,84)
  {
   Mode=1
   link(onClick,5664572:doDeferredEvent,[])
   link(Text,12820836:##handle,[(293,74)(268,74)(268,127)(293,127)])
  }
  BEGIN_SDK
    Add(EditMultiEx,8038962,189,42)
    {
     WorkCount=#5:##Add|9:##hdelete|6:doText|
     EventCount=#7:onClick|12:onMouseWheel|
     VarCount=#8:##handle|3:Top|
     DataCount=#4:Text|
     Width=286
     Height=214
     Point(##Add)
     Point(##hdelete)
     Point(##handle)
     link(##Add,15720799:doText,[(238,48)(238,69)])
     link(doText,1986715:doText,[(203,62)(203,188)])
     link(Top,13351110:Top,[(202,232)(398,232)])
    }
    Add(Panel,13351110,385,112)
    {
     Width=326
     Height=122
     Align=2
     BorderWidth=0
     Point(Handle)
     Point(onMouseWheel)
     Point(Top)
     link(onMouseWheel,8038962:onMouseWheel,[(446,125)(446,55)])
    }
    Add(Label,15720799,287,63)
    {
     Left=15
     Top=55
     link(Text,8038962:Text,[(293,53)(195,53)])
    }
    Add(DoData,6806243,287,112)
    {
     link(onEventData,8038962:onClick,[(351,118)(351,48)])
     link(Data,15720799:Caption,[])
    }
    Add(Button,6756008,217,112)
    {
     Left=220
     Top=90
     Caption="del"
     link(onClick,6806243:doData,[])
    }
    Add(Label,1986715,217,182)
    {
     Left=15
     Top=90
    }
  END_SDK
  Add(DeferredEvent,5664572,350,84)
  {
   InData=0
   link(onDeferredEvent,12820836:##hdelete,[(396,90)(396,65)(275,65)(275,97)])
  }
  Add(Hub,14088804,189,84)
  {
   link(onEvent1,12820836:##Add,[])
   link(onEvent2,9287149:doDeferredEvent,[(227,97)(227,160)])
  }
  Add(DeferredEvent,9287149,294,154)
  {
   InData=0
   Point(Data)
   link(onDeferredEvent,3575537:doVScroll,[])
   link(Data,12820836:Top,[])
  }
END_SDK
Add(MainForm,314817,462,168)
{
 Width=334
 Height=261
 Caption=""
}

Редактировалось 1 раз(а), последний 2022-10-15 18:30:25
карма: 11

0
Ответов: 249
Рейтинг: 4
#6: 2022-10-15 22:13:02 ЛС | профиль | цитата
О так работает, благодарствую
карма: 1

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