الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

معاينة الصورة في نافذه المعاينة للويندز

مغلق
بدأه vBsQ في 4 مايو 2005 · 5 رد · 642 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

عندي قاعدةبيانات مخزن فيها صور

وعندي قائمة منسدلةفيها الأرقام التسلسلية لهذه الصور

أريد عند الضغط على هذا الرقم الخاص بالصورة من القائمة المنسدلة

تظهر الصورة كمعاينة في نافذة المعاينة الخاصة بالويندز اكس بي

أرجو أن تجاوبوني ولا تهملوني لأني ..

سمعت الكثير عن هذا المنتدى وعن أعضاءه ومشرفيه المتميزين

#2

السلام عليكم

أخي العزيز من اجل فعل ما تريد يجب عليك الأستعانة بال API

ShellExecute

و ذلك بالطريقة التالية :

أكتب هذا السطر في منطقة General:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOW = 5

و هذا السطر في بوتن مثلا :

ShellExecute hwnd, "open", "c:\xxx.jpg", 0, 0, SW_SHOW

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

أه قبل ان أنسى هذه الدالة تمكنك ليس فقط من فتح الصور بل كل البرامج بكل الأمتدادات

و السلام عليكم

#3

شاكرلك أخ crazy-man

الكود شغال والحمدالله

طيب لو أبغى أطبع كل الصور الموجوده في مجلد معين أو بعضا منها على سبيل المثال المجلد

يحوي a1 , a2 , a3 و d1 , d2 ,d3

وأردت طباعة الصور التي تبدء بحرف a كلها بدون ما استعرضها .. بضغطت زر .. كيف يتم ذلك

#4

اخ crazy-man

أبغى اطبق الكود السابق على هذا المثال المرفق

اقتباس
أكتب هذا السطر في منطقة General:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Const SW_SHOW = 5

و هذا السطر في بوتن مثلا :

ShellExecute hwnd, "open", "c:\xxx.jpg", 0, 0, SW_SHOW

علما بأن الصور تخزن في قاعدة البيانات كمرفق ثنائي

فكيف يمكن الاستفادة من الكود على هذا المرفق

في الانتظار .......

PicInDatabase.zip

#5

Up

#6

Up

هذا الموضوع مغلق.

مواضيع مشابهة