برنامج بسيط للبحث عن الملفات بكل يسر

[anasdrak]

هذا المشروع يبين لك كيف تقوم بالبحث عن ملف معين في البرنامج
فقط أكتب اسم الملف وإضغط start وأختار القرص المناسب ثم موافق
الملفات في المرفقات

[Happy03]

حدث هذا الخطأ
اين أجد الملف
[Fatal Error] Find.pas(22): File not found: 'QDialogs.dcu'

[kachwahed]

شكرا كثيرا
اين أجد الملف
[Fatal Error] Find.pas(22): File not found: 'QDialogs.dcu'

على الدلفي 7 تجده في:
:\Program Files\Borland\Delphi7\Source\CLX
حدث خلل
[Error] Find.pas(98): Types of actual and formal var parameters must be identical
في السطر:
if SelectDirectory('Where to look','',dir) then
غيرت تعريف dir إلى :
dir: WideString;
وبذلك قمت بـ Compile.
شكرا كثيرا.