+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : عمل انذار في label عندة وصول التاريخ المحدد (/showthread.php?tid=6747)
عمل انذار في label عندة وصول التاريخ المحدد - hadi91 - 30-01-2015
السلام عليكم
انا على وشك اتمام برنامجي و لكن لدي مشكل فيه هو انه البرنامج يعمل على وضع Alerte ( انذار ) في عدة label في فورم واحد اي لدي عدة انذارات تعتمد على تاريخ اضعها في label اي اذا وصل التاريخ يعمل لي انذار
عمل انذار في label عندة وصول التاريخ المحدد - hadi91 - 30-01-2015
او بـاسلوب اخر طريقة غمل تنبيه لتاريخ معين
عمل انذار في label عندة وصول التاريخ المحدد - rabihpascal - 31-01-2015
اخي عليك بالبحث في المنتدى فهنالك امثلة كثيرة تشبه ما تبحث عنه لكن حسب ما فهمت من السؤال فجرب هذا
كود :
ontimer//
Label1.caption:=Datetostr(Date)
If label.caption='2/15/2015' then
play your alarm here//عمل انذار في label عندة وصول التاريخ المحدد - hadi91 - 31-01-2015
اهلا اخي
انا لدي edit فيه التاريخ القادم اي بعد 6 اشهر مثلا اري وضع تنبيه يتبهني قبل اسبوع لذلك التاريخ اي 5اشهر و 20 يوما مثلا
عمل انذار في label عندة وصول التاريخ المحدد - S.FATEH - 03-02-2015
السلام عليكم
احصل على التاريخ انقص سبعة ايام اجري المقارنة
PHP كود :
var
ADate: TDate;
begin
ADate := Date; // Current system date
ADate := ADate - 7; // Current date - 7 days
if ADate = Date then
ShowMessage('___');
end;