- поставил пользователь курсор в поле - появилось кнопка, по нажатию на которой - меню.
- убрал пользователь курсор с поля - кнопка пропала
Поэтому два вопроса:
- Есть ли другой способ это реализовать?
- Как поместить кнопку (другой объект = картинку) внутрь поля, что бы при получении фокуса внешний вид походил на Excel'овский комментарий (треугольник в правом верхнем углу). Ну и понятно работало меню (не важно или при нажатии на треугольник, или висело постоянно - пока есть фокус).
код:
Add(MainForm,4260993,21,105)
{
Left=20
Top=105
}
Add(Edit,4262680,84,105)
{
Left=15
Top=10
Width=165
Point(onSetFocus)
Point(onKillFocus)
link(onSetFocus,13657626:doData,[(145,125)(145,111)])
link(onKillFocus,221826:doData,[(145,132)(145,153)])
}
Add(Button,14898893,343,105)
{
Left=180
Top=10
Width=10
Height=10
Visible=1
Caption=""
Point(doVisible)
link(onClick,7338254:doPopupHere,[])
}
Add(Hub,6731561,266,105)
{
InCount=2
OutCount=1
link(onEvent1,14898893:doVisible,[])
}
Add(DoData,13657626,175,105)
{
Data=Integer(1)
link(onEventData,6731561:doEvent1,[])
}
Add(DoData,221826,175,147)
{
Data=Integer(0)
link(onEventData,6731561:doEvent2,[(236,153)(236,118)])
}
Add(PopupMenu,7338254,413,98)
{
Menu=#6:Item 1|6:Item 2|
}
Add(Edit,4361613,84,175)
{
Left=15
Top=40
Width=165
}
code_110 
(речь идет о проекте, а не о "чистом" коде
ты наверное думал это я так от нечего
Поиск
Друзья
Администрация