msayed2004

أخ Ben_Laiid أعتقد أن البرنامج مصمم بالـ Classic VB و هو لأجهزة الحاسب العادية.

شكرا على البرنامج لكن أقل فترة للبحث هى ساعة و ده وقت كبير جدا , يا سلام لو فيه خيار للدقائق.

Add a Button to Internet Explorer

مفيش طريقة معينة , كل ما عليك هو أنك تحط ملفات الأداة بمشروعك زى بالضبط ما بتضيف Module ما من مشروع آخر و هتلاقى أيقونة الأداة ظهرت فى الـ Tool Box أستعملها عادى.

خليه زى كده : "C:\MyFile.exe" /IDE

الكود بتاعى اللى فوق نفذة بس بدون كتابة IDE فى الـ Command Line أعمل EXE و بعدين من Run ناديه مرتين بأفتراض انه C:\MyFile.exe الأول نفس المسار اللى فوق و التانية : C:\MyFile.exe /IDE و شوف الفرق بنفسك

لم أرى بالسؤال جزء : الفكرة زى ما الأخوة قالوا فى الـ Command Line , فى طريقتك لتشغيل البرنامج مع بداية النظام نادى البرنامج و مرر ليه الـ Command Lines بتاعتك.

يا أختى الفاضلة , للمنتدى قواعد يرجى مراجعتها : قواعد المنتدى . و منها وضع الأسئلة بأماكنها الصحيحة بعد البحث و أعطاء الموضوع عنوان مناسب و وصف مفصل للمطلوب و ............... أن كنتى عايزة تربطى الكمبيوتر و الموبايل و تبرمجى شئ بالخصوص ده أبحثى الأول و أن مفيش…

تفضل : CandyButtonsActiveX__Binary_.rar رغم أنى مصر على أن لاداعى لأستخدامها كـ OCX :rolleyes: سبحان الله أداة مفتوحة المصدر نقفلها ليه :unsure: :huh: :angry: ؟ و نرجع نعيب على الـ Classic VB كترة ملفاته :lol: !

عندى ليك كلمة , لو هتزعل لا تقرئها , لو هتاخذها كنصيحة , أسحب بالماوس على السطر التالى : و طبعا ممكن تستخدم الـ DX

موضوع بسيط جدا. أعمل مشروع فيه 2 فورم , واحدة Form1 و التانية Form2 أضف Module و ضع الكود التالى فيه : Private Sub Main() If Command$ = "IDE" Then Form1.Show Else Form2.Show End If End Sub من قائمة Project أختر Properties , أجعل الـ Start Up object على Sub Mai…

الأداة مرفقة , لاحظ أن Steve صاحبها لم يكملها , و مش هو اللى عملها فى مشروع لوحدها , لكن كـ Slider عادى هتشتغل , تقدر تضيف لها اللى أنت عايزة. VB6_Slider__vbalSlider_.rar

ايه يا عم كل المرفقات دى :blink: ! أنت داخل مسابقة :lol: ! مرفق مثال لأستخراج الـ Flash من الـ Resources : Flash_From_Resources.rar و يا ريت تراجع شرح المهندس أسامة تانى ;) .

واضح أنك أخترت موضوع شرحها غلط. تفضل هنا : ممكن طريقة دمج ملف صوتي بالمشروع

فى لأداة Slider مفتوحة المصدر على vbAccelerator.com

هل وضعتى الكود دون قرائته ؟ الجزء الأول من الكود لتفريغ الملف و الثانى فكرة أعادة ملئه و ليس كود كامل ! كل الخطوط الخضراء دى مش باينة عندك و لا ايه ؟!

بحدث الـ Unload زى ما أنا حاطط ;) بالمناسبة قد تكون فى حلول أفضل لكن حاليا أنا شبه نائم , أو التعبيرر الصح غائب عن الوعى :lol: .

ممكن فكرة كـ : Private Sub Form_Unload(Cancel As Integer) Dim FF As Integer FF = FreeFile() 'Assume That The File path is C:\MyFile.txt Open "C:\MyFile.txt" For Output As #FF 'Nothing here , we need to clear that file. Close #FF FF = FreeFile() Open "C:\MyFile…

مش واضح على الأطلاق ! كان ممكن ببساطة تقول من الأول تغيير أيقونات الـ Nodes بتاعة أداة الـ Tree View ضع أداة Imagelist و فيها الصور اللى أنت عايزها. من نافذة الخصائص بتاعة الـ Tree View و فى خاصية ImageList أختر أسم الـ ImageList اللى أنت حاطيت فيها الصور. لما…

فهمت , فكل سطر به أكتر من بيان , لكن ليه ملاحظة و هيه أن الأعتماد على قواعد البيانات هيكون أفضل من الطريقة دى و لا ايه رأيك ؟!