كيف اعطي مسار ملف الصور

[you_per7]

السلام عليكم
أولا: قم بنسخ صورة يدويا إلى المسار التالي:

كود :

d:\imeg\vide\1.jpg

بحيث يكون اسم الصورة: 1
ثانيا: انسخ يدويا صورة أخرى إلى المسار التالي:

كود :

C:\2.jpg

بحيث يكون اسم الصورة: 2
الآن أكتب في برنامجك الكود التالي
بحيث إذا لم يعثر على الصورة 1 ضمن المجلد vide
سوف يظهر الصورة 2 من القرص C
وفقا لهذا الكود

كود :

if not FileExists ('d:\imeg\vide\1.jpg') then Image1.Picture.LoadFromFile('C:\2.jpg') else Image1.Picture.LoadFromFile('C:\1.jpg')

إذا نجحت العملية, يمكنك تكييف الكود السابق حسب احتياجاتك