Programowa zmiana kolejności wyświetlania okien w systemie

0

Witam,

Muszę napisać aplikację która zawsze będzie znajdować się pod wszystkimi otwartymi oknami (przeciwieństwo Always On Top) na wzór podam programy

W jaki sposób mogę obniżyć poziom wyświetlania aktualnego okna? Mogą być inne propozycje ;)

Pozdrawiam

0
Form1.sendtoback;
0

Dziekuje za odpowiedz. Rozwiazanie jest prawie idealne, nie reaguje jednak na zdarzenie OnDeactivate

0

ja proponuje "przykleic okno do pulpitu"

function Pulpit : THandle;
begin
 Result := FindWindow('Progman', Nil);
 Result := FindWindowEx(Result, 0, 'SHELLDLL_DefView', Nil);
 Result := FindWindowEx(Result, 0, 'SysListView32', Nil);
end;

przyklejanie:

procedure TForm1.Button1Click(Sender: TObject);
begin
 Windows.SetParent(Self.Handle, Pulpit);
end;

odklejanie:

procedure TForm1.Button2Click(Sender: TObject);
begin
 Windows.SetParent(Self.Handle, 0);
end;

// dzieki Piotrekdp - juz poprawilem

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