Главная страница
    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.036 c
14-1082377810
panov
2004-04-19 16:30
2004.05.09
Индексирование текста.


6-1079344815
Max_Ivanych
2004-03-15 13:00
2004.05.09
SMTP-клиент


11-1068010080
Gandalf
2003-11-05 08:28
2004.05.09
KOLovrat - как оно?


1-1082637558
serg128
2004-04-22 16:39
2004.05.09
Как отловить событие в Excel?


1-1082385273
Bohdan
2004-04-19 18:34
2004.05.09
Прозрачная прорисовка компонентов типа TCheckBox, TRadioButton





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