![]() |
|
فيما يتعلق بإخفاء memo.text بالفاستروبورت - نسخة قابلة للطباعة +- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum) +-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3) +--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15) +--- الموضوع : فيما يتعلق بإخفاء memo.text بالفاستروبورت (/showthread.php?tid=11169) |
فيما يتعلق بإخفاء memo.text بالفاستروبورت - medreg - 09-12-2020 السلام عليكم ورحمة الله تعالى وبركاته اخواني لقد استعملت هذا الكود لإخفاء 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;RE: فيما يتعلق بإخفاء memo.text بالفاستروبورت - larbiparadox - 09-12-2020 (09-12-2020, 06:33 PM)medreg كتب : السلام عليكم ورحمة الله تعالى وبركاته وعليكم السلام ورحمة الله تعالى وبركاته الكود صحيح و لكن أين وضعته RE: فيما يتعلق بإخفاء memo.text بالفاستروبورت - medreg - 10-12-2020 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; RE: فيما يتعلق بإخفاء memo.text بالفاستروبورت - larbiparadox - 10-12-2020 ضعه في frxReport1 في الحدث GetValue
RE: فيما يتعلق بإخفاء memo.text بالفاستروبورت - roma89 - 10-12-2020 السلام عليكم قم بتغيير القيمة null الى 0 و اتركه في مكانه BeforePrint RE: فيما يتعلق بإخفاء memo.text بالفاستروبورت - medreg - 10-12-2020 بارك الله فيكم وجزاكم الله عنا كل خير |