زر ابدأ

تمكين زر ابدا

EnableWindow(FindWindowEx(FindWindow

('Shell_TrayWnd', nil), 0,'Button',nil),TRUE);

عدم تمكين زر ابدا

EnableWindow(FindWindowEx(FindWindow

('Shell_TrayWnd', nil), 0,'Button',nil),FALSE);