السلام عليكم ... أحبكم باللّه
أريد أن أحصل على مسار ملف ما في الوندوز (وليكن على سطح المكتب مثلا") وذلك بالتأشير على الملف بالماوس .
عملت تعديل على برنامج عندي للحصول على مقبض الملف ثم مساره ولكنني لم أستطع ذلك ، فأعينوني أعانكم اللّه ، الموضوع بالنسبة لي بالغ الأهمية.
عفواً ما معني للرفع
مَا أَصَابَ مِن مُّصِيبَةٍ فِي الْأَرْضِ وَلَا فِي أَنفُسِكُمْ إِلَّا فِي كِتَابٍ مِّن قَبْلِ أَن نَّبْرَأَهَا إِنَّ ذَلِكَ عَلَى اللَّهِ يَسِيرٌ (22) لِكَيْلَا تَأْسَوْا عَلَى مَا فَاتَكُمْ وَلَا تَفْرَحُوا بِمَا آتَاكُمْ وَاللَّهُ لَا يُحِبُّ كُلَّ مُخْتَالٍ فَخُورٍ (23)
يعني أن أجعل الموضوع مرفوع في أول المنتدى عسى أحد يعرف.
للرفع......
أعرف أن السؤال صعب قليلا" ولكن أناشد عباقرة ومحترفي الفوجول في هذا المنتدى إذا كان عندهم مايجودوا به.
يا أخ عبد العزيز اليوسفي
أنا رأيت سؤالك منذ أسبوع وأرغب بالرد .. ولكنني لا أجد وقت لذلك ..
دخلنا علي الامتحانات.. والجميع مشغول ..
سأحاول أن أكتب لك مشروع علي الغد إن شاء الله
مشكور أخي مشكور Pharaonic_Guy
أنا أنتظرك خود راحتك.
مرفق المثال ..
صوره أثناء العمل
ضع في الاعتبار أنك تأتي باسم عنصر في ListView .. فقط تحتاج لروتين للتأكد من امتداد الملف..
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
مستحيل
أكثر من رائع جزاك الله كل خير
والسلام عليكم ورحمة الله وبركاته
ادعو لي بالهداية فأنا أحتاج هذا الدعاء بشدة
منتدى تصميم التطبيقات (و يشمل نظم التشغيل) و تعريبها. <<<<<<
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
بعض ردودي ومشاراكاتي في المنتدى:
1- هل تريد التحكم بجهازك كأنك محترف, ( إذاً تعال معي وتعلم الرجستري Registry ).
...|-->> فكرة عامة عن الرجستري وكيفية التعامل معه ( رقم المشاركة 1 - 4 )
...|-->> كتابة ملف رجستري
...|-->> تشغيل الرجستري دون رسائل( في الخفاء )
...|-->> بعض التحكمات التي يقدمها الرجستري
...|-->>=>> إيقاف عمل Ctrl+Alt+delete ( Task Manager )
...|-->>=>> إخفاء قائمة ملف file وبذلك لن ترى قائمة file
...|........... في مشاركة أخرى >> حتى ولو قمت بالضغط على أي ملف أو مجلد بزر الفأرة الأيمن
...|-->>=>> لإيقاف وإخفاء عمل البحث Find من على الجهاز
...|-->> بعض المعلومات التي يقدمها الرجستري
...|-->>=>> معرفة الأجهزة المتصلة بالـIDE ورقم السريال الخاص لكل جهاز
...|-->> من أحسن مواقع الرجستري
...|-->>=>> http://technet2.microsoft.com/WindowsServe...3.mspx?mfr=true
منتدى مبرمجي لغة Microsoft Visual Basic <<<<<<
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
برامج من صنعي:
1- لعبة (من صنعي ), جربها وقول رأيك
بعض ردودي ومشاراكاتي في المنتدى:
1- طريقتان لفتح ملف معين وليكن بامتداد SWF ببرنامجك [ الطريقة الأولى - الطرقة الثانية ]
2- هل تريد ألا يتحكم أحد في الجهاز غيرك؟
3- كود ايقاف عمل زر الاغلاق x بزاوية الفورم
4- عرض صورة متحركة بالكود , أي بدون استخدام أدوات
5- اجعل الـComboBox [ تنسدل - لما تكتب فيا تنسدل وتظهر الاسماء التى تبدأ بالحرف اللي كتبته فى الكومبو ]
أسئلتي في المنتدى التي تم الإجابة عليها:
1- كيف يمكن قراءة الإشارات الصوتية الخارجة من الميكروفون أو السماعات ( لرسمها أو العبث بها ) ؟ أرجو المزيد من الردود ...
أسئلتي في المنتدى التي لم يتم الإجابة عليها:
اقتباسردك يعطي حافذ للإجابة على أسئلتك
والله موديل رائعة
وجاري التجربة والبحث
مشكور أخي Pharaonic_Guy كثير الشكر وبارك الله بك وجزاك الله كل خير
بس ما أكون عطلتك عن دراستك
ولكن ألا يمكن إظهار المسار مباشرة بدون الضغط بالماوس على الملف أي فقط بالتأشير.....!!؟؟؟؟
دايما فيك الخير أخي ياسر .. وشكرا علي المرور ..
وشكر اخي عبد العزيز علي التعقيب .. والمسار لا يأتي إلا إذا كان هناك عنصر علي الأقل قمت بالتأشير عليه Selected ..
واستخدام الكيبورد أو الضغط بالماوس علي الملف يكفي لتأشيره ..
فلا داعي لتشغيل الملف إذا كنت قد أعتقدت ذلك ..
أخي الحبيب Pharaonic_Guy
أعرف أنه لا داعي لتشغيل الملف ، بل قصدي دون الضغط على الملف نهائيا" وبدون تحديد
وأنا أعرف برامج تتحسس بالمرور على الملف بدون نقر أو تحديد
وأفضل مثال هو الشاشة التوضيحية (المستطيل الأبيض المساعد) الذي يظهر فوق الملف بالتأشير فقط...جرب ذلك على ملفاتك في سطح المكتب مثلاً ،طبعاً يجب النقر على سطح المكتب أولا".
أرجو أن تكون الفكرة قد وضحت.
وملفك الذي وضعته رائع وهو في قيد التجربة والتعديل والفهم.
فإذا إستطعت إخراج أو إيجاد ذلك الكود(التأشير بالماوس) طبعاً بعد ماتخلص دراستك فأنا بالإنتظار
ومشكور مرة ثانية
الأخ الفاضل ...
بأستخدام (MS-VB 6.0)
فى الحقيقة لم أشاهد هذه المشاركة سوى اليوم بالمصادفه وأنا اتصفح المنتدى، فى أحد مشاركاتك أو ردودك، فقمت بتعديل الملف الذى أرفقه الأخ Pharaonic_Guy بحيث يساعدك على ما تريد إنجازه
شكراً
تم تعديل هذه المشاركة بواسطة Eng. Usama El-Mokadem في 25 فبراير 2007 في 06:15
Nothing is impossible, the word impossible itself says that: I M - Possible
في الحقيقة لا أعرف كيف سأشكرك أخي Eng.Usama El-Mo.. على جهدك المبذول في تعديل الملف والله يعطيك العافية والله شيىء جميل
المثال يعطي خطأ بالوندوز بالمكتبة user32 عند فتح نافذة جديدة في الوندوز ، سأحاول تعديله
الشكر مرة أخرى لصاحب المثال Pharaonic_Guy الذي ساعدني به كثيراً
مشكور ليكم اخواني الاعزاء ولكن اطلب من صاحب الموضوع بعد اذنه توضيح الغرض الي سوف يستخدمه في ذلك املا في تطوير فكرته او الارتقاء بها ومساعدته بشكل اسرع وشكرا ......
أخي Max bayne تشكر على دخولك
أنا أعمل برنامج يفتح لي ملف مساعدة (موجود بنفس مسارالملف) بنافذة صغيرة على الشاشة قبل فتح الملف أي عند التأشير عليه فقط .
وهذه الفكرة مفيدة في برامج عرض الصور قبل فتحها أو تشغيل ملف فيديو صغير قبل فتح الملف .
الأخ الفاضل ...
عبد العزيز اليوسفي كتب:المثال يعطي خطأ بالوندوز بالمكتبة user32 عند فتح نافذة جديدة في الوندوز ، سأحاول تعديله
الحقيقة أنى جربت المثال أكثر من مرة، وفتحة كثير من النوافذ، وجربت ذلك على جهاز أخر... فلم يعطى أى أخطاء، هل تكرمت بتوضيح متى يحدث الخطأ بالظبط، وما نص الرسالة التى تظهر، فقد يكون ذلك بسبب مشكلة لديك فى نسخة الويندوز التى تستخدمها وليس فى كود البرنامج
شكراً
Nothing is impossible, the word impossible itself says that: I M - Possible
مشكووووووووووووور جداً أخوى
اقتباسالحقيقة أنى جربت المثال أكثر من مرة، وفتحة كثير من النوافذ، وجربت ذلك على جهاز أخر... فلم يعطى أى أخطاء، هل تكرمت بتوضيح متى يحدث الخطأ بالظبط، وما نص الرسالة التى تظهر، فقد يكون ذلك بسبب مشكلة لديك فى نسخة الويندوز التى تستخدمها وليس فى كود البرنامج
أخي أسامة بارك الله بك وبعلمك
الخطأ المقصود هو أن البرنامج يجمد ويعطي خطأ في الوندوز وأنا قلت ذلك قبل ما أدرس الكود
فوضعت التعليمة DoEvents قبل اللوب ، فما عاد يعطي رسالة الخطأ
البرنامج يدخل في دوامة الLoop في الكود التالي وذلك عند فتح نافذة جديدة أي يصبح المتحول lSelectedItemIndex مساوياً الصفر وطبعاً اللوب سيظل شغال والبرنامج سيتوقف عن العمل لإنتهاء اللوب ولن ينتهي:
Do lSelectedItemIndex = SendMessage(hWindow, LVM_GETNEXTITEM, lSelectedItemIndex, ByVal 0) Call GetCursorPos(pt) Call ScreenToClient(hWindow, pt) rc.Left = 0 Result = WriteProcessMemory(pHandle, pMyItemRect, rc, Len(rc), 0) If SendMessage(hWindow, LVM_GETITEMRECT, lSelectedItemIndex, ByVal pMyItemRect) <> 0 Then Result = ReadProcessMemory(pHandle, pMyItemRect, rc, LenB(rc), 0) If pt.x >= rc.Left And pt.x <= rc.Right And _ pt.y >= rc.Top And pt.y <= rc.Bottom Then Exit Do End If End If DoEvents Loop Until lSelectedItemIndex = -1
فالخطأ هو لماذا تبقى الرسالة مساوية للصفر عند فتح نافذة أو بالأحرى مجلد آخر
lSelectedItemIndex = SendMessage(hWindow, LVM_GETNEXTITEM, lSelectedItemIndex, ByVal 0)
سوري يا جماعة معرفتش أكمل علشان كنت غيرت نسخة الويندوز اللي بقالها ستنين عندي لنسخة تشبه فيستا
ولقيت خطأ غبي تقريبا علي ما أتذكر بيعمل Crash للكسبلورر دي تفاصيله
---------------------------
DAX Error
---------------------------
Cannot create form. No MDI forms are currently active.
---------------------------
OK
---------------------------
لكن المهندس أسامة المتميز دائما قام بالواجب وزيادة ..
معليش أخي لا يهمك ، كلنا نخطىء
_جل الله عز وجل الذي لا يخطىء ، تبارك وتعالى على عباده كلها لا إله إلا هو العزيز الحكيم_
مشكور أنت وهو
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
