حذف ملفات المستندات الأخيرة

[bilgads]

السلام عليكم ورحمة الله و بركاته
الكود التالي يقوم بحذف ملفات المستندات الأخيرة
اوّلا : أضف في قائمة uses التالي ShlObj
ثم ضع Button واكتب الكود التالي:

كود :

SHAddToRecentDocs(0, nil);