Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

МЕНЮ НА WINAPI


KME ©   (2004-03-12 09:02:00) 

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


DVM   (2004-03-12 18:51:00) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1078933712&n=5


Diamond Cat   (2004-03-12 16:24:00) [2]

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;


Agent13   (2004-03-12 13:29:00) [3]

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


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

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


Serge   (2004-03-12 09:37:00) [5]

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


Serge   (2004-03-12 09:34:00) [6]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо