السلام عليكم
لو سمحتوا أخواني و أخواتي
أبغى برنامجي يكون Portable
هل توجد طريقة في الفيجوال بيسك نقدر من خلالها نسوي برنامج Portable
تحياتي لكم
السلام عليكم
لو سمحتوا أخواني و أخواتي
أبغى برنامجي يكون Portable
هل توجد طريقة في الفيجوال بيسك نقدر من خلالها نسوي برنامج Portable
تحياتي لكم
تقصد ايه بـ Portable ؟
إقرأ معى:
----
المثقفون العرب .. المزورون العرب: تأبين محمود درويش نموذجا
ماذا خسر العالم بانحطاط المسلمين ؟!! للعلامه: أبو الحسن الندوى (كتاب هام لكل مسلم).
المنهجية ومقدمات في الطلب (لطلاب العلم الشرعى)
السلام عليكم
أشكرك أخي msayed2004 على الرد :)
بالنسبة للـ Portable
أقصد أبغى يكون برنامجي فقط ملف تنفيذي exe يعني لا أريد أن يكون معاه ملفات المساعدة التابعة للفيجوال
بمفهوم آخر : أقصد أريد برنامجي يشتغل على أي جهاز بدون ما أعمل له Setup وبدون الملفات التابعة للفيجوال بيسك
فقط ملف تنفيذي لا غير exe
أتمنى وضحت لك مقصودي
وأتمنى تساعدوني ولا تبخلون علي :)
تحياتي لكم
حاول على قد ما تقدر تستعمل الـ APIs كبديل للأدوات اللى بتستعملها و خد اكواد الأدوات مفتوحة لمصدر بدل الأدوات اللى بتيجى مع الـ Visual Basic أما بالنسبة للأدوات و الملفات اللى مش هتقدر تعملها كده خزنها بالملف كـ Resources و خرجها بحدث الـ Sub_Main يعنى قبل ما تحمل اى Form يوجد مثال عن استخراج ملف من الـ Resources بالمشاركة : /index.ph...st&p=611599
إقرأ معى:
----
المثقفون العرب .. المزورون العرب: تأبين محمود درويش نموذجا
ماذا خسر العالم بانحطاط المسلمين ؟!! للعلامه: أبو الحسن الندوى (كتاب هام لكل مسلم).
المنهجية ومقدمات في الطلب (لطلاب العلم الشرعى)
ملحوظة ممكن تستخدم الكود التالى لمعرفة ان كانت مكتبة ما موجوده و معرفة بالنظام ام لا :
Private Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long Public Function ComponentExist(Component As String) As Boolean Dim Ret As Long Ret = LoadLibrary(Component) FreeLibrary Ret If Ret = 0 Then ComponentExist = False Else ComponentExist = True End If End Function
MsgBox ComponentExist ("shell32.dll")إقرأ معى:
----
المثقفون العرب .. المزورون العرب: تأبين محمود درويش نموذجا
ماذا خسر العالم بانحطاط المسلمين ؟!! للعلامه: أبو الحسن الندوى (كتاب هام لكل مسلم).
المنهجية ومقدمات في الطلب (لطلاب العلم الشرعى)
الله يجزاك خير أخي الكريم
ويجعل كل حرف كتبته في ميزان حسناتك :)
عندي استفسار بسيط لو سمحت
أنا ما أستخدمت أدوات خارجية بمعنى آخر أنا أستخدم أدوات الفيجوال القياسية الـ Command والـ Label وهكذا ..
أنا فهمت قصدك أخي الكريم
لكن أنا أود أن يكون برنامجي صغير الحجم ولا يحتاج إلى الملفات اللازمة للتشغيل هل توجد طريقة أم لا ؟؟ <<< أتوقع لا توجد :(
انت تقصد تستعنى عن الـ VB Run time file و المسمى msvbvm60.dll , طبعا لأ مش ممكن لأن البرنامج هيعتمد عليه علشان يشتغل.
هنا لازم تستعمل لغة برمجة تانية تكون نواتجها لا تعمد سوع على ملفات النظام مباشرة
إقرأ معى:
----
المثقفون العرب .. المزورون العرب: تأبين محمود درويش نموذجا
ماذا خسر العالم بانحطاط المسلمين ؟!! للعلامه: أبو الحسن الندوى (كتاب هام لكل مسلم).
المنهجية ومقدمات في الطلب (لطلاب العلم الشرعى)
الحاجة الى مش هتعرف تهرب منها مكتبة msvbvm60.dll لكن ممكن تربط الكنترولز الاساسية بمكتبة comctrl32.dll وبكدة هتستخدم الكنترولز الاساسية للنظام + انك لو شغال على اكس بى هتاخد شكلها والكود التالى يوضح طريقة الربط
Declare Sub InitCommonControls Lib "comctl32" ()
وفى الفورم انشياليز
InitCommonControls
اما اى ادوات اخرى مثل لست فيو او الادوات التى تستعمل الايكونا او الادوات الجمالية مثل البروجريس بار او اى شئ اخر فهناك الكثير منها ومفتوح المصدر فاذا وضعتة داخل المشروع على هيئة usercontrol فسيتم ترجمته مع الملف التنفيذى وتكون مدمجة داخله
اما مكتبة الفيجوال بيسيك التى بها كل الدوال التى تعمل بها فهى مجودة فى انظمة nt اما انظمة ال 9x فيمكنك كما قال محمد عملها كريسورس ويتم اخراجها من الملف التنفيزى وقت التنفيذ
نصيحتى ابتعد عن الفيجوال بيسيك لانها مبتنفعش عاده فى كدة وخليك مع السى ++
مبارك لشعب تونس ![]()
هذا الموضوع مغلق.