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

Вниз

не работает GetMenuString в WM_DRAWITEM   Найти похожие ветки 

 
Dmitry_177   (2007-01-21 00:56) [0]

не работает GetMenuString в WM_DRAWITEM, может сталкивался ктонибудь с этой проблемой? В обработке WM_DRAWITEM делаю так:

var
 Buffer: string;
 BufSize: integer;
begin
 case Message of
   WM_DRAWITEM: begin
                  with PDrawItemStruct(lParam)^ do
                    begin
                      SetLength(Buffer, MAX_PATH);
                      BufSize := GetMenuString(hwndItem, itemID, PChar(Buffer), MAX_PATH, MF_BYCOMMAND);
                      SetLength(Buffer, BufSize);

...


в переменную Buffer почему-то ничего не записывается...(((


 
Dmitry_177   (2007-01-21 02:27) [1]

Может это из за того что я создаю меню так:


 hMainMenu := CreateMenu;
 hSubMenuFile := CreatePopupMenu;
 hSubMenuHelp := CreatePopupMenu;

 AppendMenu(hMainMenu, MF_OWNERDRAW or MF_POPUP, hSubMenuFile, "&File");
 AppendMenu(hMainMenu, MF_OWNERDRAW or MF_POPUP, hSubMenuHelp, "&Help");

 AppendMenu(hSubMenuFile, MF_ENABLED or MF_STRING, sflNew, "New");
 AppendMenu(hSubMenuFile, MF_ENABLED or MF_STRING, sflClose, "Close");
 AppendMenu(hSubMenuFile, MF_SEPARATOR, 0, "");
 AppendMenu(hSubMenuFile, MF_ENABLED or MF_STRING, sflExit, "Exit");
...


Может это из за того что какраз у пунктов меню в главном меню нету по сути дела itemID, точнее не определен в этом создании?


 
tesseract ©   (2007-01-21 11:14) [2]

The lpString parameter is a TCHAR buffer, and nMaxCount is the length of the menu string in TCHARs. Sizing these parameters incorrectly can cause truncation of the string, leading to possible loss of data.


 
Dmitry_177   (2007-01-21 14:57) [3]

Пробовал, что-то никак...:(

var
 Buffer: array [0..MAX_PATH - 1]of Char;
 text: string;
begin
 case Message of
   WM_DRAWITEM: begin
                  with PDrawItemStruct(lParam)^ do
                    begin
                      GetMenuString(hwndItem, itemID, Buffer, length(Buffer), MF_BYCOMMAND);
                      text := Buffer;

                      ...

                      DrawText(hDC, PChar(text), length(text), rcItem, DT_CENTER or DT_VCENTER or DT_SINGLELINE);



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
2-1180987541
Dipodidae
2007-06-05 00:05
2007.07.01
Интерфейс


15-1180866473
daemon_007
2007-06-03 14:27
2007.07.01
Please, помогите решить задачки по делфи очень срочно!!!!


9-1154688619
DevilDevil
2006-08-04 14:50
2007.07.01
Режим обратной связи. Зачем?


1-1178180255
kyn66
2007-05-03 12:17
2007.07.01
DBGridEh - отсутствует свойство DisableScroll


2-1181207740
alienff
2007-06-07 13:15
2007.07.01
FTP