تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
Word List Gen
#1
السلام عليكم
     أنا عضو جديد بهذا المنتدى وقد أعجبني كثيراً مما شهدته من خلال  زياراتي السابقة لهذا المنتدى من تعاون بين الأعضاء وتقديم المساعدة 
هذا المنتدى يحوي مجموعة من الأعضاء المميزين من خلال تتبعي لمواضيعهم وما يقدمونه من عون لزملائهم الأعضاء.

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

الموضوع بهذا الرابط http://vb4arb.com/vb/showthread.php?tid=26196
( جهد يشكر عليه )

هل من تعديل على جمل for  بكود بديل يقوم بنفس الفكرة وغرضي من هذا الطلب لزيادة سرعة أداء البرنامج في توليد الكلمات ( البرنامج بطيء نوعا ما فقط مرت على فكرة لهذا البرنامج و لاكن بلغة برمجة أخرى وقد كان أداء البرنامج رهيب من ناحية السرعة. ( البرمجة كانت بلغة python )

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

هذه فكرتي لتحسين  أداء البرنامج وهذا طلبي من الأساتذه الخبراء هنا من خلال إبدعاتهم في هذا المجال (( البرمجة))
الرد }}}
تم الشكر بواسطة:
#2
أين أنتم أساتذتنا الكرام
الرد }}}
تم الشكر بواسطة:
#3
Sad
الرد }}}
تم الشكر بواسطة:
#4
يبدو أنه لايوجد نية في تعاونكم هل _ أصبت أو أخطئت  Huh
الرد }}}
تم الشكر بواسطة:
#5
(14-02-19, 12:57 PM)yunis كتب : يبدو أنه لايوجد نية في تعاونكم هل _ أصبت أو أخطئت  Huh

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

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

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


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


وبالنسبة للجزء الثاني من الفكرة والمتعلق بالحجم 
سيتم أستخدام فكرة الكود التالي

كود :
Imports System.IO

Module Module1

   Sub Main()
       ' Get file info for test.txt.
       ' ... Create this file in Visual Studio and select Copy If Newer on its properties.
       Dim info As New FileInfo("test.txt")

       ' Get length of the file.
       Dim length As Long = info.Length

       ' Add more characters to the file.
       File.AppendAllText("test.txt", " More characters.")

       ' Get another file info.
       ' ... Then get the length.
       Dim info2 As New FileInfo("test.txt")
       Dim length2 As Long = info2.Length

       ' Show how the size changed.
       Console.WriteLine("Before and after: {0}, {1}", length, length2)
       Console.WriteLine("Size increase: {0}", length2 - length)
   End Sub

End Module

ومهمة الكود هو جلب حجم الملف 

فأنشأ مشروع جديد وحاول تطبيق الكود على ملف txt 
بمعنى ستقوم بإنشاء ملف txt بداخل مجلد البرنامج  وتقوم بالتعديل عليه برمجيا باضافة نص له  
 وفي اثناء التعديل سيتم تطبيق الكود لجلب حجم الملف في timer
ووضعه في متغير او label او textbox  اي كان لن تفرق

ثم زرع الناتج في دالة if المتعلقة بحفظ الملف
إذا كان حجم الملف 5  أوقف الدالة
وإلا أكمل الدالة

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



تمنياتي لك بالتوفيق والنجاح
لا إله إلا الله وحده لا شريك له له الملك وله الحمد وهو على كل شئ قدير
سبحان الله وبحمده سبحان الله العظيم
سبحان الله والحمد لله ولا إله إلا الله والله أكبر ولا حول ولا قوة إلا بالله العلى العظيم
رب أغفر لي 

الرد }}}



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم