كيفية النسخ باستعمال quickreport )حيث ناتي بالمعلومات من مجموعة جداول مختلفة (قواعد بيانات مختلفة)

[karimbenzrara]

كيفية الطباعة باستعمال quickreport حيث ناتي بالمعلومات من مجموعة جداول مختلفة (قواعد بيانات مختلفة)
اي ان ورقة العمل تاخذ المعلومات من عدة جداول

ارجو من الاخوة فهم السؤال جيدا لان الامثل المعتادة هي طباعة ورقة تاخذ معلوماتها من جدول واحد


ارجو منكم المساعدة

[Elkamar]

المشاركة الأصلية كتبت بواسطة karimbenzrara

كيفية النسخ باستعمال quickreport حيث ناتي بالمعلومات من مجموعة جداول مختلفة (قواعد بيانات مختلفة)
اي ان ورقة العمل تاخذ المعلومات من عدة جداول

ارجو من الاخوة فهم السؤال جيدا لان الامثل المعتادة هي نسخ ورقة تاخذ معلوماتها من جدول واحد


ارجو منكم المساعدة

وضح لي الجداول و تصميم الورقة المراد تكوينها و سوف أوافيك بالحل إن شاء الله

[karimbenzrara]

لدية ورقة عمل فيها معطيات كثيرة و كل معلومة في جدول مختلف
مثال:
حقول الولاية و الدائرة و البلدية من جدول خاص اسمه الولاية
و حقول اسم المؤسسة و طاقتها......................من جدول خاص اسمه المؤسسة
و حقل اسم المدير من جدول المدير ......
و هكذا..................
ارجو ان اكون قد اوصلت لك الفكرة


هناك حل بلغة sql لكن لم اتمكن من كتابة الكود المناسب

شكرا على اهتمامك

[Elkamar]

ماهي قاعدة البيانات التي تستعملها

[Bachirsoft]

السلام عليكم وبعد
لحل مشكلتك..
حل في SQL
- اي اولا تختار الجداول
- ثم لكل جدولين يتساوون في مفتاح اوحقل
- ثم تختار المفتاح الأخير للجدول الأخير الذي هو في النافذة المراد طباعتها
- ثم ربط quickreport بـ SQL .
- وبعدها تتحصل علىالنتيجة المرغوب فيها..
ان شاء الله.
و اي استفسار اخر انا في انتظارك ...وبالتوفيق

[karimbenzrara]

السلام عليكم يا اخواني اللهم اجعل كل كلمة بل كل حرف او كل نية حسنة لاخواني
استعمل لقاعدة البيانات paradoxe
لقد قمت سابقا باختيار الجداول و يوجد حقل مشترك بينهم و قمت بربط العنصر quickreport بالعنصر query الخاص بلغة sql
المشكل المطروح هوفي كتابة code sql في الخاصية sql الخاصة بالعنصر query
مثال :
select *
from etablissement,directeur,....................
where.................


ارجو ان تتقبلوا مني فائق التقدير و الاحترام.

[Elkamar]

يمكنك استعمال Query و تكتب SQL مثال

Table Agent
Num, Nom, Prenom, Adresse, CodeVille, NumDepar

Table Ville
CodeVille, DesiVille

Table Departement
NumDepar, DesiDepar

Requête SQL
Select Agent.Num, Agent.Nom, Agent.Prenom, Ville.DesiVille, Departement.DesiDepar
From Agent, Ville, Departement
Where Agent.CodeVille = Ville.CodeVille And Agent.NumDepar = Departement.NumDepar

كما يمكنك استعمال مجموعة من الجداول Table وتربط بينها ب :
Propriété MasterSource et MasterField
MasterSource pour la table père et MasterField pour le champ qui relie la table père et la table fils



ولا تنسى أن تفتح Table et Query قبل


---

[karimbenzrara]

السلام عليكم اما بعد :
طريقة Query طبقتها ولكن المشكل انها تعطي معلومة عن مؤسسة واحدة اي بلغة البرمجة (السجل الحالي فقط )
اما الطريقة الثانية لم اتطرق اليها ساعمل عليها و ان كان لديك مثال مفصل عليها او تصتطيع شرحها لي فهو افضل
ملاحظة:ان كان لديك ملفات مهمة و تساعدني على اتقان البرمجة في delphi فارجو ان ترسلها لي عبر البريد الالكتروني

- البريد الإلكتروني حذف من قبل الإدارة (غير مسموح بكتابة البريد) -
شكرا جزيلا على المعلومات و اسال الله العظيم ان يجعلها في ميزان حسناتك يوم القيامة

[Elkamar]

إن أردت أن تقوم بطباعة كل السجلات عليك أن تضع DBText للحقول المراد طباعتها في Bond Détail