ارجو مساعدتي في بحث عن طريق RTF2 control

tareq_fat كتب:

عند وضع في نموذج كونترول RTF2 control

لكي انسق المذكرة في تقرير تطلع 100 في 100 اوكيه تنسيقها المذكرة

ولكن عند عمل استعلام ما بين تاريخين

وادخال في عمود البحث RTF2 control في معايير

& "*"[ Text2]![ع ن]![Like "*" & [Forms

مثلا البحث على حرف م

لايقوم بايجاد البحث

لاني حين اذهب الى جدول الكتابة التي ادخلتها في نموذج في عامود RTFField كلمة محمد

تنكتب ملخبطة بالانجليزي

كيف اعمل معيار الصح لكي تظبط

============================

الا احد يرد عليا لو تكرمتوا

سؤال باختصار حين ادخال في نموذج في عنصر المذكرة RAFT لكي انسق المذكرة

اذهب الى جدول احصل كلام مثل {\rtf1\fbidis\ansi\ansicpg1256\deff0\deflang1025{\fonttbl{\f0\fnil\fcharset178 MS Sans Serif;}{\f1\fnil\fcharset0 MS Sans Serif;}}

وحين عمل استعلام للبحث

لايقدر ان يبحث في RAFT2 CONTROL

ارررررررررررررررررجوكم ساعدوني

تحية طيبة

أرفق ملف يحوى مثال لما تريده..

هذا المثال ارجو التعديل

البحث بمجرد الكتابة في الحقل.rar

tareq_fat كتب:

هذا المثال ارجو التعديل

ارجوكم الا احد يساعدني

على كيفية البحث في عنصر التحكم RTF2 CONTROL كما في مثال المرفق

tareq_fat كتب:

ارجوكم الا احد يساعدني

على كيفية البحث في عنصر التحكم RTF2 CONTROL كما في مثال المرفق

يا جماعة إلا يوجد مساعدة

tareq_fat كتب:

يا جماعة إلا يوجد مساعدة

=================================

[center]توضيح اخر

داتا المدخل في الجدول بلغة rtf2 تكون غير مفهومه

تكون بهذا الشكل في جدول لمذكرة (rtf)

rtf {\rtf1\ansi\deff0{\fonttbl{\f0\fnil MS Sans Serif;}{\f1\fnil\fcharset0 MS Sans Serif;}{\f2\fnil\fcharset2 Symbol;}}

{\colortbl ;\red0\green0\blue255;}\viewkind4\uc1\pard\lang1033\b\f0\fs20 Case Notes\par\b0\fs16\par

والهدف من عنصر التحكم كونترول اكتف rtf

اتسيق مذكرة

وحين ذهاب لعمل استعلام لعملية البحث في مذكرة لا تطلع نتائج لان الاساس في جدول بلغة rtf html

;كيف الحل ليكون جدول ب نص عادي وليس بلغة اخرى

[/size]

tareq_fat كتب:

=================================

[center]توضيح اخر

داتا المدخل في الجدول بلغة rtf2 تكون غير مفهومه

تكون بهذا الشكل في جدول لمذكرة (rtf)

rtf {\rtf1\ansi\deff0{\fonttbl{\f0\fnil MS Sans Serif;}{\f1\fnil\fcharset0 MS Sans Serif;}{\f2\fnil\fcharset2 Symbol;}}

{\colortbl ;\red0\green0\blue255;}\viewkind4\uc1\pard\lang1033\b\f0\fs20 Case Notes\par\b0\fs16\par

والهدف من عنصر التحكم كونترول اكتف rtf

اتسيق مذكرة

وحين ذهاب لعمل استعلام لعملية البحث في مذكرة لا تطلع نتائج لان الاساس في جدول بلغة rtf html

;كيف الحل ليكون جدول ب نص عادي وليس بلغة اخرى

ارفق لكم مثال بسيط انظر الى جدول بلغة مختلفة

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

A2K RTF2 Sample Release 5-5.zip

[/size]

tareq_fat كتب:

بالله صعبه عليكم حلها

الرجاء من الاخت زهرة

اجابتي

اريد حل لهذه المشكلة لي اكثر من شهرين ما احد افادني

في عملية البحث كما في المثال المرفق اعلاه

ملف مرفق(ملفات)

A2K RTF2 Sample Release 5-5.zip (70.16كيلو )

عدد مرات التحميل : 31

tareq_fat كتب:

الرجاء من الاخت زهرة

اجابتي

اريد حل لهذه المشكلة لي اكثر من شهرين ما احد افادني

في عملية البحث كما في المثال المرفق اعلاه

اخي الفاضل : طارق

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

سوف نجيبك على سؤالك بالتفصيل الممل حتى تستفيد ويستفيد بقية اعضاء المنتدى

ولكن بشرط ان تركز معي في الخطوات خطوة خطوه حتى لا اعيد وازيد في الشرح ومن ثم تكثر الأسئلة

سيتم التطبيق على المثال الأخير فعلى بركة الله نبدأ ....

1. نقوم بفتح الجدول tblSampleRTFrelease في وضع التصميم والموجود في قاعدة البيانات A2K RTF2 Sample Release 5-5.mdb

2. نقوم بإنشاء حقل جديد ونسميه مثلا MyMemo ونجعله نوعه مذكرة

سؤال : لماذا قمنا بإنشاء هذا الحقل الجديد في الجدول ؟

جواب : السبب بارك الله بك لأننا نريد ان نضع بداخل هذا الحقل النص العربي الخاص بنا والذي من خلاله سيتم البحث من خلاله ويكون هذا الحقل نظيف من اي شوائب لأننا لو استخدمنا الحقل RTFField الموجود في الجدول لكتابة النص العربي فحتما سيظهر برموز غير مفهومه ولهذا تم انشاء الحقل الجديد .

3. الآن سنقوم بإضافة هذا الحقل MyMemo الى النموذج وسيكون في رأس النموذج اما الحقل RTFField الموجود مسبقا فسنقوم بتصغيره واخفاؤه نهائيا ( تذكر جيدا لا تقوم بحذف هذا الحقل RTFField سواء من الجدول او من النموذج او من التقرير لأنه مهم جدا)

4. سنقوم الآن بإنشاء مربع نص نسميه ( txtSearch )

5. سنقوم بإنشاء زر أمر ونسميه ( بحث ) مهمة هذا الزر هو البحث عن الكلمات في حقل المذكره MyMemo الخاصة بنا ( وليس في حقل RTFField )

6. سنقوم بإنشاء زر أمر ونسميه ( مسح ) مهمة هذا الزر هو مسح ما قمنا بكتابته في مربع النص حتى يتم الغاء الفلتره من ناتج البحث السابق

7. سنقوم الآن بإنشاء استعلام ونسميه مثلا Q1 مأخوذ من الجدول tblSampleRTFrelease بكامل الحقول الثلاثة ( ID + RTFField + MyMemo )

8. سنضع في معايير الحقلين RTFField + MyMemo هذه العبارة

Like "*" & [FORMS]![frmSampleRTF2]![txtSearch] & "*"

ليصبح الإستعلام بهذا الشكل

9. الآن ننتقل الى النموذج لوضع الأكواد الخاصة بالأوامر

زر امر البحث نضع له هذا الكود

Private Sub CmdSearch_Click()
Me.Requery
End Sub

زر المسح نضع له هذا الكود

Private Sub CmdClear_Click()
Me.txtSearch = ""
Me.Requery
Me.txtSearch.SetFocus
End Sub

في حدث عند فتح النموذج سنضع التركيز في مربع نص البحث

Private Sub Form_Open(Cancel As Integer)
Me.txtSearch.SetFocus
End Sub

وسيكون شكل النموذج بعد التعديل بهذه الطريقة

10. الآن نأتي للتطبيق العملي على النموذج وارجو افنتباه لهذه الخطوة جيدا

*. في حقل MyMemo الموجود في رأس النموذج نقوم بكتابة ما نريده من عبارات او يمكننا اخذ مقطع من اي مكان ولصقه في هذا الحقل .

*. سنقوم ايضا بنسخ ما كتبناه في حقل MyMemo ولصقه ايضا في مكون RTFcontrol والذي هو في قسم التفصيل

سؤال : لماذا قمنا بهذه الخطوة ؟

جواب : الحقل العلوي خاص بالكتابة وايضا نبحث فيه عن ما نريد

اما الحقل السفلي فسيكون للتنسيق وإظهار النص بشكل منسق حسب ما يتم اختياره من القائمة الجانبية الخاصة بالتنسيق

*. سنقوم بالبحث عن اي كلمة موجوده في المذكره يواسطة مربع نص البحث ثم نضغط ( زر الأمر بحث ) .... ( وسيظهر لنا السجل المطلوب والذي به الكلمة المطلوبه )

*. لمسح كلمة البحث من مربع النص نضغط على ( زر الأمر مسح )

10. ننتقل الآن الى التقرير لمعاينته وسنجد ان ما تم ضبطه في النموذج سيكون هو تماما في التقرير

11. نقوم بعمل زر المعاينة لكل صفحات التقرير وزر معاينة الصفحة الحالية للتقرير وايضا للطباعة

وسيكون الشكل النهائي للنموذج والتقرير بهذا الشكل

وهذا هو الملف النهائي بعد اجراء التعديلات اللازمة عليه

ارجو بعد هذا الشرح المفصل ان لا تنسانا من التقيم

za-RTF2 Sample-UP.rar

tareq_fat كتب:

الف شكر لكي يا استاذة زهرة والله ماقصرتي

طلب اخير ارجوكي

هل ممكن بدل عملية النسخ من MyMemo والصق في rtf

يكون بمجرد الكتابة يتم النسخ من مربع MyMemo الى عنصر التحكم rtf

بدون التدخل مني

اي انني لا اريد ان اعمل نسخ ثم لصق

اريدها عملية برمجية لو تكرمتي ارجوكي

وهل يمكن ان تطلع الكلمة التي تم البحث عنها حين عرضها في التقرير ان بكون تحت خط او ملونة بدون ما اضغط على الخيارات الموجودة في شريط الادوات

وشكر ا لكي والله انت استاذة بمعنى الكلمة

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

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

بالتوفيق