السلام عليكم.....
لقد سأل أحد الإخوة في موضوع سابق عن معرفة إذا كان المستخدم قد قام بإجراء أي عملية على الشاشة خلال وقت من الزمن و هذا شرح كيفية التعامل مع مثل هذه الحالة.
We can use in this case D2kwutil Package which is really greate in such things!
1) In when-new-form-instance :
declare
v_win  pls_integer:=get_window_property(forms_mdi_window,window_handle);
check_time_out   Timer;

Begin
--This will start counting the time since no action done on the keyboard or on the mouse
Win_Api_Session.TimeOut_Start_timer(v_win);
--This will begin our timer to check for inactive time every minute
check_time_out := create_timer('Timeout',1000,repeat);

End;

2)Now...
on When-Timer_Expired trigger :
If get_application_property(Timer_name) = 'Time_out' then
 if Win_Api_Session.Timeout_Get_Inactive_time > 60 then
-- close the application if the form has been idle for 1 min or more
  exit_form;
 end if;
end if;

3)Now...
on Post-Form :
Win_Api_Session.Timeout_Delete_Timer;

!!Remember To attatch D2kwutil Package with your form.  

السلام عليكم ورحمة الله وبركاتة اخي ammar_kh1982 شكرا جزيلا لحلك الجميل جدا والحقيقة مميز لكن واجهتني مشكلة وهي في حال كان النظام عندي مكون من اكثر من شاشة يعني موديول اساسي يتم فتح من خلالة شاشات كثيرة فحلك سوف ينطبق على هذة الشاشة الرئيسة فقط وانا اريدة ان يكون للجميع ولكن بدون مااطبق trigger التى ذكرتها على الجميع الشاشات فكيف الحل وجزالك الله كل الخير

جزاك الله كل خير
انا عندى form بتعرض اسئلة إختبار وكل سؤال إجابته فى وقت محدد مثلا دقيقتين وانا بإظهر الوقت على ال form بس المشكلة ان كل مل احرك ال mouse او ال keybord ال timer يعمل reset ويبدأ من جديد
بسبب Win_Api_Session.TimeOut_Start_timer لانها بتعمل restart لل timer ويبدأ يعدد طالما ليس هناك اى action مثل الضغط على ال keyboard او mouse


أرجو المساعدة

D2kwutil Package من وين اجيب هذي المكتبة اذا سمحت

يظهر لي هذا الخطا لما اعمل تنفيذ

identifier 'WIN_API SESSION.TIMEOUT START_TIMER' must be declared

تم تعديل 2 يناير 201313 سنة بواسطة mahdico

هل هذي الطريقه تنفع مع 10G