كيف اعطي مسار ملف الصور
#1
السلام عليكم اعضاء المنتدي

هل يوجد امر في الدلفي بمكنك من قراءة مجلد به صور ومخزن برقم الصورة الموجودة في الجدول بحيث ان تبحث عن رقم الزبون تظهر صورته بدون ان تكون قد خزنت صورته علي الجدول لكي احاغظ علي مساحة القاعدة لان البيانات كثيرة بل علي القرص d:\imeg لقد بحث في النت ووجدت يرنامج شبية ولكنة عبد السطر الاخير يفشل في اظهار القراء ويقول لم يجد المسار رغم انني اعطيته مسار الجدول صحيح **** حل واضح وصريح بلمثال التالي

رقم الزبون tabel1.fn رقمي اسم الزبون tabel1.name حرفي صورة الزبون tabel1.pic من نوع صورة g علي البردوكس
لان المثال المنشور علي النت يوجد به خطا لايعمل فيقف عند الجملة التالية
image1picture.loadformfile('d:\hpp\mastere\vide\.bmp');
رغم اني غيرت في المسار وفق مسار برنامجي كالتالي

image1picture.loadformfile('d:\imeg\vide\.jpge');
حيث الصور موجودة في الدي في المجلد امج

وغيرت في الامر بدل jpge الي bmp كما هو مكتوب ولكن فشلت جميع المحاولات فياريت تعطوني مثال اخر او تروني الخطا
مالمقصود بها هل هي امر ام مجلد ماvideثم ان الكلمة الموجودة في اخر الامر
لقد كتبتها والغيتها فلم افلح الرجاء مساعدتي
الرد
#2
السلام عليكم
تخزين الصور بقاعدة البيانات / Paradox
التعامل مع المسارات في قواعد البيانات الجزء الأول
....
بالتوفيق,,
I'M Fly Like A G6

الرد
#3
السلام عليكم
أولا: قم بنسخ صورة يدويا إلى المسار التالي:
كود :
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')

إذا نجحت العملية, يمكنك تكييف الكود السابق حسب احتياجاتك
[-] كل من 1 user says قال شكرا ل you_per7 على المشاركة المفيدة
  • said231088
الرد
#4
ممكن توضيح اكثر لمشكلتك اخي الكريم
الرد
#5
السلام عليكم مش الحال 100% وازادكم الله علما
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم