كيف اعرف ان المستخدم توقف عن العمل داخل البرنامج ؟

[TF6M]

و عليكم السلام و رحمة الله و بركاته

1- كيف لي ان اعرف ان المستخدم توقف عن العمل داخل البرنامج ؟
- ببساطة نراقب الـ CurrentThread , أو الثريد الحالي و هو للبروسس الشغال أو الـ Active
- لجلب Id للثريد الحالي , GetCurrentThreadId أو System.MainThreadID

PHP كود :

Caption:= ConCat('SystemThr :' , IntToStr(System.MainThreadID)
                 , ' Or SystemThr :' + IntToStr(GetCurrentThreadId())); 


PHP كود :

procedure TForm1.tmr1Timer(Sender: TObject);
begin
 Label1.Caption:= Format('%d',[
                  GetWindowThreadProcessId(
                  GetForegroundWindow ,nil)
                   And $FFFF]);
end; 


2- عندما يتوقف المستخدم عن العمل على الجهاز مدة 5 دقائق مثلا يقوم الوندوز بتشغيل شاشة التوقف ?
- يمكن عمل Timer أو Thread أو Object , لتحرير شاشة التوقف !

PHP كود :

SendMessage(Handle, WM_SYSCOMMAND, SC_SCREENSAVE, 1); 


- راجع WM_SYSCOMMAND , بالإظافة إلى خيارات أخرى SC_MONITORPOWER :laugh: .
بالتوفيق,,