XProfan

Desktopicons verstecken oder anzeigen
(c) Frank Abbing
ShowIcons X
X = 0 = verstecken
X = 1 = anzeigen

Proc ShowIcons

    Declare hw&,dm&
    Parameters z&
    dm&=0
    Case z&=1:dm&=9
    hw&=FindWindow(Program Manager)
    Case hw&:ShowWindow(hw&,dm&)

EndProc

ShowIcons 0
Sleep 5000
ShowIcons 1
End