Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.23;
Скачать: CL | DM;

Вниз

Совсем запутался! Помогите кто может!   Найти похожие ветки 

 
MisterBin ©   (2002-05-10 14:34) [0]

Имеется две формы Form1 и Form2. При запуске программы в трей помещается иконка с такими пунктами меню:
N1.Caption:="Развернуть";
N3.Caption:="Свернуть";
Нужно сделать так:
при выпадании меню на иконке, если хоть одна из форм имеет значение Visible=True, то пункт N3 должен быть виден, а N1 - нет.
А если обе формы свёрнуты, т.е. Visible=false, то пунктт меню N3.Visible:=False а N1.Visible:=True;
Кто может написать код?


 
Val ©   (2002-05-10 14:55) [1]


if (Form1.Visible or Form2.Visible) then
begin
N3.Visible := True;
N1.Visible := False;
end
else
begin
N3.Visible := False;
N1.Visible := True;
end;





 
MisterBin ©   (2002-05-10 15:29) [2]

Спасибо



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

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

Наверх




Память: 0.46 MB
Время: 0.015 c
1-73143
Demon-777
2002-05-12 22:45
2002.05.23
Присваивание одного курсора всем компонентам формы


3-73047
Slym
2002-04-23 11:27
2002.05.23
Пытаюсь свелать предка TDataModule...


7-73427
BMax
2002-02-24 12:21
2002.05.23
Реестр


6-73339
Андрей Сенченко
2002-03-12 22:10
2002.05.23
Непонятная ошибка в NMSMTP


1-73274
Igg
2002-05-11 01:38
2002.05.23
Хинты