Вверх ↑
Ответов: 952
Рейтинг: 4
#1: 2013-04-06 21:37:22 ЛС | профиль | цитата
onMouseLeave - нет, не то. Я имел ввиду курсор который вертикальной черточкой.
Из Эдита юзер может уйти 2 способами - Табом или кликом мышки по другому Эдиту или иному компоненту на форме.
Таб отловлен и покорён. Остается мышка.
На скорую руку накидал пример.
Если введя несколько символов в 1 эдит мышкой щелкнуть на 3 эдит (юзер ведь и так может) - листбокс не исчезнет. Вопрос как это предусмотреть?
Add(MainForm,2953706,49,98)
{
Width=271
Height=184
}
Add(Edit,11793668,112,28)
{
Left=20
Top=20
Text=""
Point(onKeyDown)
link(onChange,5454065:doEvent1,[(342,34)(342,83)])
link(onKeyDown,6471876:doCase,[(177,48)(177,97)])
}
Add(Edit,8140823,112,98)
{
Left=20
Top=55
Text=""
Point(onMouseDown)
link(onMouseDown,5454065:doEvent3,[(342,118)(342,97)])
}
Add(Edit,10181626,112,168)
{
Left=20
Top=90
Text=""
}
Add(ListBox,8967763,580,55)
{
Left=90
Top=15
Width=160
Height=120
Visible=1
DataType=1
Point(doVisible)
}
Add(Case,6471876,210,91)
{
Value=Integer(9)
link(onNextCase,15480296:doCase,[])
link(onTrue,16232319:doEvent1,[(289,104)(289,118)])
}
Add(Case,15480296,280,91)
{
Value=Integer(13)
link(onTrue,16232319:doEvent2,[(324,104)(324,125)])
}
Add(DoData,13667806,378,112)
{
Data=Integer(0)
link(onEventData,5454065:doEvent2,[(474,118)(474,90)])
}
Add(Hub,16232319,336,112)
{
InCount=2
OutCount=1
link(onEvent1,13667806:doData,[])
}
Add(Hub,5454065,539,77)
{
InCount=3
OutCount=1
link(onEvent1,8967763:doVisible,[(567,83)(567,103)])
}


карма: 0

0