Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.19;
Скачать: CL | DM;

Вниз

OWNERDRAW Menu   Найти похожие ветки 

 
GROL   (2002-08-12 18:32) [0]

Хочу сам рисовать менюху и не могу понять, с какой стороны подступится к KOL-у. Может есть у кого примерчик?


 
Gandalf   (2002-08-12 20:17) [1]

Зайди на http://xcl.cjb.net/ там есть примерчик отрисовки меню.


 
GROL   (2002-08-13 01:14) [2]

Да, спасибо, подойдет.


 
GROL   (2002-08-13 19:17) [3]

Дальше по теме.
Как я понял с примера, для того, чтобы итемы начали вызывать WM_MEASUREITEM и WM_DRAWITEM им надо скать об этом. Правильно ли я делаю ? :

var
MII: TMenuItemInfo;
il:integer;
begin

FillChar( MII, Sizeof( MII ), 0 );
MII.cbSize := Sizeof( MII );
MII.fMask := MIIM_TYPE;
MII.fType:=MFT_OWNERDRAW;
For il:=0 to myMenu.Count-1 do
SetMenuItemInfo( myMenu.Handle, il, true, MII );


кстате, а чего у автора в kol.pas
MII.cbSize := 44;
в то время, как Sizeof( MII ) = 48 ?


 
GROL   (2002-08-13 19:22) [4]

Забыл дописать: то, что я привел срабатывает только для "основного" меню и не срабатывает для подменю :(


 
SPeller   (2002-08-14 03:45) [5]


> GROL (13.08.02 19:22)
> Забыл дописать: то, что я привел срабатывает только для
> "основного" меню и не срабатывает для подменю :(

Почитай доки по ВинАПИ по работе с менюшками. Я тоже долго с этим разбирался, и то до сих пор не всё понимаю :)



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

Текущий архив: 2003.05.19;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.007 c
3-59630
_qwerty_
2003-04-29 05:10
2003.05.19
Sql запрос не идёт


1-59747
Max1111
2003-05-06 10:58
2003.05.19
Вопрос по конструированию


9-59533
Mirovodin
2002-03-26 00:19
2003.05.19
Форум открыт


8-59804
Makhanev A.S.
2003-02-01 20:43
2003.05.19
TMediaPlayer:


14-59860
SPeller
2003-04-28 12:28
2003.05.19
Глюки Access 2000





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