Цитата:
|
Сообщение от Alegun
Тогда можно спрятать так
...
повторный вызов отобразит снова
|
Благодарю! Реализовал Ваше предложение.
Правда, в моем случае есть маленький недостаток. Процедуры вывода-скрытия меню и других элементов организованs через двойной клик и клик по полю формы. Чтобы форму привести к исходному состоянию - приходится делать 5-6 кликов! Это многовато ...
Новая идея такая - отказаться от меню и перейти на выпадающий список, который легче спрятать.
Помогите, пожалуйста, переписать эту команду с MainMenu1 на ComboBox1:
Код:
for i:=1 to 4 do MainMenu1.Items[0].Items[i-1].Checked:=false;
как тут:
Код:
var n:Integer;
begin
n:=0;
if ComboBox1.ItemIndex = 0 then n:=1;
if ComboBox1.ItemIndex = 1 then n:=2;
if ComboBox1.ItemIndex = 2 then n:=3;
if ComboBox1.ItemIndex = 3 then n:=4;
if UsedCOM<>n
then Open_COM(n);
end;