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

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

Свернуть и Hide.

Danco ©   (2008-04-12 12:14:00) 

Как обработать процедуру Hide для кнопки свернуть в заголовке окна? ([_][o][x])

:) заранее спс...

---

Johnmen   (2008-04-13 02:09:00) [1]

> спс

кпсс

---

Danco   (2008-04-13 01:49:00) [2]

> AIK

спс ... :)

---

AIK   (2008-04-12 21:22:00) [3]

unit Unit1;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs;

type
 TForm1 = class(TForm)
private
  procedure Hap_Minimize(var message: TMessage); message WM_SYSCOMMAND;
  { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.Hap_Minimize(var message: TMessage);
begin
if message.wParam = SC_MINIMIZE then
 Begin
  // Пиши чё душе угодно, эт когда на кнопку свернуть нажмешь  
  //..
 End;
inherited;
end;

end.

---

Danco   (2008-04-12 20:45:00) [4]

> AIK

> А для окна твоей проги можно придумать спомощю 1> Но ты эт уже сам делай.

...подскажи как отработать сообщение WM_SYSCOMMAND?

---

AIK   (2008-04-12 18:32:00) [5]

1.

> Как обработать процедуру Hide для кнопки свернуть в заголовке
> окна? ([_][o][x])


см. тоже http://www.delphimaster.ru/cgi-bin/forum.pl?id=1207994821&n=18

2.

> ...или как убрать анимацию при сворачивании окна? )


Для всех окон: Свойства системы - Вкладка "Дополнительно" - Быстродействие (Кнопка "Параметры") - Убрать галочку у "Анимация окон при свертывании развертывании

А для окна твоей проги можно придумать спомощю 1
Но ты эт уже сам делай.

---

Danco   (2008-04-12 12:21:00) [6]

...или как убрать анимацию при сворачивании окна? )

---

Наверх