رد مع اقتباساخي باي لغة هذه !
مبرمج مستجد
من لديه حل لمشكلة التعامل مع حقل من نوع Time و Date
السلام عليكم
كيف يمكنني إظهار محتوى الحقل في QuickRep فارغاً
بالنسبة للتاريخ فهو عندما يكون الحقل فارغ يظهر في QRLabel1
31/12/1899
فوضعت له الكود الذي يحمل اللون الأحمر حتى يظهر مكانه فارغ في QRLabel1
ونجحت العملية
وبالنسبة للساعة فحاولت بكل الطرق التي خطرت لي على بالي ولم اجد لها حل
فماذا يجب علي فعله لحقل الساعة حتى لا يطهر في QRLabel2 بهذا الشكل 00:00
أنظر إلى الكود
لظهور QRLabel1كود PHP:procedure TForm10.DetailBand2BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
var d1,h1:TDateTime;
begin
with DM_1 do begin
Table1.First;
while not Table1.Eof do begin
if (Table1NU.Value=1) then h1:=Table1DT_DEP.Value;
if (Table1NU.value=1) then d1:=Table1HR_DEP.Value
المتعلقة بحقل التاريخ فارغة في حالة ما إذا كان الحقل فارغ
وبدلا من أن يخرج لي (31/12/1899) يظهر الفراغ
لظهور QRLabel2كود PHP:QRLabel1.Caption:=formatDateTime('yyyy/mm/dd',h1);
if h1=00 then QRLabel1.Caption:='';
المتعلقة بحقل الساعة فارغة بدلاً من ان تظهر لي بشكل 00:00
لقد نجحت العملية لكن المشكلة في حالة ما إذا كان الحقل غير فارغ ويحمل قيمة 00:00
في هذه الحالة يظهر QRLabel2 فارغ ومن المفروض في هذه الحالة لا بد من ظهور القيمة 00:00
وضعت هذا الكود
كود PHP:QRLabel2.Caption:=formatDateTime('HH:MM',d1);
if d1=00 then QRLabel2.Caption:='';
Table1.Next;
End;
End;
End;
-:| لا شيء |:-
اخي باي لغة هذه !
إلى كل مبتلى,,, إليك البلسم الشافي,,,خذ العبرة و جدد اليقين و تصبر يرعاك الله
{الم (1) أَحَسِبَ النَّاسُ أَن يُتْرَكُوا أَن يَقُولُوا آمَنَّا وَهُمْ لَا يُفْتَنُونَ (2) وَلَقَدْ فَتَنَّا الَّذِينَ مِن قَبْلِهِمْ فَلَيَعْلَمَنَّ اللَّهُ الَّذِينَ صَدَقُوا وَلَيَعْلَمَنَّ الْكَاذِبِينَ (3)}
يا صاحب الهم... اقترب لترتاح نفسك...
مدونتي
اعتذر للغياب وعدم المشاركة لظروف العمل, وعذرا لاي تقصير في حقكم او اي تاخر في الرد عليكم
مبرمج مستجد
السلام عليكمالمشاركة الأصلية كتبت بواسطة المظفر بالله
اتعامل مع لغة delphi7
-:| لا شيء |:-
توقعت هذا
للاسف ليس لي حتى ولو خلفية بسيطة عن هذه اللغة
لكن اذا استعصت الامور اعتقد افضل حل هو البحث من خلال جوجل
إلى كل مبتلى,,, إليك البلسم الشافي,,,خذ العبرة و جدد اليقين و تصبر يرعاك الله
{الم (1) أَحَسِبَ النَّاسُ أَن يُتْرَكُوا أَن يَقُولُوا آمَنَّا وَهُمْ لَا يُفْتَنُونَ (2) وَلَقَدْ فَتَنَّا الَّذِينَ مِن قَبْلِهِمْ فَلَيَعْلَمَنَّ اللَّهُ الَّذِينَ صَدَقُوا وَلَيَعْلَمَنَّ الْكَاذِبِينَ (3)}
يا صاحب الهم... اقترب لترتاح نفسك...
اعتذر للغياب وعدم المشاركة لظروف العمل, وعذرا لاي تقصير في حقكم او اي تاخر في الرد عليكم
مبرمج مستجد
شكرًا جزيلاً على محاولاتك لمساعدتي
ضوابط المشاركة
المفضلات