Вверх ↑
Ответов: 670
Рейтинг: 140
#1: 2022-04-05 17:38:56 ЛС | профиль | цитата
SaturN26 писал(а):
Мне нужно, что бы меню формировалось при запуске программы

Или через точку doInit

Add(MainForm,2953706,273,112)
{
Point(onMouseDown)
link(onMouseDown,6098406:doEvent,[])
}
Add(IndexToChanel,6098406,322,133)
{
link(onEvent2,8517527:doNext,[])
}
Add(GetIndexData,6401499,455,140)
{
Count=3
link(onIndex,2175330:doData,[])
link(Data1,9636360:Text,[])
link(Data2,10460948:Text,[(468,89)(517,89)])
link(Data3,6288500:Text,[(475,96)(566,96)])
}
Add(CounterEx,8517527,385,140)
{
Max=2
link(onNext,6401499:doIndex,[])
}
Add(StrList,9636360,455,42)
{
Strings=#1:1|1:2|1:3|1:4|
}
Add(StrList,10460948,511,42)
{
Strings=#1:5|1:6|1:7|1:8|
}
Add(StrList,6288500,560,42)
{
Strings=#1:9|2:10|2:11|2:12|2:13|
}
Add(PopupMenuEx,9128966,630,126)
{
Bitmaps=[]
}
Add(DoData,2175330,518,140)
{
link(onEventData,6334918:doEvent1,[])
link(Data,6401499:Var,[(524,131)(510,131)(510,180)(461,180)])
}
Add(Hub,6334918,581,140)
{
link(onEvent1,9128966:doInit,[])
link(onEvent2,9128966:doPopupHere,[(606,153)(606,132)])
}

карма: 14

0