Вверх ↑
Этот топик читают: Гость
Ответов: 212
Рейтинг: 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
vip
#1.1контекстная реклама от партнеров
Ответов: 457
Рейтинг: 84
#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
}

карма: 10

0
Ответов: 2092
Рейтинг: 660
#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=""
}
карма: 10

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

0
Ответов: 2092
Рейтинг: 660
#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
карма: 10

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

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