Главная страница
    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.034 c
11-1067946243
Nert
2003-11-04 14:44
2004.05.09
Как сделать прозрачность формы как в VCL


6-1075556382
Александр
2004-01-31 16:39
2004.05.09
Помогите отправить SMS с помощь программы


3-1081502392
stud
2004-04-09 13:19
2004.05.09
вопрос по ibdataset


3-1081759274
alex123
2004-04-12 12:41
2004.05.09
ExpressQuantumGrid - значение поля в LookupComboBox программно?


1-1082390271
Torin
2004-04-19 19:57
2004.05.09
Free





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