Свернуть и Hide.

← →
Danco © (2008-04-12 12:14) [0]

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

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

← →
Danco © (2008-04-12 12:21) [1]

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

← →
AIK © (2008-04-12 18:32) [2]

1.

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

см. тоже http://delphimaster.net/view/2-1207994821/

2.

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

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

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

← →
Danco © (2008-04-12 20:45) [3]

> AIK

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

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

← →
AIK © (2008-04-12 21:22) [4]

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.

> AIK

спс ... :)

> спс

кпсс

Свернуть и Hide. Найти похожие ветки