"Dynamiczne" zamykanie okien...

0

Mam w aplikacji, powiedzmy, 10 okien. Otwieram kilka z nich. Klikam na jakis guziczek... i w tym momencie otwarte okienka, oprocz okna glownego powinny sie zamknac...
Moze ktos z Was wie, w jaki sprytny sposob zamknac te okienka?
...
if Okno1.Showing then Okno1.Close; ...

  • to odpada ja chce sprytnie :-)
0

Nie chce się wklepywać ifów? :-P
Przydałaby się tu jakaś procka typu CloseAllVisibleWindows :-D
A może pętelkę: "0 to Screen.FormCount -1" i sprawdzać czy dane okno (Screen.Forms[index]) jest "różne" od okna głównego i czy jest widoczne?

0 
for i:=0 to screen.FormCount-1 do
            if (screen.Forms[i].Showing) and (screen.Forms[i] <> Application.MainForm)  then
                   screen.Forms[i].Close;

...no tak proste az glupie ;-)
dzieki za uswiadomienie glupoty :-)

...a tak z ciekawosci - moze ktos zna jeszcze jakis sposob (choc ten jest OK)?

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