Thursday, February 23, 2006

Skrytí ikon pracovní plochy

Velmi jednoduchý tip, proto bez dalších větších úvodů. Praktické použití asi nebude tak časté, přesto se tato funkce může někdy hodit.
procedure SkryjIkony;
begin
ShowWindow(FindWindow(nil,'Program Manager'),SW_HIDE);
end;

procedure ZobrazIkony;
begin
ShowWindow(FindWindow(nil,'Program Manager'),SW_SHOW);
end;