الطباعة في الدالفي واضافة نتائجلحسابات من فورم الطباعة
form18.ADOquery1.close;
form18.ADOquery1.open;
form18.QRLabel9.Caption:=edit1.Text;
form18.QRLabel13.Caption:=edit3.Text;
form18.QRLabel14.Caption:=edit4.Text;
form18.QRLabel16.Caption:=edit5.Text;
form18.QRLabel19.Caption:=dbedit10.Text;
form18.QRLabel20.Caption:=dbedit11.Text;
form18.QUICKREP1.PREVIEW ;
form18.ADOquery1.close;
form18.ADOquery1.open;
form18.QRLabel9.Caption:=edit1.Text;
form18.QRLabel13.Caption:=edit3.Text;
form18.QRLabel14.Caption:=edit4.Text;
form18.QRLabel16.Caption:=edit5.Text;
form18.QRLabel19.Caption:=dbedit10.Text;
form18.QRLabel20.Caption:=dbedit11.Text;
form18.QUICKREP1.PREVIEW ;