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

Послать сообщение mdichild-форме на восстановление.   Найти похожие ветки 

← →
Крутыш ©   (2004-01-24 23:13) [0]

Добрый вечер!!!

Как послать mdichild – форме сообщение на восстановление формы,
если оно свёрнуто.
Пробовал код
for j:=0 to Screen.FormCount - 1 do
begin
if (Screen.Forms[j] is TForm3) then
begin
if (Screen.Forms[j] as TForm3).Caption="Приходная накладная: Новый документ" then
begin
(Screen.Forms[j] as TForm3).BringToFront;
end;
end;Но это если только форма не свёрнута, а находится на заднем плане.

А вот когда свёрнута не могу решить. Помогите!!!

С уважением!!!

---

← →
BorH ©   (2004-01-24 23:55) [1]

Чёрт, запамятовал, кажется опция WindowState у TForm

---

← →
BorH ©   (2004-01-25 00:03) [2]

Ну а на API кажется так:
var
YourWindow:hwnd;
begin
YourWindow:=FindWindowEx(Form1.Handle,0,"TForm3","Приходная накладная: Новый документ"); {Ищешь MDI окошко}
SendMessage(YourWindow,WM_MDIMAXIMIZE,0,0);
end;

---

← →
Johnmen ©   (2004-01-25 01:23) [3]

WM_MDIRESTORE
WM_MDIMAXIMIZE

---

← →
Крутыш ©   (2004-01-25 08:54) [4]

Этот код почему то не выполняеся для MDIChild-форм.
Для главной выполняется, а для дочерних окон не хочет.

YourWindow:=FindWindowEx(Form3.Handle,0,"TForm3","Приходная накладная: Новый документ");
SendMessage(YourWindow,WM_Close,0,0);

---

← →
Крутыш ©   (2004-01-25 09:58) [5]

Всем спасибо!!! Проблема разрешилась!!!
С уважением!!!

---

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

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



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