تشغيل تطبيقات دلفي مع المعلمات

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

وينطبق الشيء نفسه بالنسبة لك دلفي التطبيق ، سواء كان ذلك ل استمارة القنصلية أو واحد مع واجهة المستخدم الرسومية. يمكنك تمرير معلمة من موجه الأوامر في Windows أو من بيئة التطوير في دلفي ، تحت تشغيل> المعلمات خيار القائمة.

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

ال ParamCount ترجع الدالة عدد المعلمات التي تم تمريرها إلى البرنامج في سطر الأوامر ، و ParamStr إرجاع معلمة محددة من سطر الأوامر.

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

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

بدء مشروع جديد ووضع زر مكون على شكل. في الزر عند النقر معالج الأحداث ، اكتب الكود التالي:

إجراء TForm1.Button1Click (المرسل: TObject) ؛

ابدأ

 ShowMessage (ParamStr (0)) ؛

النهاية;

عند تشغيل البرنامج والنقر فوق الزر ، يظهر مربع رسالة مع اسم ومسار البرنامج التنفيذي. يمكنك مشاهدة هذا ParamStr "يعمل" حتى لو لم تقم بتمرير أي معلمات إلى التطبيق ؛ وذلك لأن قيمة الصفيف 0 تخزن اسم ملف التطبيق القابل للتنفيذ ، بما في ذلك معلومات المسار.

أختر المعلمات من يركض القائمة ، ثم قم بإضافة دلفي البرمجة إلى القائمة المنسدلة.

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

والخطوة التالية هي حلقة من خلال المعلمات باستخدام ParamCount () للحصول على قيمة المعلمات باستخدام ParamStr (ط).

قم بتغيير معالج أحداث OnClick للزر إلى هذا:

إجراء TForm1.Button1Click (المرسل: TObject) ؛

فار

 j: عدد صحيح

startfor ي: = 1 إلى ParamCount فعل

 ShowMessage (ParamStr (j)) ؛

النهاية;

عند تشغيل البرنامج والنقر فوق الزر ، تظهر رسالة تقرأ "Delphi" (المعلمة الأولى) و "Programming" (المعلمة الثانية).