Die Z-Ordnung innerhalb eines Programms feststellen

[Lannes]

Hallo,

eine Liste der Forms?:

Delphi-Quellcode:

var s : String;
    z : Integer;
begin
for z := 0 to Screen.FormCount -1 do
  begin
    s := s + Screen.Forms[z].Name+#13#10;
  end;
  showmessage(s);