أي سؤال بالفيجوال بيسك أنا جاهز

أخي العزيز دلفي

صحيح إنو البرنامج إللي تبرمج على الإصدار الخامس مارح يحتاج للملف إللي ذكرته بس راح يحتاج لملف إسمه msvbrun50.dll على ما أعتقد هيك إسمه بس في شغله مهمه وهيه إنو مش كل برنامج إتبرمج على الفجوال بيسك بحتاج لهاي الملفات لآنو معظم الملفات موجوده بشكل تلقائي داخل الويندوز وممكن مايحتاج برنامجك لآي ملف دي أل أل مشان يشتغل مشان هيك نصيحه من أخ لآخوانه إذا بدك تتأكد من برنامج شو محتاج لملفات إنك تشغله على أكثر من جهاز مش نازل عليه فجوال بيسك

أما السؤال الثاني فممكن إنك تشغل بروجيكت معمول على فيجوال بيسك خمسه من الإصدار سته بدون أي مشاكل وبعتقد إنو الأفضل إنك تفتح بروجكت من فيجوال سته وتستدعي الفورمات والمدييول الخاصه بالبروجكت خمسه وماتنسى تتأكد إنو الريفرانس لازم تستدعيها إذا كان في ريفرانس لآي ملف دي أل أل كنت مستخدمه

بالنسبه للديل أب للأسف بحثت عنها كثير ومع الدراسه لهذا الموضوع فعلا ماممكن تشتغل غير مع الويندوز 98 أما الإكس بي وال2000 بدها دراسه أكثر لآني إكتشفت إنهم عاملين سكيورتي عاليه وإذا لقيت الطريقه ماتنسانا لآني محتاجها :)

ومشكورين جميعا

مرحبا ...

اود ان اعرف كيف لي ان اقوم بعمل برنامج يحتوي الباتج ثم يقوم بزرعة في الجهاز الاخر .

وشكرا

أنا أريد عمل برنامج للإتصال بالإنتر نت وإليك النموذج وإريد منك أن تعلمني بالخطوات التي قمت بعملها .

ومشكوور .

اتصال.zip

عندي مشطلة محتاجة حل يا اخي

الرابظ هو:

الفريق العربي للبرمجة

إلى الأخ chess

ماتطلبه يختص بالهاكر

على كل يمكن أن تعمل برنامج وتفوم بجعله كبطاقه وترسله إلى الضحيه

والشرح يطول بهذه المسائل فإذا أردت أخبرني عن ماتريد فعله بالضحيه لآساعدك وشكرا

شكررررررررا مررررة ما قصرت :)

و الحمد لله انا فهمته .. خلاص .. بس اسلوبك مرررة غير ..

عموما مررة شكرا .. تعبتك معي ..

إلى الأخ الذي يريد إتصال عن طريق النت

في برنامج مرفق بتمنى يفي بالغرض

phone.zip

للأخت إللي بدها تغير الستينج

الموضوع أبسط مما تتصوري

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

DirectX7 For Visual Basic Type Library

في حاله مالقيتي هاد اللينك ممكن تروحي على موقع مايكروسفت أو الجوجل وتكتبي

download DirectX7

هاد الملف دي أل أل من شركة مايكروسفت يستخدم لتصميم الألعاب ومافي أحد ممكن يبرمجه لآنو من خلاله ممكن تعملي لعبه ثلاثيه الألعاب وسريعه الحركة ومن غير تعب كبير

الكود إللي رح تكتبيه

General

'هنا لتعريف ملف الدايريكت إكس مو مشكله كبيرة بتوقع سهل هاد الكود

Dim DX7 As New DirectX7

Dim DD7 As DirectDraw7

Private Sub Form_Load()

'هنا لخلق الأوبجيكت DD7

Set DD7 = DX7.DirectDrawCreate("")

'هذا السطر لجعل السيتينج يرجع إلى وضعه الطبيعي في حالة عملنا ميني مايز للفورم

'أما إذا قمنا بشطبه فإن السيتينج لن يعود إلى وضعه الطبيعي إلا بعد إغلاق البرنامج

