Jump to content
أوفيسنا

إضافة البيان البحثية لبرنامج Word


Go to solution Solved by شحادة بشير,

Recommended Posts

13 دقائق مضت, الرافعي said:

تم تصليح مشكل النافذة الخطأ من خلال تثبيت برنامج Office الخاص بالوظائف الإضافية. شكرا لك أيها الأخ الفاضل على تعاونك معنا ولنا تواصل معكم في القريب إن شاء الله.

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

الحمد لله، وليتك تضع رابط (برنامج Office الخاص بالوظائف الإضافية) حتى يستفيد منه من يقع في نفس المشكلة، ولك الأجر إن شاء الله.

أيضاً لا تنسَ تحميل الإصدار الجديد من الإضافة؛ ففيه مزايا وخصائص جديدة ومعالجة لجميع الملاحظات.

Edited by شحادة بشير
Link to post
Share on other sites
  • Replies 191
  • Created
  • Last Reply

Top Posters In This Topic

Top Posters In This Topic

Popular Posts

بسم الله الرحمن الرحيم إضافة البيان البحثية لبرنامج Word إضافة لبرنامج التحرير الشهير Word، تُسهِّل الكثير من المهام على الباحثين والمحررين، وتتوفر في الإضافة مجموعة من الخصائص؛ هي: 1- تنسيق

أعتز بشهادتك أخي العزيز مصطفى، وأسأل الله تعالى أن ينفعكم بها وأن يستجيب دعواتك الطيبة 🙂

من الممكن أن نحدد من القائمة الكلمات المشتركة، بحيث يتم إدراجها في الفهرس (موضعا موضعا) ويكون هناك خيار (إدراج كل الكلمات) أو (المرور على المواضع) واحدا تلو الآخر، أما بقية الكلمات غير المشتركة -وهي ا

Posted Images

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

هذا رابط الموقع باللغة الفارسية الذي وجدت فيه البرنامج المذكور سلفاً:

https://www.kanazspid.ir/acc/tags/نرم افزار رفع مشکل نصب افزونه های آفیس کاناز/

أو هذه نسخة من البرنامج بعد فك ضغط الملف على رابط التحميل التالي:

https://www.up-00.com/co6vbqhhymzv

بالتوفيق للجميع

 

 

 

  • Thanks 1
Link to post
Share on other sites
3 ساعات مضت, شحادة بشير said:

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

تم إصدار تحديث جديد لإضافة البيان البحثية

[الجديد في التحديث 2.00]:
1- إضافة خاصية تُمَكِّنُك من التحكم بالإشارات المرجعية، من حيث إضافتها كفهرس وجدول محتويات، وحذفها، وتغميقها، وتلوينها، وتظليلها.
2- عند استخدام خاصية تصحيح علامات الترقيم، سيتم مراعاة ومعالجة الأرقام الموجودة بين الفاصلة النقطية التي تظهر بالنقر على الزرين (Shift+ز)، ففي حال وجود مسافات بين عدد عشري مثل 5.2 سيتم مسح هذه المسافات.
3- في خاصية ضبط المسافات بين الكلمات، سيتم مسح المسافات الزائدة ضمن الأقواس؛ مثلاً: ( محمد رسول الله ) ستصبح (محمد رسول الله)، وهكذا بالنسبة لبقية الأقواس الأخرى وعلامتي التنصيص.
4- في خاصية ما بين قوسين تم إضافة علامتي التنصيص ""، وأصبح بالإمكان إجراء عمليات متعددة على النص الموجود ضمن علامتي التنصيص.
5- تم إضافة اللون الأسود لتلوين ما بين قوسين، وتلوين الحواشي السفلية، وهذا مفيد في حال تم تغيير اللون الأسود إلى لون آخر، فيمكن بعد ذلك إعادة التلوين باللون الأسود.

التحميل من نفس الرابط السابق

وهذا فيديو للجديد في هذا التحديث:

 

الله يبارك في عمرك وعملك، وفقكم الله دوماً للخير، وإن شاء الله يكون هذا العمل في ميزان حسناتكم أخي الحبيب.

