var
h: Thandle;
h := findwindow('Shell_TrayWnd', nil);
showwindow(h, SW_HIDE);
h := findwindow('Button', nil);
showwindow(h, SW_HIDE);
var
h: Thandle;
h := findwindow('Shell_TrayWnd', nil);
showwindow(h, SW_HIDE);
h := findwindow('Button', nil);
showwindow(h, SW_HIDE);