فيما يتعلق بإخفاء memo.text بالفاستروبورت

[medreg]

السلام عليكم ورحمة الله تعالى وبركاته
اخواني لقد استعملت هذا الكود لإخفاء memo.text وفق شرط معين لكن لم يتم اخفاءه
كيف يمكن اخفاءه
الكود الذي استعملته هو
بعد التصريح

كود :

MemDt:=TfrxMemoView(frxRptDec_01.FindObject('Memo25')); If table2.fieldbyname('Dt_Debit').asdatetime<>Null then MemDt.Memo.text:=formatdatetime('yyyy-mm-dd',table2.fieldbyname('Dt_Debit').asdatetime) else MemDt.visible:=false;

[larbiparadox]

السلام عليكم ورحمة الله تعالى وبركاته
اخواني لقد استعملت هذا الكود لإخفاء memo.text وفق شرط معين لكن لم يتم اخفاءه
كيف يمكن اخفاءه
الكود الذي استعملته هو
بعد التصريح

كود :

MemDt:=TfrxMemoView(frxRptDec_01.FindObject('Memo25')); If table2.fieldbyname('Dt_Debit').asdatetime<>Null then MemDt.Memo.text:=formatdatetime('yyyy-mm-dd',table2.fieldbyname('Dt_Debit').asdatetime) else MemDt.visible:=false;

وعليكم السلام ورحمة الله تعالى وبركاته

الكود صحيح و لكن أين وضعته

[medreg]

procedure TFrm_Menu.frxReport1BeforePrint(Sender: TfrxReportComponent);
begin
MemDt:=TfrxMemoView(frxReport1.FindObject('Memo25'));
If table2.fieldbyname('Dt_Debit').asdatetime<>Null then
MemDt.Memo.text:=formatdatetime('yyyy-mm-dd',table2.fieldbyname('Dt_Debit').asdatetime) else MemDt.visible:=false;
وضعت الكود في هذا المكان
end;

[larbiparadox]

ضعه في frxReport1 في الحدث GetValue

[roma89]

السلام عليكم
قم بتغيير القيمة null الى 0
و اتركه في مكانه BeforePrint

[medreg]

بارك الله فيكم وجزاكم الله عنا كل خير