Главная страница
    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.04 c
3-1081389531
Unk
2004-04-08 05:58
2004.05.09
MIDAS, Oracle, передача в BLOB через параметр


14-1082031027
$tranger
2004-04-15 16:10
2004.05.09
Бывают ли на этом сайте Казахстанце?


1-1082538504
M@X
2004-04-21 13:08
2004.05.09
Адресация порта Longint ?? Как?


11-1068232382
puky
2003-11-07 22:13
2004.05.09
GDI Анимация в kol-e


3-1081842986
avgur
2004-04-13 11:56
2004.05.09
Константы для Delphi 6.0





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