إضافات رائعة، تُيسِّر على الباحث الكثير الكثير من الجهد والوقت.

وإلى الأمام 

تمنياتنا لكم دوماً بالتوفيق والسداد

  • Thanks 1
Link to post
Share on other sites
  • 2 months later...
في ١٣‏/٦‏/٢٠٢٠ at 15:06, مصطفى شاهين said:
  • لا يتم معالجة القوسين الهلالين من حيث المسافة قبل وبعد مثل: ( محمد رسول الله ) لا يضعها (محمد رسول الله).
  •  

أسعد الله أوقاتكم بكل خير أخي الحبيب

ملاحظة بسيطة فيما يتعلق بالبند أعلاه، عند وجود حرف ملاصق للقوس من جهة اليمين لا يفصلها كباقي علامات الترقيم، مثال: الكاتب(محمد)، لا يفصل بين حرف الباء والقوس، وكذلك في القوس الثاني، مثال: الكاتب (محمد)رائع، لا يفصل بين القوس وحرف الراء، ما دون ذلك أمور الأقواس ممتازة.

دمتم بخير

  • Thanks 1
Link to post
Share on other sites
10 دقائق مضت, مصطفى شاهين said:

أسعد الله أوقاتكم بكل خير أخي الحبيب

ملاحظة بسيطة فيما يتعلق بالبند أعلاه، عند وجود حرف ملاصق للقوس من جهة اليمين لا يفصلها كباقي علامات الترقيم، مثال: الكاتب(محمد)، لا يفصل بين حرف الباء والقوس، وكذلك في القوس الثاني، مثال: الكاتب (محمد)رائع، لا يفصل بين القوس وحرف الراء، ما دون ذلك أمور الأقواس ممتازة.

دمتم بخير

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

  • Like 1
Link to post
Share on other sites
13 دقائق مضت, شحادة بشير said:

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

جمعة مباركة عليكم أخونا الحبيب شحادة

ربنا يبارك في وقتكم وجهدكم المبارك والمميز

دمتم بخير

 

Edited by مصطفى شاهين
  • Thanks 1
Link to post
Share on other sites
7 ساعات مضت, مصطفى شاهين said:

أسعد الله أوقاتكم بكل خير أخي الحبيب

ملاحظة بسيطة فيما يتعلق بالبند أعلاه، عند وجود حرف ملاصق للقوس من جهة اليمين لا يفصلها كباقي علامات الترقيم، مثال: الكاتب(محمد)، لا يفصل بين حرف الباء والقوس، وكذلك في القوس الثاني، مثال: الكاتب (محمد)رائع، لا يفصل بين القوس وحرف الراء، ما دون ذلك أمور الأقواس ممتازة.

دمتم بخير

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


أخي العزيز مصطفى، تم تنفيذ اقتراحك هذا على جميع أنواع الأقواس: ()، (())، []، {}، «»، وفق الضوابط التالية:
- قبل القوس يجب أن يكون هنالك مسافة بشرط ألا يكون القوس بداية السطر.
- بعد القوس يجب أن يكون هنالك مسافة بشرط ألا يكون بعد القوس إحدى علامات الترقيم.
أما بخصوص مسافات أقواس الحواشي السفلية الموجودة في المتن: هذه يتم معالجتها من خلال نافذة الحواشي السفلية؛ حيث يوجد هنالك خيار لحذف المسافات قبل الحواشي وأقواسها:

Remove.png.0ec8ee0afb3886e9bff56a7265b2ba20.png
وبإذن الله تعالى ستجد هذا التطوير في الإصدار الثالث عند طرحه.

