24-02-2009, 08:43 PM
السلام عليكم
كيف يمكنني إظهار محتوى الحقل في كويكربوبور فارغاً
بالنسبة للتاريخ فهو عندما يكون الحقل فارغ يظهر في QRLABEL1
31/12/1899
فوضعت له الكود الذي يحمل اللون الأحمر حتى يظهر مكانه فارغ في QRLABEL1
ونجحت العملية
وبالنسبة للساعة فحاولت بكل الطرق التي خطرت لي على بالي ولم اجد لها حل
فماذا يجب علي فعله لحقل الساعة حتى لا يطهر في qrlabel2 بهذا الشكل 00:00
أنظر إلى الكود
كيف يمكنني إظهار محتوى الحقل في كويكربوبور فارغاً
بالنسبة للتاريخ فهو عندما يكون الحقل فارغ يظهر في QRLABEL1
31/12/1899
فوضعت له الكود الذي يحمل اللون الأحمر حتى يظهر مكانه فارغ في QRLABEL1
ونجحت العملية
وبالنسبة للساعة فحاولت بكل الطرق التي خطرت لي على بالي ولم اجد لها حل
فماذا يجب علي فعله لحقل الساعة حتى لا يطهر في qrlabel2 بهذا الشكل 00:00
أنظر إلى الكود
كود :
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;
QRLABEL1.Caption:=formatDateTime('yyyy/mm/dd',h1);
[color=Red] if h1=00 then QRLABEL1.Caption:='';[/color]
QRLABEL2.Caption:=formatDateTime('HH:MM',d1);
Table1.Next;
end;
end;
end;