hamata00
11-29-2007, 11:18 PM
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته ...
عملية ترتيب أكواد وشفرات مشروع هي من العمليات المهمة والتي تظهر أهميتها عندما تنتهي من البرنامج دون تنسيق أو ترتيب وتعود بعد مدة لتطوير البرنامج ، ستلاحظ أن عملية التطوير أصبحت شاقة لغياب عاملين أساسيين هما : التعليقات وترتيب الأكواد ، وهديتي تتعلق بالعامل الأخير .
هديتي اليوم إليكم عبارة عن بريمج قد يعرفه البعض منا ، إنه Indenter VB .
إلى من لا يعرفه هذا البرنامج هو إضافة بسيطة على بيئة التطوير الخاصة بفيجوال بيسك 6 ، تقوم بإضافة بند جديد ( باسم Smart Indenter ) للقائمة المختصرة التي تظهر عند النقر بزر الفأرة الأيمن على نافذة الأكواد .
http://designeraman.jeeran.com/IndenterVB.jpg
تحتوي هذه القائمة على أربعة خيارات :
1- Indent Procedure : ويقوم بتنظيم وترتيب أكواد الإجراء الحالي المحدد عليه .
2- Indent Module : ويقوم بترتيب أكواد الوحدة الحالية التي تعمل عليها سواء أكانت نموذجًا أو وحدةً نمطيةً أو غيرها .
3- Indent Project : وكما هو واضح من اسمها فهي تقوم بترتيب أكواد المشروع بأكمله .
4- Indenting Options : يعرض لك مربع حوار تستطيع منه تغيير بعض خصائص البريمج .
* مثال بسيط :
Private Sub Form_Load()
For x = 0 To 255
For y = 0 To 255
For z = 0 To 255
If x = y * z Then
MsgBox "تحقق الشرط"
End If
DoEvents
Next z
Next y
Next x
End Sub
* المثال نفسه بعد عملية الترتيب والتنظيم :
Private Sub Form_Load()
For x = 0 To 255
For y = 0 To 255
For z = 0 To 255
If x = y * z Then
MsgBox "تحقق الشرط"
End If
DoEvents
Next z
Next y
Next x
End Sub
أرأيت الآن كيف أن ترتيب الأكواد مسألة مهمة .
رابط الملف:http://www.chab7.com/Indenter%20VB%20v2%5b1%5d.1.zip
وفي الختام أسأل الله العلي العظيم أن يوفقني ويوفقكم لما يحبه ويرضاه
وصلى الله وسلم على نبينا محمد وعلى آله وصحبه أجمعين
والسلام عليكم ورحمة الله وبركاته ...
السلام عليكم ورحمة الله وبركاته ...
عملية ترتيب أكواد وشفرات مشروع هي من العمليات المهمة والتي تظهر أهميتها عندما تنتهي من البرنامج دون تنسيق أو ترتيب وتعود بعد مدة لتطوير البرنامج ، ستلاحظ أن عملية التطوير أصبحت شاقة لغياب عاملين أساسيين هما : التعليقات وترتيب الأكواد ، وهديتي تتعلق بالعامل الأخير .
هديتي اليوم إليكم عبارة عن بريمج قد يعرفه البعض منا ، إنه Indenter VB .
إلى من لا يعرفه هذا البرنامج هو إضافة بسيطة على بيئة التطوير الخاصة بفيجوال بيسك 6 ، تقوم بإضافة بند جديد ( باسم Smart Indenter ) للقائمة المختصرة التي تظهر عند النقر بزر الفأرة الأيمن على نافذة الأكواد .
http://designeraman.jeeran.com/IndenterVB.jpg
تحتوي هذه القائمة على أربعة خيارات :
1- Indent Procedure : ويقوم بتنظيم وترتيب أكواد الإجراء الحالي المحدد عليه .
2- Indent Module : ويقوم بترتيب أكواد الوحدة الحالية التي تعمل عليها سواء أكانت نموذجًا أو وحدةً نمطيةً أو غيرها .
3- Indent Project : وكما هو واضح من اسمها فهي تقوم بترتيب أكواد المشروع بأكمله .
4- Indenting Options : يعرض لك مربع حوار تستطيع منه تغيير بعض خصائص البريمج .
* مثال بسيط :
Private Sub Form_Load()
For x = 0 To 255
For y = 0 To 255
For z = 0 To 255
If x = y * z Then
MsgBox "تحقق الشرط"
End If
DoEvents
Next z
Next y
Next x
End Sub
* المثال نفسه بعد عملية الترتيب والتنظيم :
Private Sub Form_Load()
For x = 0 To 255
For y = 0 To 255
For z = 0 To 255
If x = y * z Then
MsgBox "تحقق الشرط"
End If
DoEvents
Next z
Next y
Next x
End Sub
أرأيت الآن كيف أن ترتيب الأكواد مسألة مهمة .
رابط الملف:http://www.chab7.com/Indenter%20VB%20v2%5b1%5d.1.zip
وفي الختام أسأل الله العلي العظيم أن يوفقني ويوفقكم لما يحبه ويرضاه
وصلى الله وسلم على نبينا محمد وعلى آله وصحبه أجمعين
والسلام عليكم ورحمة الله وبركاته ...