DD7.SetCooperativeLevel Me.hWnd, DDSCL_EXCLUSIVE Or DDSCL_FULLSCREEN Or DDSCL_ALLOWREBOOT

'هنا لتغير السيتينج إلى 800-600 والألوان إلى 16بت

DD7.SetDisplayMode 800, 600, 16, 0, DDSDM_DEFAULT

End Sub

أوكى بالتوفيق والله معكم

bassam.zip

صديقي basta أنا إياس نبهان أريد أن أطلعك على هذا الخطأ :

صممت برنامج صور وجعلته يفتح صور من نم bmb gif بالإضافة لall files

فاذا وضعت له all files وحددت له كائن غير صورة يحدث خطأ فماذا أفعل .

السلام عليكم و رحمة الله و بركاتة

هل يمكن بناء القوائم من خلال الكود؟؟

اسال عن الصور بنسق gif

لما ادرجها على الفورم ما تتحرك مع انها

في الاصل متحركة ???

السلام عليكم

مشكوووووور اخوي بسام العيساوي على جهودك اللي تسويها في المنتدى وجعلها الله في موازين اعمالك واتمنى انك تقوم بمساعدتي في هذا السؤال بأسرع وقت الله يجزاك خير ويعافيك ان شاء الله

سؤالي يقول:.

طلب منك صاحب فندق تزويده ببرنامج بلغة VB6.0 ليساعده على حساب امور متعلقة بفندقه

حيث غرفة مصنفة حسب أجرة الليلة الواحدة بالريال السعودي كمايلي:

درجة أولى 2000ريال , درجة ثانية 1200 ريال , درجة ثالثة 600 ريال وزودك بالمعلومات التالية

أسماء النزلاء , أرقام غرفهم , درجة هذه الغرف والمطلوب:

-حساب عدد النزلاء الذين نزلوا في إحدى الليالي في كل درجة(اولى او ثانية او ثالثة)

-حساب المبلغ الاجمالي الذي حصل عليه الفندق في هذه الليله واطبعه في صندوق نص.

-حساب عدد النزلاء الذين حجزوا في هذه الليله في كل من الدرجات الثلاث واطبعه في صندوق نص

-طبع فورم مستقل أسماء النزلاء ,أرقام غرفهم , درجة الغرف.

توجيه: أعتبر ان عدد النزلاء غير محدد N وعرف كل المتحولات العامة التي تستخدمها في البرنامج

باستخدام المصفوفات.........

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

في مشكله بالمنتدى عند الرد

وشكرا

صديقي نبهان

يمكنك وضع هذا الكود في بدايه البروسيجر

on error goto bastr3

وقبل نهايه البروسيجر تكتب الكود التالي

exit sub 
bastr3 : 
msgbox "Error"

هذا الحل الأمثل برأيي وشكرا :)

أما الأخ ياسر فأقول له يمكن ذلك فقط إستخدم الإنديكس في المنيو وقم بتحميلها وإليك الحل التالي

عند عمل منيو قم بوضع صح عند الإنديكس وكتابه الرقم 0

وفي الكود أكتب التالي

load name_mnu(1)
name_mnu(1).caption="bastr3"

وشكرا

إلى الأخ الغالي غزوان

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

قم بتقطيع الصورة المتحركه إلى أجزاءها أو صورها الأصليه وذلك عن طريق برنامج الفلاش

ثم خزن كل صورة على حده

الآن قم بعمل مشروع جديد على الفجوال بيسك

قم بتنزيل أوبجيكت Image1

إنسخ هذا الأوبجيكت ثم ألصقه ستظهر نافذه تخبرك بأنك تريدها مصفوفه أم لا قم بالضغط على نعم

إنسخ هذه الصورة على عدد الصور التي كونتها

الآن من الخاصيه صورة picture قم باختيار الصورة واحده واحده

في الكود بعد تنزيل الأوبجيكت تايمر أكتب التالي

General 
dim I as intger

Timer_timer 
me.picture=image(i).picture
i=i+1
if i=image1.count then i=0 
end sub

