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

Вниз

МЕНЮ НА WINAPI   Найти похожие ветки 

 
KME   (2004-03-12 09:02) [0]

КАК НА ЧИСТОМ WINAPI СДЕЛАТь МЕНЮ?


 
KME   (2004-03-12 09:02) [0]

КАК НА ЧИСТОМ WINAPI СДЕЛАТь МЕНЮ?


 
Serge ©   (2004-03-12 09:34) [1]

ЧИСТО ручками, мдя... :о)
Писать надо ресурсный файл, читать инфу Ms SDK по менюшкам, в частности и по LoadMenu


 
Serge ©   (2004-03-12 09:34) [1]

ЧИСТО ручками, мдя... :о)
Писать надо ресурсный файл, читать инфу Ms SDK по менюшкам, в частности и по LoadMenu


 
Serge ©   (2004-03-12 09:37) [2]

Да, можешь еще использовать Workshop, либо редакторы ресурсов BC5 MsVisualC++ ...


 
Serge ©   (2004-03-12 09:37) [2]

Да, можешь еще использовать Workshop, либо редакторы ресурсов BC5 MsVisualC++ ...


 
X9   (2004-03-12 11:48) [3]

Посмотри исходники Menus.pas


 
X9   (2004-03-12 11:48) [3]

Посмотри исходники Menus.pas


 
Agent13 ©   (2004-03-12 13:29) [4]

Необязательно читать меню из ресурса. Можно прямо в программе создавать и заполнять его. См. Ф1 по CreateMenu, AppendMenu, InsertMenu.


 
Agent13 ©   (2004-03-12 13:29) [4]

Необязательно читать меню из ресурса. Можно прямо в программе создавать и заполнять его. См. Ф1 по CreateMenu, AppendMenu, InsertMenu.


 
Diamond Cat ©   (2004-03-12 16:24) [5]

procedure menucreate(wnd:hwnd);// wnd хендл родительского окна , в winproc этого окна будут приходить сообщения от меню
begin
men:=CreatePopupMenu;
     if men=0 then messagebox(wnd,"не создалось меню","ля-ля",mb_ok);
       AppendMenu(men,mf_ByCommand, 1, "Команда 1");
       AppendMenu(men,mf_ByCommand,2,"Команда 2");
       AppendMenu(men,MF_SEPARATOR,0,nil);
       AppendMenu(men,mf_ByCommand,3,"Выход");
       EnableMenuItem(men,2,MF_GRAYED);
end;
в winproc окна определенного через wnd проверяем сообщение wm_command

wm_command:
    begin
        if wparam=1 then делаем нечто соответствующее первой команде;
if wparam=3 then  postquitmessage(0);

    end;


 
Diamond Cat ©   (2004-03-12 16:24) [5]

procedure menucreate(wnd:hwnd);// wnd хендл родительского окна , в winproc этого окна будут приходить сообщения от меню
begin
men:=CreatePopupMenu;
     if men=0 then messagebox(wnd,"не создалось меню","ля-ля",mb_ok);
       AppendMenu(men,mf_ByCommand, 1, "Команда 1");
       AppendMenu(men,mf_ByCommand,2,"Команда 2");
       AppendMenu(men,MF_SEPARATOR,0,nil);
       AppendMenu(men,mf_ByCommand,3,"Выход");
       EnableMenuItem(men,2,MF_GRAYED);
end;
в winproc окна определенного через wnd проверяем сообщение wm_command

wm_command:
    begin
        if wparam=1 then делаем нечто соответствующее первой команде;
if wparam=3 then  postquitmessage(0);

    end;


 
DVM ©   (2004-03-12 18:51) [6]

http://delphimaster.net/view/4-1078933712/


 
DVM ©   (2004-03-12 18:51) [6]

http://delphimaster.net/view/4-1078933712/



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

Форум: "WinAPI";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.033 c
14-1082210609
Chainik
2004-04-17 18:03
2004.05.09
Виснет система. Помогите разобраться.


6-1079792117
Ihor
2004-03-20 17:15
2004.05.09
Delphi&LAN


1-1082450584
Романов Р.В.
2004-04-20 12:43
2004.05.09
Организовать последовательное выполнение приложений


11-1067279634
Deimos
2003-10-27 21:33
2004.05.09
Профилировщик


4-1079892982
Yuri Btr
2004-03-21 21:16
2004.05.09
Оконная функция нового контрола





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский