меню и форма, интересный глюк

← →
Dy1 (2009-11-21 09:21) [0]

StayOnTop главной формы не меняется (к StayOnTop других форм не обращаюсь).
procedure TForm1.PopMenuNtopMenu(Sender: PMenu; Item: Integer); begin Form1.Form.StayOnTop := Form1.PopMenu.ItemChecked[Ntop]; end;
Галочка появляется как полагается, но форма всегда не онтоп. Есть ещё загрузка и сохранение Form.StayOnTop и больше к нему никаких обращений. В чём может быть дело?
-------
работает, если кликать на предыдущем пункте :/ Индексы меню, имена - всё как должно быть, но эти 2-3 пункта сдвинуты к началу на 1. То есть их обработчики.

← →
Dy1 (2009-11-21 09:39) [1]

я в реалтайме добавляю один пункт, может быть поэтому. Как правильно добавлять?

← →
abyss_by © (2009-11-22 01:17) [2]

В описанном варианте и галочка не должна появиться.
Приблизительно так попробуй:
Sender.ItemChecked[NTop]:= not Sender.ItemChecked[Ntop]; FormMain.Form.StayOnTop := Sender.ItemChecked[Ntop];
Добавленный в реалтайме пункт вряд повлияет на обращение к константе Ntop.

← →
Dy1 (2009-11-22 10:40) [3]

1) галка переключается без этого кода
2) замена на Sender вызвала AV

← →
abyss_by © (2009-11-22 10:47) [4]

Протестил. Без подобного кода не чекается меню. Sender AV не вызывает. Может не на Delphi компилится?

← →
abyss_by © (2009-11-22 11:27) [5]

У меня вылетает по 216 рантайм ошибке, если попупменю дублирует главное меню при использовании кода Form1.PopMenu.ItemChecked[Ntop].
Если так: Form1.PopMenu.Items[Item].Checked не только не вылетает, но и галочка на месте и статус формы меняется.

← →
Dy1 (2009-11-22 18:48) [6]

как прежде - на Ntop работает онтоп и одновременно приклеивание к краю экрана (следующий пункт), зато пункт приклеивания ни на что не влияет. Смещено как-то

← →
Dy1 (2009-11-22 19:01) [7]

к [4] - чекается. На Делфи 7.
к [5] - у меня нет главного меню.

возвращаюсь к [1]
PopMenu.Items[NSkin].AddItem( PAnsiChar(dir.Names[w]), nil, [])

Хочу сделать подменю со списком скинов, второй PMenu подключить не удалось, не знаю как.

← →
Dy1 (2010-01-02 11:41) [8]

проблему решил созданием меню с нуля, без добавлений/удалений пунктов :(
И обращаюсь по индексам.

Проблема следующая - как чекануть пункт меню программно? Не из обработчика меню. Проект компилируется, галка не ставится или не отображается. Мышкой кликается нормально.

← →
Dy1 (2010-01-02 11:55) [9]

сепараторы не посчитал

меню и форма, интересный глюк Найти похожие ветки