تطبيق وحدة تحكم بسيطة
البرنامج التالي هو برنامج وحدة تحكم بسيط يمكنك تجميعه وتشغيله على سطر الأوامر.
programgreeting ؛
{$ apptypeconsole}
varmymessagestring
يبدأ
mymessage: = 'HelloWorld!' ؛
Writeln (mymessage) ؛
نهاية.
يوضح السطر الأول أن البرنامج يسمى التحية. {$ apptypeConsole} يطلب من المترجم أن يكون تطبيق وحدة تحكم يتم تشغيله على سطر الأوامر. يحدد السطر التالي متغيرًا من سلسلة النوع يسمى MyMessage. (يحتوي Delphi على نوع بيانات السلسلة الحقيقية) ، يمرر هذا البرنامج السلسلة "HelloWorld!" (يتم تعريف Writeln في ملفات وحدة النظام ، والتي يتم تضمينها تلقائيًا بواسطة برنامج التحويل البرمجي في العديد من التطبيقات)
احفظ إلى ملف من نوع Genering.pas أو Mereing.dpr ، ثم أدخل الأمر التالي للترجمة
DCC32Greeting
لإنشاء ملف قابل للتنفيذ Win32
dccilgreeting
إنشاء ملف .NET قابل للتنفيذ.
بصرف النظر عن بساطته ، يختلف هذا المثال إلى حد ما بعدة طرق عن البرامج التي تكتبها في أداة تطوير Borland. أولاً ، إنه تطبيق وحدة التحكم. غالبًا ما يتم استخدام أدوات تطوير Borland لتطوير التطبيقات الأكثر شيوعًا في الواجهات الرسومية ، لذلك لن تتمكن من استخدام أمر Writeln بشكل طبيعي. بالإضافة إلى ذلك ، توجد جميع الروتين في ملف منفصل. في برنامج واجهة صور رسومية نموذجية ، سيتم وضع سطر البرنامج في بداية المثال في ملف مشروع منفصل لا يتضمن أي برامج منطقية فعلية ، على عكس عدد قليل في ملف الوحدة المسمى بتعريف البرنامج .