Вопрос № 68140: Здравствуйте уважаемые эксперты!
Вопрос: Как проверить: активен ли в заголовке окна/диалога/модального диалога "Крестик" и есть ли он там вообще.
Спасибо!...Вопрос № 68238: Здравствуйте...
Проблема с довольно простым кодом - создаю ComboBoxEx, пытаюсь добавить итем - не получается. Голову ломаю уже полчаса, в чем дело... SendMessage возвращает 0....
Вопрос № 68.140
Здравствуйте уважаемые эксперты!
Вопрос: Как проверить: активен ли в заголовке окна/диалога/модального диалога "Крестик" и есть ли он там вообще.
Спасибо!
Отправлен: 22.12.2006, 13:01
Вопрос задал: MeX (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Gladiator
Здравствуйте, MeX!
procedure TForm1.Button1Click(Sender: TObject);
var Mn: HMenu;
ItemInfo: MENUITEMINFO;
begin
ZeroMemory(@ItemInfo, Sizeof(MENUITEMINFO));
ItemInfo.cbSize:=SizeOf(ItemInfo);
ItemInfo.fMask:=MIIM_STATE;
Mn:=GetSystemMenu(Handle,False);
if GetMenuItemInfo(Mn,SC_CLOSE,False,ItemInfo) then
//Кнопка Close активна
else
//Кнопка Close неактивна или её нет
end;
Ответ отправил: Gladiator (статус: 7-ой класс)
Ответ отправлен: 22.12.2006, 15:25
Вопрос № 68.238
Здравствуйте...
Проблема с довольно простым кодом - создаю ComboBoxEx, пытаюсь добавить итем - не получается. Голову ломаю уже полчаса, в чем дело... SendMessage возвращает 0.
Приложение:
Отправлен: 23.12.2006, 09:36
Вопрос задал: InviZ (статус: 3-ий класс)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: h2d [PX team]
даров, InviZ!
попробуй отправить сообщение CB_INSERTSTRING
wParam = индекс элемента
lParam = указатель на строку для добавления
удачи.
--------- Прав всегда Админ, ибо в трех лицах есть он единая власть высшая в классе дисплейном!
Ответ отправил: h2d [PX team] (статус: 2-ой класс)
Ответ отправлен: 23.12.2006, 09:56 Оценка за ответ: 4 Комментарий оценки: Это для обычного COMBOBOX'а, а у меня ComboBoxEx.
Отвечает: John Paramol
Здравствуйте, InviZ!
На самом деле item создается,
и SendMessage возвращает 0 правильно.
Дело в том, что вы создаете ComboBoxEx
с высотой по Y = 23. Это будет высота
ComboBoxEx вместе с выпадающим списком.
То есть на выпадающий список ничего не остается.
Сделайте высоту хотя бы 100.
Удачи!
--------- 1=2, at values 1 large enough
Ответ отправил: John Paramol (статус: 5-ый класс)
Ответ отправлен: 23.12.2006, 10:33