Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.12.09;
Скачать: [xml.tar.bz2];

Вниз

Как временно скрыть MainMenu?   Найти похожие ветки 

 
STANT   (2002-11-29 17:52) [0]

Если ответите на subj, буду очень благодарен.


 
MBo   (2002-11-29 17:59) [1]

setmenu(handle,0);

восстановить
setmenu(handle,mainmenu1.handle);


 
STANT   (2002-11-29 18:07) [2]

Это API-функция? При попытке написать это компилятор пишет, что TCustomForm.SetMenu не доступен.


 
MBo   (2002-11-29 18:11) [3]

да, api, из windows.pas. У меня без проблем. Попробуй написать
windows.setmenu


 
AlexSV   (2002-11-29 18:14) [4]

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if Assigned(Form1.Menu) then
Form1.Menu := nil
else
Form1.Menu := MainMenu1;
end;


 
STANT   (2002-11-29 18:21) [5]

Все работает. Спасибо.



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

Форум: "Основная";
Текущий архив: 2002.12.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
1-27949
AlexKr
2002-11-29 12:12
2002.12.09
Перенаправить вывод


14-28197
Matvey
2002-11-20 00:19
2002.12.09
Установка компонентов - проблема?


1-28106
avsh
2002-11-28 13:25
2002.12.09
Почему не работает процедура SetLength


3-27889
Boriz
2002-11-21 15:48
2002.12.09
Требуется динамически создать Calculated поле


1-28017
Dber
2002-11-29 16:32
2002.12.09
Date/Time в Accesse





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский