+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف تتم الطباعة من استعلام في الريف ريبورت (/showthread.php?tid=1815)
كيف تتم الطباعة من استعلام في الريف ريبورت - kachwahed - 23-03-2010
إقتباس :اخي الكريم ان قمت بنزع الشرط whereإفعل ذلك فقط أثناء تصميمك للبرنامج لـ:
فلا يصبح استعلام وما فائدته
إقتباس :يتسنى لك معيانة النتائج في مصمم التقاريربالتوفيق.
كيف تتم الطباعة من استعلام في الريف ريبورت - yahia1921 - 23-03-2010
مشكور اخي على تفاعلك
نعم هو لا حل يوجد بالنسبة لهذه الحالة اذا يجب توفر الخاصيات
بارك الله فيك
كيف تتم الطباعة من استعلام في الريف ريبورت - saber-bsa - 16-03-2011
السلام عليكم لقد واجهت نفس المسكلة ألا يوجد حل عملي او طريقة ما
لقد حاولت لكن دون فائدة
كيف تتم الطباعة من استعلام في الريف ريبورت - Lam.Abdeldjalil - 19-03-2011
السلام عليكم
لم أفهم ما هو المشكل ؟ هل تريد إنشاء تقرير برمجيا ؟
كيف تتم الطباعة من استعلام في الريف ريبورت - saber-bsa - 20-03-2011
Lam.Abdeldjalil كتب :ما هو المشكل ؟كيف يمكن طباعة تقرير ناتج من إستعلام (adoquery) بارمتري
كما نعلم ان نتائج الإستعلام تخرج اثناء تفيذ البرنامج
لهذا لا يمكنني ان أصمم صفحة التقرير بحقول الفاتورة قبل التنفيذ
لانها غير موجودة !
كيف تتم الطباعة من استعلام في الريف ريبورت - Lam.Abdeldjalil - 20-03-2011
السلام عليكم
ألق نظرة على :
فيديو شرح صنع تقارير ب rave raports
الدرس الثاني rave reports تصميم واجهات الصفحات
الدرس الثالث rave reports اعداد رأس و قدم الجسم
إقتباس : كما نعلم ان نتائج الإستعلام تخرج اثناء تفيذ البرنامجوكذلك في وقت التنفيذ
http://www.delphi4arab.net/forum/showpost.php?p=15939&postcount=9
ليكن في العلم أن RvDataSetConnection يتصل بأي كلاس منحدرة من TDataSet ـ (ADOTable/ADOQuery/ADODataSet) وبالتالي يحمل تسجيلاتها و التي يمكن الوصول إليها من DirectDataView في Rave
+ إذا أردت الطباعة/المعاينة دون إنشاء ملف التقرير ( برمجيا ) هذا مثال بإستخدام RvSystem
في الحدث OnPrint
كود :
procedure TForm1.RvSystem1Print(Sender: TObject);
begin
with Sender as TBaseReport do begin
NewLine;
SetFont('Arial',20);
FontColor := clRed;
PrintCenter('Dynamic Reporting in Rave',3);
NewLine;
NewLine;
ClearTabs;
// Column Header
SetTab(0.3, pjLeft, 0.5, 0, 0, 0);
SetTab(0.6, pjLeft, 1.1, 0, 0, 0);
SetTab(2.1, pjLeft, 1.0, 0, 0, 0);
SetTab(3.0, pjLeft, 1.0, 0, 0, 0);
SetFont('Arial', 10);
Bold := True;
// Column Header Captions
PrintTab('N°');
PrintTab('Client');
PrintTab('Nbr');
PrintTab('Note');
Bold := False;
NewLine;
ADODataSet1.first;
// Lines (Rows)
while not ADODataSet1.Eof do begin
Printtab(ADODataSet1.FieldByName('n').Text);
Printtab(ADODataSet1.FieldByName('client').Text);
Printtab(ADODataSet1.FieldByName('nbr').Text);
Printtab(ADODataSet1.FieldByName('note').Text);
newline;
ADODataSet1.Next;
if (LinesLeft < 4) and (not ADODataSet1.Eof) then begin
NewPage;
end;
end;
end;
end;كود :
RvSystem1.Execute;كيف تتم الطباعة من استعلام في الريف ريبورت - me_delphi - 20-03-2011
هل منكم اخواني من جرب طباعة تقرير من خلال استعلام يحتوي على عدة جداول ...لأني غالبا أبرمج قواعد البيانات من خلال االدوت نت ... مجبر
وأنوي أن أقنع زملائي بتجربة قواعد البيانات بلغة دلفي 
milie_xp:
كيف تتم الطباعة من استعلام في الريف ريبورت - Lam.Abdeldjalil - 20-03-2011
السلام عليكم
إقتباس :طباعة تقرير من خلال استعلام يحتوي على عدة جداوللم أفهمها ؟ إذا كان بالإمكان التوضيح بمثال / صورة
كيف تتم الطباعة من استعلام في الريف ريبورت - me_delphi - 20-03-2011
مثلا الطباعة من خلال هدا الاستعلام
Select n1,n2,n3 From Table1 INNER JOIN Table2 ON Table1.id=Table2.id
كيف تتم الطباعة من استعلام في الريف ريبورت - Lam.Abdeldjalil - 20-03-2011
بالطبع يمكن
محرر التقارير لا يهمه الإستعلام من جدول أو من مئة (ربط داخلي / خارجي / كلي ....) بطريقة ( DirectDataView) كل ما يهمه هو نتيجة الإستعلام في الـ DataSet
+ جربت للتو طريقة Database Connection + Driver Data View تعمل أيضا
هل واجهت مشكل فيها ؟