14-01-2021, 01:48 PM (آخر تعديل لهذه المشاركة: 14-01-2021, 01:48 PM بواسطة Delphi4Us.)
وعليكم السلام ورحمة الله و بركاته
اضافة لما ذكره الاخ عبدالعزيز يمكنك قراءة التاريخ من الانترنت لان تاريخ الجهاز متغير
كود :
var
SNTPClient: TIdSNTP;
begin
SNTPClient := TIdSNTP.Create(nil);
try
SNTPClient.Host := 'pool.ntp.org';
ShowMessage(DateTimeToStr(SNTPClient.DateTime));
finally
SNTPClient.Free;
end;
end;
النتيجة ستكون مثل
إقتباس :2021-01-05 17:13:16
قل: اللهم فاطِرَ السماوات والأرض عالم الغيبِ والشهادة، ربَّ كُلِّ شَيءٍ ومَلِيكَه، أَشْهد أن لا إله إلا أنت، أعوذ بك من شرِّ نفسي وشرِّ الشيطان وشِرْكِهِ وأن أقترف على نفسي سوءًا أو أجرُّه إلى مسلم
قل: اللهم فاطِرَ السماوات والأرض عالم الغيبِ والشهادة، ربَّ كُلِّ شَيءٍ ومَلِيكَه، أَشْهد أن لا إله إلا أنت، أعوذ بك من شرِّ نفسي وشرِّ الشيطان وشِرْكِهِ وأن أقترف على نفسي سوءًا أو أجرُّه إلى مسلم
وقتها هناك امرين
الاول لا مفر من استخدام تاريخ الجهاز مع التحقق من التاريخ مثلا اذا كان اقل من اي تاريخ سابق فهذا يدل على ان تاريخ الجهاز غير مضبوط وتطلب ضبط التاريخ وتقفل البرنامج ومع كل تشغيل تطلب التحقق من التاريخ .
الثاني ان تستخدم عدد مرات التشغيل بكل يوم تضيف مثلا واحد بعد ثلاثين تشغيلة يتوقف البرنامج وهذا لا يحتاج الى تاريخ مضبوط المهم ان التاريخ يتغير فكلما تغير التاريخ تضيف واحد للتسجيلة
مما يعني لو ان المستخدم شغل البرنامج واضفت تسجيلة وغير التاريخ وشغله مرة اخرى ستضيف تسجيلة
وهذا لاحظته في بعض البرامج الموجودة بالسوق
قل: اللهم فاطِرَ السماوات والأرض عالم الغيبِ والشهادة، ربَّ كُلِّ شَيءٍ ومَلِيكَه، أَشْهد أن لا إله إلا أنت، أعوذ بك من شرِّ نفسي وشرِّ الشيطان وشِرْكِهِ وأن أقترف على نفسي سوءًا أو أجرُّه إلى مسلم
(15-01-2021, 11:17 PM)Delphi4Us كتب : وقتها هناك امرين
الاول لا مفر من استخدام تاريخ الجهاز مع التحقق من التاريخ مثلا اذا كان اقل من اي تاريخ سابق فهذا يدل على ان تاريخ الجهاز غير مضبوط وتطلب ضبط التاريخ وتقفل البرنامج ومع كل تشغيل تطلب التحقق من التاريخ .
الثاني ان تستخدم عدد مرات التشغيل بكل يوم تضيف مثلا واحد بعد ثلاثين تشغيلة يتوقف البرنامج وهذا لا يحتاج الى تاريخ مضبوط المهم ان التاريخ يتغير فكلما تغير التاريخ تضيف واحد للتسجيلة
مما يعني لو ان المستخدم شغل البرنامج واضفت تسجيلة وغير التاريخ وشغله مرة اخرى ستضيف تسجيلة
وهذا لاحظته في بعض البرامج الموجودة بالسوق
سلام عليكم شكرا اخي على المعلومة لكن انا عندي أسئلة بخصوص الموضوع :
1 - أنا لا أعرف أين أضع الكود في الفورم
2 - لا أعرف الكود كامل
3 - لا أعرف كيف احدد مدة إيقاف البرنامج
وعليكم السلام ورحمة الله وبركاته
الكود سيكون في الـ FormLoad
وما الذي استقريت عليه
استخدام الانترنت ام بدون انترنت
قل: اللهم فاطِرَ السماوات والأرض عالم الغيبِ والشهادة، ربَّ كُلِّ شَيءٍ ومَلِيكَه، أَشْهد أن لا إله إلا أنت، أعوذ بك من شرِّ نفسي وشرِّ الشيطان وشِرْكِهِ وأن أقترف على نفسي سوءًا أو أجرُّه إلى مسلم
![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)
