Anti-minimize [Delphi]

[DarkByte]

Windows poate minimiza toate ferestrele vizibile pe ecran la un moment dat prin comanda "Minimize All" (Win + M) ... ce facem daca nu vrem ca fereastra noastra sa pateasca la fel ?

Codul de jos va impiedica Windows-ul sa-si faca de cap cu fereastra voastra

Cod:

interface
...
private
    procedure WMShowWindow(var Msg: TWMShowWindow); message WM_ShowWindow;
...
implementation
...
procedure TForm1.WMShowWindow(var Msg: TWMShowWindow);
begin
  if not Msg.Show then
    Msg.Result := 0
  else
    inherited;
end;
...

Am marcat cu interface si implementation unde vine fiecare bucatica de cod.

P.S. nici de la butonul de Minimize nu va putea fi minimizata fereastra, so ... enjoy

Bafta

[SkullAds]