نفذ المشروع وانظر النتيجه :)

إلى الأخ أبو مها

أنا قلت من الأول مابقدر أعمل مشاريع كامله إسأل سؤال وأنا بجاوبك غير هيك بكون بظلمك

من ناحيه سؤالك بدك داتا بيز وبرمجته كثير سهله ياريت تحاول بنفسك وإذا ماقدرت إسألني بشو متغلب وأنا بشرحلك إللي بدك إياه بس ماتزعل مني :)

وشكرا إلك أخوي

السلام عليكم ورحمة الله وبركاته

أتمنى أن أجد إجابة على سؤالي

كيف يمكن أن اضغط مجموعة ملفات في ملف واحد برمجياً ؟

هناك أداة اسمها ARJ على ما أعتقد ..

كيف قصدك ؟؟؟

إذا بدك تضغطي مثل برنامج

winzip,winrar

فسأقول لكي أن هذا موجود ولكن يجب دفع ثمن الكود

الكود موجود عندي وإذا كنتي محتاجه له كثيرا فسأقوم بنشره على هذا المنتدى لآنه يمكن أن يفيد أخواننا أيضا

وشكرا لكم

السلام عليكم ورحمة الله وبركاته

عندي سؤال وهو..

كيف يمكننا ترتيب البيانات في MSflexgrid>>>حيث أنني رتبت البيانات في الداتا بيس على حسب الاسم ترتيب هجائي...

ولكن في MSFlexgrid ..ظهرت لي البيانات فيها مرتبة حسب الرقم Primary key....

كيف يمكن أن أحل هذه المشكلة ؟ بمعنى أنني أريد أن أرتب البيانات في MSFlexgrid ....حسب حروف الهجاء...

فما هو الكود....ماذا استخدم..؟؟ Sort ..أو...Merge

أكتب لي الكود لو سمحت...

وشكرا........

السلام عليكم

كيف حالك أخ بسام

أريد أن أعمل نسخة احتياطية لقاعدة البيانات المستخدمة في البرنامج

بحيث يختار المستخدم المسار الذي يود أن يضع عليه النسخة الاحتياطية

فهل من مساعد؟؟؟

وجزاكم الله خيرا مقدما

إلى Hayam

إستخدم الأمر

filecopy "path 1 " , "path New "

هذا المر يعمل على نسخ الملف من المكان الذي تحدده إلى المكان الجديد

إلى Hayam

إستخدم الأمر

filecopy "path 1 " , "path New "

هذا المر يعمل على نسخ الملف من المكان الذي تحدده إلى المكان الجديد

فكرة رائعه لعمل سكينز أو شكل جميل للفورم

بهاد المثال إخترت ملف

bassam.OCX طبعا هاد الملف من برمجتي

هاد الملف لازم تعمله ريجيستر قبل تشغلي البرنامج والطريقه كالتالي

Start >> Run >> regsvr32 c:\bassam.ocx >> enter

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

bassam.ocx

وبعدين بتكبسي أوكى وبتنهي البرنامج وبتردي تشغلي المثال

هاد الكنترول الجديد بوخد ثلاث صور وهوه عباره عن كوماند بس كوماند حلو :)

وفي بالمشروع كلاس بعمل على قص الفورم للشكل إللي بدك إياه وتحريك الفورم بتمنى يعجبك الشكل أ, الستايل

مع السلامة

لتحميل البرنامج

http://www.bastr3.com/bastr3/Bassam.zip

وهذا لتحميل الكمبوننت

http://www.bastr3.com/bastr3/Dis.zip

السلام عليكم...

للأخ الكريم bastr3....تحية طيبة

لو سمحت أنت ما رديت على سؤالي الموجود بعد ردك على lamyaa....

ما أدري يمكن أنا طرحت السؤال بطريقة غير مفهومة ..أو يمكن أنت ما أنتبهت للسؤال اللي أنا حطيته...

أتمنى المساعدة والرد قريبا ...

ومشكوووووور....

كيف يمكن تشغيل برنامج ( Run) من خلال برنامجي بال VB