ملاحظة:
تم تنفيذ كل الاقتراحات السابقة التي طلبتها؛ مثل:
1- إجراء أي عملية من عمليات إضافة البيان البحثية على نطاق محدد سواء كان النطاق في المتن أو الحاشية، وإجراء العملية على متن المستند، وإجراء العملية على حاشية المستند، وهذه كلها خيارات أصبحت متاحة للمستخدم.
2- تحويل الأرقام والرموز المخصصة في الحواشي إلى أرقام حواشٍ، بحيث يتم إعادة ترقيم الحواشي بشكل تسلسلي بما فيها الأرقام والرموز المخصصة.
3- متابعة الحواشي بعلامة يساوي، أو علامة السهم، أو أي علامة أخرى يختارها المستخدم.
4- نظراً لأنك قمت بطرح مواضيع واستفسارات هادفة وشائكة ضمن المنتدى، هذا دفعني للاطلاع على كل مواضيعك، وقد قمت بتنفيذ كل ما أثرته سابقاً ولم يتم عمل حل برمجي له؛ مثلاً: نسخ الجداول إلى مستند آخر بحيث تبقى كجداول وليس كنصوص، أيضاً كل ما أثرته بخصوص فهرسة الأبيات الشعرية في هذا الموضوع الرائع:

وانظر ماذا أصبحت تفعل لك إضافة البيان البحثية خلال ثوان (فهرسة الأبيات الشعرية الموجودة ضمن المتن أو ضمن الحاشية أو ضمن نطاق ما من المتن أو الحاشية، مع ترتيبها حسب حرف الروي وحركته):

Abyat.png.c96081f241ff125778b8f8de5c7dce6f.png
أظن أن هذا سيعجبك كثيراً؛ لذا انتظر الإصدار الثالث بعونه تعالى

 

 

Edited by شحادة بشير
Link to post
Share on other sites
منذ ساعه, شحادة بشير said:

أظن أن هذا سيعجبك كثيراً؛ لذا انتظر الإصدار الثالث بعونه تعالى

 

أعجبني وأعجبني وأعجبني وأثلج صدري أخي الغالي شحادة

ربنا يسعدك سعادة لا مثيل لها، ويرزقك من حيث لا تحتسب، وأكثر الله من أمثالك يا طيب

أنتظر وبشغف

تمنياتنا لكم بدوام التوفيق والصحة والعافية

  • Thanks 1
Link to post
Share on other sites

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

  • Thanks 1
Link to post
Share on other sites
منذ ساعه, أبو عاصم المصري said:

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

نعم قمت بإضافة أكثر من 100 خاصية جديدة؛ أهمها إدراج الآيات القرآنية (إملائي - حفص - ورش - قالون - الدوري) وكذلك استبدال الآيات القرآنية ضمن المستند إلى الرسم الذي تريده، بالإضافة إلى الفهرسة الآلية للآيات القرآنية، والأبيات الشعرية، والنصوص كالأحاديث النبوية والآثار، وفهرسة الأعلام والأماكن، إلخ، وتنفيذ كل الاقتراحات التي تم طلبها، وغير ذلك الكثير.

وهذه صورة من الإضافة:

AlByan.png.2644b4b7fd1b4c85d043d3cef80ea2c1.png

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

  • Like 1
Link to post
Share on other sites
15 دقائق مضت, أبو عاصم المصري said:

هي هي متاحة الآن؟

أخي العزيز، ذكرت لك في ردي السابق أنها غير متاحة حالياً؛ لأنني أُعِدُّ لها شروحات فيديو، بعدها إن شاء الله ستكون متاحة، وسأذكر ذلك ضمن هذه الصفحة بمجرد نشرها.

Link to post
Share on other sites

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

لاحظت عند استخدام "ضبط المسافات بين الكلمات" واختيار تصحيح يتم تحويل علامتي التنصيص المخصصات للغة العربية إلى علامتي تنصيص شكل لغة إنجليزية كما هو موضح بالمثال المرفق.

شاكراً لكم جهودكم الطيبة

دمتم بخير

pic.JPG.1fcaef271b194bbe2198fd3b16975197.JPG

example.rar

Link to post
Share on other sites
43 دقائق مضت, مصطفى شاهين said:

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

