حصريا ... شرح مبسط لكيفية إستغلال بعض دوال Api الشهيرة باستعمال الديلفي

السلام عليكم و رحمة الله تعالى و بركاته في البداية أريد الإعتذار عن الغياب الذي دام بضعة أيام نظرا للإنشغال بالتحضير للإمتحانات أما بعد:[/SIZE][/COLOR][/CENTER]
أردت أن أضع في هذا الدرس بعض الشروحات الخاصة بكيفية إستغلال بعض [COLOR="red"][SIZE="4"][FONT="Tahoma"][COLOR="Navy"]دوالAPI الشهيرة فالكثير منا يعرفها و لكن لا يعرف كيف يستفيد منها:
1-شرح دالة الحصول على إسم مجلد ويندوز:
طبعا عند إستعمالنا للديلفي تأكد أولا أن اليونيت windows معرفة أي:

الكود:

unit
sysutils,windows.......;

 
و الآن أدخل إلى الحدث الذي تريد فيه تنفيذ الأمر مثلا الحدث tform1.create
نقوم الآن بتعريف المتغير التالي:

الكود:

var
p:pchar;

يلعب هذا المتفير في الحقيقة دور مؤشر فقط
الآن ضع تحت begin مايلي:

الكود:

getmem(p,255);   //حجز مساحة في الذاكرة
getwindowsdirectory(p;255); //وضع إسم مجلد الويندوز في المساحة التي كنا قد حجزناها و المعبر عنها بالمؤشر p
//أخذ الخاصية caption للفورم لقيمة المتغير p
form1.caption:=string(p);

بعد تشغيل البرنامج سنلاحظ ظهور إسم دليل الويندوز في الكابشيون مثلا 
c:\windows
ملاحظة: ليس بالضرورة إستعمال الكابشيون للفورم لظهور إسم الدليل عليها يمكنك إستعمال أي طريقة أخرى كاستعمال متغير أو غير ذلك