delphi4arab منتديات دلفي للعرب

السلام عليكم اعضاء المنتدي

هل يوجد امر في الدلفي بمكنك من قراءة مجلد به صور ومخزن برقم الصورة الموجودة في الجدول بحيث ان تبحث عن رقم الزبون تظهر صورته بدون ان تكون قد خزنت صورته علي الجدول لكي احاغظ علي مساحة القاعدة لان البيانات كثيرة بل علي القرص 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ثم ان الكلمة الموجودة في اخر الامر
لقد كتبتها والغيتها فلم افلح الرجاء مساعدتي

السلام عليكم
تخزين الصور بقاعدة البيانات / Paradox
التعامل مع المسارات في قواعد البيانات الجزء الأول
....
بالتوفيق,,

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

كود :
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')

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

ممكن توضيح اكثر لمشكلتك اخي الكريم

السلام عليكم مش الحال 100% وازادكم الله علما

احمد

TF6M

you_per7

محمد الدرة

احمد