لاحظت عند استخدام "ضبط المسافات بين الكلمات" واختيار تصحيح يتم تحويل علامتي التنصيص المخصصات للغة العربية إلى علامتي تنصيص شكل لغة إنجليزية كما هو موضح بالمثال المرفق.

شاكراً لكم جهودكم الطيبة

دمتم بخير

pic.JPG.1fcaef271b194bbe2198fd3b16975197.JPG

example.rar 10.62 kB · 0 downloads

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

1- في الإصدار الجديد غير موجود ذلك.

2- هذه المشكلة لا علاقة للإضافة بها، بل هي مرتبطة بالتصحيح التلقائي، وقد صادفتها فقط مع إضافات سعود العقيل.

Arch.png.d82744013b7f2c911ff3ab03dcc9f6ff.png

Link to post
Share on other sites
  • 2 weeks later...

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

AlByan.png

تم نشر الإصدار الثالث من إضافة البيان البحثية، والذي يعتبر طفرة نوعية في الإضافة، وهنا فيديو تعريف عام بإضافة البيان البحثية:

وفي قائمة التشغيل التالية 28 فيديو، شرحت من خلالها كل خصائص ومزايا الإضافة:

https://www.youtube.com/playlist?list=PLgE9kJofiSYLmeDIrJ8qnzNwbUKAP7QG6

  • Like 1
Link to post
Share on other sites

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

' حروف لا تجتمع

