كيف اقوم بأغلاق الشاشه برمجيا

[عَمر]

السلام عليكم

اريد كود لاغلاق الشاشه
جربت هذا الكود لم ينجح

كود :

ShellExecute(Handle, 'open', PChar('rund1132.exe'), PChar('-l'), nil, sw_show);

كود :

rundll32.exe user32.dll,LockWorkStation

او عن طريق

كود :

vk_win+L