Ĺadny brzuch
Witam! Czy wie ktoś może w jaki sposób mogę przechwycić komunikat o minimalizacji okna aplikacji w Delphi (lub Lazarusie). Próbowałem przez WM_MINIMIZED, ale nie działa. To samo tyczy się również przywrócenia zminimalizowanego okna. :(
Użytkownik Janusz T. edytował ten post 13 sierpień 2006, 10:25
Deklaracja:protected procedure WndProc(var Msg : TMessage); override;
Kod:procedure TForma.WndProc(var Msg : TMessage); begin case msg.Msg of WM_SYSCOMMAND: begin if MSG.WParam = SC_MINIMIZE then //jeżeli aplikację zminimalizowano to wykonaj blok kodu begin //tutaj wykonujesz co tam chcesz :] end; end; end; end; inherited; end;
Co do przywrócenia to nie pamiętam jaki to był komunikat.
(...)
Co do przywrócenia to nie pamiętam jaki to był komunikat. SC_RESTORE dla przywrocenia i SC_MAXIMIZE dla maksymalizacji.
Nie wiem jak wy, ale imvho można łatwiej. Jeśli dobrze zrozumiałem :)
Na zakładce Additional jest komponent TApplicationEvents i posiada on zdarzenia OnMinimize i OnRestore :)
edit @down:
Ale jeśli jest taka możliwość, to i można z niej skorzystać :)
Użytkownik DJ_ProG edytował ten post 13 sierpień 2006, 19:32
Nie wiem jak wy, ale imvho można łatwiej. Jeśli dobrze zrozumiałem :)
Na zakładce Additional jest komponent TApplicationEvents i posiada on zdarzenia OnMinimize i OnRestore :) Nie zawsze mozna uzyc VCL, albo tez niektorzy nie chca uzywac VCL i co wtedy? Ten kod ktory jest podany bardzo latwo przeniesc do programu bazujacego na winapi.
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Użytkownik Janusz T. edytował ten post 13 sierpień 2006, 10:25
Deklaracja:protected procedure WndProc(var Msg : TMessage); override;
Kod:procedure TForma.WndProc(var Msg : TMessage); begin case msg.Msg of WM_SYSCOMMAND: begin if MSG.WParam = SC_MINIMIZE then //jeżeli aplikację zminimalizowano to wykonaj blok kodu begin //tutaj wykonujesz co tam chcesz :] end; end; end; end; inherited; end;
Co do przywrócenia to nie pamiętam jaki to był komunikat.
(...)
Co do przywrócenia to nie pamiętam jaki to był komunikat. SC_RESTORE dla przywrocenia i SC_MAXIMIZE dla maksymalizacji.
Nie wiem jak wy, ale imvho można łatwiej. Jeśli dobrze zrozumiałem :)
Na zakładce Additional jest komponent TApplicationEvents i posiada on zdarzenia OnMinimize i OnRestore :)
edit @down:
Ale jeśli jest taka możliwość, to i można z niej skorzystać :)
Użytkownik DJ_ProG edytował ten post 13 sierpień 2006, 19:32
Nie wiem jak wy, ale imvho można łatwiej. Jeśli dobrze zrozumiałem :)
Na zakładce Additional jest komponent TApplicationEvents i posiada on zdarzenia OnMinimize i OnRestore :) Nie zawsze mozna uzyc VCL, albo tez niektorzy nie chca uzywac VCL i co wtedy? Ten kod ktory jest podany bardzo latwo przeniesc do programu bazujacego na winapi.