Текущий архив: 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.01 c
