Minimalizacja WM_SIZE

0

chce wykryc zdarzenie gdy minimalizuje okno (nacisniecie ikonki na gornym pasku) wiem ze w takim wypadku jest zdarzenie WM_SIZE ale ono wystepuje rowniez przy kazdej zmianie rozmiaru okna a ja chce oprogramowac tylko zdarzenie gdy uzytkownik nacisnie minimalizacje a nie zmieni rozmiar okna. Dzieki za odpowiedz

0

Załóż Hook'a do minimalizacji

0

Na zakładce Addational masz kompoment Application Events i tam masz zdarzenie OnMinimize. Lub tez jak napisal fleming86.

0

dzieki za rady ale :
co do hooka to taki mieszacz ze mnie nie jest...
pomeczylem sie z tym onMinimize ale raz dziala a za drugima razem juz nie - a dokladniej to tak to jest: mam ikonke na trayu i chcialem myknac funkcje ze jak minimalizuje formatke to zeby znikala calkowicie wiec napisalem funkcje

procedure Minimal(var Message : TMessage); message WM_SIZE;

i wyglada tak

procedure TMainForm.Minimal(var Message: TMessage);
begin
if Message.WParam = SIZE_MINIMIZED then
MainForm.Visible := False;
end;

pytanie co i gdzie powalilem - wiem ze moze dla was to bedzie smieszny blad ale ja zaczynam i chyba tak kazdy mial ;)
dzieki za odpowiedzi dane jak i przyszle
pozdr

0

aha dodam ze funkcja ktora wczesniej opisalem nie dziala <ort>w ogóle</ort>, a wspomniana onMinimize dzial za pierwszym razem a za drugim i dalszymi probami nawet samo okno sie nie minimalizuje ;) - niewiem co gdzie powalilem
dzieki za odp.

0
procedure TMainForm.Minimal(var Message: TMessage);
begin
  case Message.Msg of WM_SIZE :
    begin
      ShowMessage('teraz');
      if Message.WParam = SIZE_MINIMIZED then
        MainForm.Visible := False;
    end;
  end;
end;

tak zmodyfikowalem moja procedure i 'teraz' pokazuje sie przy zmianie parametrow okna ale nigdy nie pokazuje sie przy minimalizacji ?? czy to jest wlasciwy WM do obslugi minimalizacji bo zaczynam watpic... dzieki za odp

0

Spróbuj onsłużyć WM_SYSCOMMAND. W WParam (chyba) jest zmienna mówiąca, który przycisk systemowy został naciśnięty.

0

no teraz to dziala respect :d
dziekowac dziekowac
pozdr 4 all

1 użytkowników online, w tym zalogowanych: 0, gości: 1