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

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

проблема с MDI приложением [D6, Win2k]

Андрусь ©   (2002-07-09 19:47:00) 

Привет всем! У меня такая проблема: в MDI приложении почему-то при максимизации child не видно иконок окна(минимизация,максимизация, закрытие).+ ко всему прижатые панели(alBottom,alRight)не прижимались соответственно. Причём берёшь новое MDI приложение - там работает. Всё это глюкает во всех child шаблона и переделывать всё нет желания. Подскажите,если не сложно. Зараннее большое спасибо!

---

Андрусь   (2002-07-09 21:30:00) [1]

Честно говоря я не понимаю в чем дело:простая MDI форма без особых наворотов,но даже простейшие child не работают как надо.
В тоже время почти тоже - всё работает.

---

Eugene Lachinov   (2002-07-09 20:42:00) [2]

Вызывалось это в UpdateMenuItems(Sender : TObject);
Screen.OnActiveFormChange := UpdateMenuItems;
если в главном меню были какие-либо изменения

---

Eugene Lachinov   (2002-07-09 20:39:00) [3]

Для чего написано честно говоря не помню, но может поможет

procedure UpdateMDIMenu;
var
Size : LongInt;
begin
if (Application.MainForm <> NIL) then
with Application.MainForm do
if (ActiveMDIChild <> NIL) then
with ActiveMDIChild do
if WindowState = wsMaximized then begin
Size := ClientWidth + (Longint(ClientHeight) shl 16);
SendMessage(Handle, WM_SIZE, SIZE_RESTORED, Size);
SendMessage(Handle, WM_SIZE, SIZE_MAXIMIZED, Size);
end;
end;

---

Наверх