With Selection.Find
        .Text = "س[شظ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ظ[صدذزسشحخثجصطغقظ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ص[ظثذ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
 With Selection.Find
        .Text = "ث[صث]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ص[ث]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ج[خ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "خ[ظغخ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ع[خحغعأ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
 With Selection.Find
        .Text = "خ[غخ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ق[خج]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ذ[سشطغذ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ص[ذ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ط[ذسذزصظ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ز[س]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
 With Selection.Find
        .Text = "ط[ذزصظ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 

 With Selection.Find
        .Text = "ع[أحخغع]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
 
With Selection.Find
        .Text = "غ[أجحخعغق]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ق[ج]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ه[حخصعغ]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "ح[ح]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll
 
With Selection.Find
        .Text = "د[ز]"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchDiacritics = True
        .MatchAlefHamza = True
        .MatchWildcards = True
    End With
    Selection.Find.Execute replace:=wdReplaceAll

* ملحوظة: عندي كذلك قائمة بأخطاء التشكيل المتكررة، إن أعجبك الأمر، تحياتي لشخصكم الكريم.

  • Thanks 1
Link to post
Share on other sites
7 ساعات مضت, مصطفى شاهين said:

يسعدك أخي الغالي شحادة على هذا الجهد الطيب

اطلعت على جميع الفيديوهات

بارك الله فيك، ويجزيك عنا خير الجزاء

أسأل الله تعالى أن يستجيب دعواتك الطيبة أخي الكريم، ولك مثل ذلك.

12 دقائق مضت, أبو عاصم المصري said:

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

' حروف لا تجتمع

* ملحوظة: عندي كذلك قائمة بأخطاء التشكيل المتكررة، إن أعجبك الأمر، تحياتي لشخصكم الكريم.

ألف شكر لك أخي العزيز أبو عاصم المصري، وأسأل الله تعالى أن يجزيك خير الجزاء

إن قررت مستقبلاً إضافة خيارات متعلقة بالتصحيح والتشكيل فبإذن الله تعالى سأستفيد من هذه المشاركة

أكرر شكري لك 🙂

  • Like 1
Link to post
Share on other sites
  • 3 weeks later...

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

تم تحديث إضافة البيان البحثية إلى الإصدار 3.7.0.0، وقد تم تنفيذ اقتراح الأخ الحبيب أبو عاصم المصري في إضافة قوائم للتصحيح التلقائي في خاصية استبدال متعدد.

[الجديد في التحديث 3.70]:

1- في قائمة إزالة، ثم إضافة خاصية جديدة لإزالة علامات التشكيل، حيث أصبح بالإمكان إزالة علامات التشكيل التي تريدها من النص المحدد أو من كامل المتن والحاشية.
2- في خاصية استبدال متعدد، تم إضافة قائمتين للتصحيح والاستبدال التلقائي: القائمة الأولى: أخطاء الكتب العلمية، وعددها 50. القائمة الثانية: أخطاء لغوية شائعة، وعددها 178.

التحميل من نفس الرابط المباشر:

https://www.shhada.net/contents/downloadsm/4MAEgubYzqynkm6y.zip

 

Link to post
Share on other sites

تجربتي مع التشكيل الآلي:

يعتبر التصحيح من أكثر مراحل العمل العلمي التي تأخذ وقتا وجهدا كبيرا، وخصوصا إذا كان تشكيلا شاملا لكل الكلمات.

وكنت قد لجأت لطريقة بدائية اعتمدت عليها في ضبط كثير من المجلدات بالشكل الكامل، وكانت النتيجة مرضية بشكل كبير، ولا يعني هذا عدم تدخل المصحح، بل لا بد أن يقوم بعملية التصحيح المعروفة، وقد وفر هذا جهدا كبيرا، مع دقة عالية.

عملت الماكرو كالتالي:

1- أحضرت ملفا مشكولا بصورة كاملة، جمعت فيه كتابا لغويا (مثل تاج العروس، أو لسان العرب)، وكتابا حديثيا (مثل مسند الإمام أحمد)، وكتابا  في التفسير (مثل تفسير الطبري)، وكتابا فقهيا (مثل المغني لابن قدامة)، وكتابا أصوليا (مثل البرهان للجويني)، وكتاب تاريخيا، وكتابا أدبيا، ويمكن أن يضاف كتب أخرى.

2- فتحت الملف المراد تصحيحه، ونسخت أول أربع كلمات، وبحثت عنها في الملف المشكول، فإذا وجدها نسخها، وقمت باستبدالها في الملف كله ولونتها باللون الأحمر لتمييزها.

3- نسخت الكلمة الثانية إلى الخامسة، ثم الثالثة إلى السادسة، وهكذا، فما وجده في الملف المشكول، نسخته في الملف المراد تصحيحه في كل المواضع.

4- وكانت النتيجة عالية جدا.

* جمعت قائمة بحروف لا تجتمع أبدا، وإذا حدث ذلك علمت على الكلمة.

* جمعت قائمة أخرى بتشكيل لا يتوالى أبدا مثل (سكون، بعده سكون)، (شده بعدها سكون).

* فما كان كذلك ظللته ليراجعه المصحح.

فلو رأيت أن تضيف مثل هذا (لإضافة البيان الرائعة) كان في هذا خير عظيم، وفائدة كبيرة.

ويمكن أن تجعلها تحت التجربة، للاستفادة من آراء الإخوة.

بارك الله فيك أخانا الحبيب، وأرجو ألا أكون قد أثقلت عليك.  

Edited by أبو عاصم المصري
  • Like 1
Link to post
Share on other sites

الأستاذ شحادة، السلام عليكم ورحمة الله وبركاته.

هل هناك طريقة لإيقاف عملية معينة أو إلغائها؟ وذلك أني طلبت تغيير آيان في ملف كبير للخط العثماني، وكان أغلب الآيات محولة بالفعل، وكلما مر على ما بين القوسين {} أخرج رسالة [موافق - تجاهل]؟

وهذا كان من باب الاختبار فقط، بقصد تطوير هذه الإضافة الجميلة.

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

  • Like 1
Link to post
Share on other sites

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

أهلاً وسهلاً بك أخي وأستاذي العزيز أبو عاصم المصري، وبعد:
أنت أحد الأشخاص الذين أعتبر ملاحظاتهم واقتراحاتهم في إضافة البيان البحثية هي بمثابة أمر عليَّ تنفيذه، والله شهيد على ذلك؛ وهذا بسبب خبرتكم العريقة في مجال البحث والتحقيقات، فأنتم تطرحون عصارة أفكاركم وتجاربكم، وهذا كله يخدم الباحثين؛ وهذا ما دفعني لتنفيذ كل الاقتراحات.
أما
بخصوص التشكيل الآلي: طريقتك جيدة ومميزة، وأنا شخصياً أستفيد منها، وخاصة في أسماء الأعلام، حيث أرجع إلى النسخة المحققة والمشكولة من «سير أعلام النبلاء» لأقوم بضبط أسماء الأعلام، ولكن للأسف لا يمكن تعميمها وتطبيقها؛ للأسباب التالية:
1- التشكيل الآلي يحتاج لذكاء اصطناعي، وحتى الذكاء الاصطناعي فشل في عملية التشكيل 100%.
2- سأحتاج لإضافة الكثير من الكتب، وهذا العمل سيجعل حجم الإضافة كبيراً للغاية، وهو ما جعل إضافة الدكتور العقيل حوالي 2 غيغا عندما أضاف الدواوين الشعرية من أجل تخريج الأبيات.
3- الكتب التي نريد الاعتماد عليها، قد يوجد فيها بعض الأخطاء، وخاصة وأنها نسخ إلكترونية، وحتى تلك الموجودة في المكتبة الشاملة لا تخلو من هذه الأخطاء، وهذا الكلام عن تجربة.
4- سأتعرض لنقد شديد من مستخدمي الإضافة، وسيضيف كل شخص طريقة يراها مناسبة من وجهة نظره، وسينتقد طريقة غيره، وفي النهاية سيكون العمل شائكاً لا يُرضي أي طرف.
لذلك أضفت خاصية الاستبدال المتعدد، بحيث تعين في تصحيح الأخطاء، ويمكن مستقبلاً إضافة كتب السنة السبعة وغيرها من كتب المتون؛ ليتم تصحيح الأحاديث وتشكيلها آلياً، وخدمة القرآن الكريم حالياً تصحح أخطاء الآيات في الرسم الإملائي وتقوم بتشكيلها آلياً، وقريباً إن شاء الله تعالى سأضيف بعض الخدمات المتعلقة بخاصية التصحيح التلقائي الموجودة في Word، من حيث استيراد عبارات التصحيح التلقائي، وإضافة عبارات كثيرة موجودة ضمن جدول دفعة واحدة.

بخصوص إيقاف عملية معينة:
أغلب العمليات تتم بشكل سريع، ولكن في خدمة القرآن الكريم أنت محق؛ فقد جربت أن أضيف القرآن الكريم كاملاً ثم قمت باستبداله للرسم العثماني فاستغرق الأمر حوالي ربع ساعة؛ لذا سأفكر بهذا الأمر في التطويرات القادمة إن شاء الله تعالى.
وبخصوص رسالة [موافق - تجاهل] يمكنك تعطيل خيار (تنبيه عند وجود خطأ في الآية)، وكذلك تعطيل خيار (تنبيه عند وجود أكثر من تخريج للآية) وبهذا لن تخرج لك أي رسالة خطأ.

أشكرك جداً أخي الحبيب على ملاحظاتك القيمة، وثق تماماً أنني أسعى لتطبيقها بأبهى صورة وأفضل أداء يخدم الباحث.

  • Like 1
Link to post
Share on other sites

تمام أخي الحبيب، وأحب أن أخبرك أني سعيد جدا بالحوار الممتع معك.

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

ومن الممكن أن تجعلها تجريبية، فإن لاقت القبول، فبها ونعمت، وإلا حذفتها.

علما بأن هناك جملا كثيرة تأخذ ضبطا واحدا لا يتغير، مثل: (عَنْ أَبِي هُرَيْرَةَ)، (عَنِ ابْنِ عُمَرَ)، وغير ذلك آلاف الجمل ذات الكلمات الثلاثة والأربعة، بل والخمسة أيضا، وفي أوائل التسعينات كنت قد طلبت من أحد المهندسين أن يستخرج قائمة من كتب السنة الستة، مع مسند الإمام أحمد، وموطأ الإمام مالك قائمة بذلك، وكان في ذلك الوقت لغة البرمجة ضعيفة، ومع ذلك استخرج آلاف الجمل، مما ساعد في إخراج النص مضبوطا بالشكل الكامل.

  • Like 1
Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Similar Content

    • By أ / محمد صالح
      هل تعلم أنك يمكنك جعل ملف الوورد ينطق محتوياته بالإنجليزية؟؟
      افتح الملف المرفق ووافق على تمكين الكود
      وستجد ما يسرك
      للأمانة الكود منقول مع بعض التصرف
      mas-word.rar
    • By Mo3taz3zzat
      السلام عليكم 
      عيدكم مبارك
      كان عندي سؤال وراح اشرح الفكرة للتسهيل ( مرفق مثال للقاعدة )
      عندي جدول باسماء الموظفين
      وجدول فيه ملفات الموظفين على هيئة مسارات ملفات داخل الجهاز ومربوطين ب Card ID وهو رقم الموظف

       
      المطلوب استخراج ملفات الPDF لكل موظف في ملف واحد فقط Merged PDF 
      ---
      من خلال النموذج التالي 

       
      احدد السنة وليكن 2019
      واختار مكان الحفظ
      واختار اسم الموظف من الUsername Combo  واضغط على Generate PDF 
      ف المفروض انا عاوز الزر دة يحفظلي ملفات ال Sick Leave و Urgent Leave في ملف واحد باسم الموظف في المكان الى اخترتة للحفظ
      يعني في المثال المذكور 
      لو اخترت اول موظف الى اسمو Jan Kotas من الكومبو بوكس 
      المفروض يروح يجيب المسارات هذي
      C:\Sample DB\Attachments\1.pdf
      C:\Sample DB\Attachments\3.pdf
       
      فقط ويدمجمهم في ملف واحد PDF باسم  Jan Kotas.pdf ويحفظه في الديسكتوب في المسار المحدد مسبقاً هذا
      C:\Users\Mezo\Desktop\
      ولو ماخترت اسماء وضغط على Generate PDF 
      يعمل نفس العملية لجميع الموظفين 
      ويحفظ كل موظف على الديسكتوب ملف واحد PDF باسمو
       
      ---
      بعد بحث على الانترنت لموضوع الدمج وجدت هذا الموضوع
      https://wellsr.com/vba/2017/word/combine-pdfs-with-vba-and-adobe-acrobat/
      فهل تقدرو تفيدوني ياجماعة الخير
      SamplePDF.zip
    • By iyad-khalaela
      انا اريد عمل قاعدة بيانات للارشيف ملفات مابين صادر و وارد
      الوارد 77 منطقة 
      الصادر 24 منطقة
      بنسبة لعدد المناطق ليس مهم عددها ( لتوضيح فقط )
      انا سوف ارفع نسخة من النموذج الذي احاول عمله 
      اشياء لم استطع فعلها 
      1 - ربط القاعده مع السكانر - طابعه مع اسكانر النوع Kyocera ECOSYS M2540dn توصيل USP , بحيث يكون السكانر من داخل قاعدة البيانات .
      2 -اضافة الملفات ال pdf من السكانر لداخل قاعده بيانات الارشيف بدل من الربط التشعبي او اي حل بديل .
      3 -عند البحث عن كتاب وضع مربع ليظهر داخله (يعني اذا بدي كتاب احث عنو ويطلعلي داخل مربع في القاعد عشان اطبعه اذا لزمني ) .
      4 - وضع ازرار لكل اسم بوكس اضع فيه الملفات وعددها 78 - وضع زر لدخول الى هذه الازرار .
      5- اذا امكن احد مساعدتي في عمل قاعدة البيانات احتاج طريقة فتحها لوحدها بدون برنامج الاكسس .
      اكون مشكورا جدا جدا اذا امكن احد مساعدتي في عمل قاعدة البيانات للارشف . مشكورا سلفا .
      iyad.accdb
  • Recently Browsing   0 members

    No registered users viewing this page.




×
×
  • Create New...

Important Information