Текущий архив: 2002.04.18;
Скачать: CL | DM;

Вниз

Повторное обращение с помощью с Меню   Найти похожие ветки 

← →
Demon Ltd   (2002-04-07 01:27) [0]

Мною был задан вопрос, но на него почти никто не ответил
(наверно когда я задавал вопрос, знающие люди были заняты)
Вот сам вопрос:
"Работа с меню. Для примера, у меня есть меню с
подменю - форма2, форма 3 и так далее. Когда я нажимаю в подменю
на форму 2, мне надо чтобы напротив формы 2 в подменю появилась
галочка и открылась вторая форма. А когда я повторно нажимаю
форма 2, чтоюы галочка исчезала и вместе с ней чтобы исчезала
и форма 2."

---

← →
aus ©   (2002-04-07 02:33) [1]

procedure N1Click(sender: TObject);
begin
with Sender as TMenuItem do begin
Checked := not Checked;
Form2.Visible := Checked;
end;
end;

---

Страницы: 1 вся ветка

Текущий архив: 2002.04.18;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.012 c