Скачать: CL | DM;

Небольшой глюк   Найти похожие ветки 

← →
Elec3C ©   (2007-12-06 19:19) [0]

Устанавливаю параметры формы:
CanResize := False;
MinimizeIcon := False;
MaximizeIcon := False;

Затем запускаю приложение. Вызываю системное меню окна(Восстановить, Переместить, Размер...).
Пункт меню "Размер" доступен(хотя не должен быть доступен). Вызываю ещё раз - всё нормально
(пункт меню "Размер" не доступен). Вопрос: Как сделать, чтобы при первом запуске в системном меню
пункт "Размер" был не доступен при вышеприведённых параметрах формы? Нужно обновить каким-то
образом меню, наверное.

P.S. Я проверял на висте. Может на XP нет такого глюка.

---

← →
Elec3C ©   (2007-12-08 13:26) [1]

^

---

← →
Jon ©   (2007-12-08 14:43) [2]

You need to send a WM_INITMENU message.

program test;

uses
 Windows, Messages, KOL;

begin
 Applet := NewForm(nil,"");
 Applet.Style := Applet.Style and not (WS_MINIMIZEBOX or WS_MAXIMIZEBOX);
 Applet.CanResize := False;
 Applet.Perform(WM_INITMENU,0,0);
 Run(Applet);
end.

The code above works correctly.
Looks like a bug in kol.pas.

---

← →
Elec3C ©   (2007-12-08 14:56) [3]

Has earned! Thanks Jon.

---

← →
Дмитрий К ©   (2007-12-08 15:07) [4]

> Has earned!

Много?

---

← →
Elec3C ©   (2007-12-09 15:50) [5]

> Дмитрий К ©

Я имел ввиду Заработало)). Просто писал быстро тогда.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c