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

برنامج رسم الصور

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

بسم الله الرحمن الرحيم

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

شباب انا الاحظ انكم اتصممون برامج كبيرة وتتركون تصميم البرامج الصغيرة

اريد ان تصمموا برنامج صغير وهو

برنامج رسم صغير جدا جدا جدا

فقط يرسم خط مستقيم (عادي) ويقدر المستخدم البرنامج ان يضع صورة ويرسم عليها ويحفظها

بأمتداد (BMP,JPG,GIf)

ممكن ارجوكم لكي اكمل مافعلت

#2

اريد

برنامج رسم صغير جدا جدا جدا

فقط يرسم خط مستقيم (عادي) ويقدر المستخدم البرنامج ان يضع صورة ويرسم عليها ويحفظها

بأمتدادات (BMP,JPG,GIf)

ممكن ارجوكم لكي اكمل مافعلت

#3

أرجوكم يا شباب البرمجه

اريد

برنامج رسم صغير جدا جدا جدا

فقط يرسم خط مستقيم (عادي) ويقدر المستخدم البرنامج ان يضع صورة ويرسم عليها ويحفظها

بأمتدادات (BMP,JPG,GIf)

ممكن ارجوكم لكي اكمل مافعلت

#4

ياشباب اريد برنامج رسم صغير جدا جدا جدا

فقط يرسم مربع ودائرة و يرسم خط ويقدر المستخدم البرنامج ان يضع صورة ويرسم عليها ويحفظها ويكتب عليها

بأمتدادات (BMP,JPG,GIf)

#5

ارجوكم

#6

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

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

اوجه هذا الكلام الى نفسي قبل ان اوجهه الى بقية الاعضاء

تم تعديل هذه المشاركة بواسطة i1982 في 30 مايو 2005 في 07:41

#7

مشكور اخوي على الرد

شباب مااحد يسويه لي لأكمل مابتدائت

#8

هذا برنامج رسم حر فقط بدون دوائر و خطوط لإظهار الفكرة الاساسية فقط ويحفظ الملف على ال c:\vb_phot.bmp بامتداد bmp اما ال تحويل الى jpg فهو صعب جدا حتى ان هذا الكود كود تجارى ولم يتم طرحه للاستخدام المجانى الا من خلال ملف dll

اما الان ادرجى picturebox و command button مع هذا الكود

Dim Down As Boolean
Dim oldX As Integer
Dim oldY As Integer

Private Sub Command1_Click()
SavePicture Picture1.Image, "C:\VB_PHOTO.bmp"
End Sub

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Down = True
End Sub
Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Down = False
End Sub
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Down = True Then
Picture1.Line (X, Y)-(oldX, oldY), 4
End If
oldX = X
oldY = Y
End Sub

1- لا خير في حسن الجسوم وطولها إن لم يزن حسن الجسوم عقول

2- لا تنظر إلى صغر الخطيئة .. ولكن انظر إلى عظم من عصيت

3- قد يجمع المال غير آكله . . ويأكل المال غير من جمعه

4- من وثق بالله أغناه ومن توكل عليه كفاه ومن خافه قلت مخافته ومن عرفه تمت معرفته

5- أن تضيء شمعة صغيرة خير لك من أن تنفق عمرك تلعن الظلام

6- لا يحزنك إنك فشلت مادمت تحاول الوقوف على قدميك من جديد

7- صديقك من يصارحك بأخطائك لا من يجملها ليكسب رضاءك

8 - الابتسامة كلمة طيبة بغير حروف

9- لا داعى للخوف من صوت الرصاص .. فالرصاصة التى تقتلك لن تسمع صوتها

10 -- يستطيع الناس أن يعيشوا بلا هواء بضع دقائق وبلا ماء أسبوعين وبلا

طعام حوالى شهرين وبلا أفكار سنوات لا حصر لها

من مواضيعى :

--------------

دروس تعلم كيف تصحح أخطائك بنفسك

برنامج الحائط النارى العربى ---- جديد

برنامج ساعة بالعقارب ------ جديد

لعبة سناك الشهيرة مع الكود

غير نظرتك لل picturebox وانظر ماذا فعلت بها

حمل ملف فلاش على الفورم بكل سهولة

مكتبة تحتوى على 50000 كتاب مجانى معظمها عن الكمبيوتر و البرمجة

برنامج المترجم العربى لترجمة الافلام

#9

الله يوفقك دنيا وأخره

انت علمتني وعلمت اي شخص دخل المنتدى انت مبرمج ممتاز وانت طبيبتك فوق الحدود

بس : ابي يكتب على الصورة اهم شي

#10

أينكم يامبرمجيييييييييييين العرب

أينكم ياGhost2010 و Bashamohnds و BV_ROCKET

أريده ضروري

والله يوفقكم

#11

شيبتوا براسي ارجوكم اريد

ياشباب اريد برنامج رسم صغير جدا جدا جدا

فقط يرسم مربع ودائرة و يرسم خط ويقدر المستخدم البرنامج ان يضع صورة ويرسم عليها ويكتب عليها ويحفظها ويكتب عليها

بأمتدادات (BMP,JPG,GIf)

#12
Private Sub Command1_Click()
'طباعة دائرة
Picture1.Circle (500, 500), 500
'طباعة مربع
Picture1.Line (500, 500)-(1000, 1000), 4, B
'طباعة خط
Picture1.Line (500, 500)-(1000, 1000), 4
'ضبط مكان ولون الكتابة
Picture1.CurrentX = 500
Picture1.CurrentY = 500
Picture1.ForeColor = vbRed
'طباعة الكتابة
Picture1.Print "بنت البرمجة"
End Sub

1- لا خير في حسن الجسوم وطولها إن لم يزن حسن الجسوم عقول

2- لا تنظر إلى صغر الخطيئة .. ولكن انظر إلى عظم من عصيت

3- قد يجمع المال غير آكله . . ويأكل المال غير من جمعه

4- من وثق بالله أغناه ومن توكل عليه كفاه ومن خافه قلت مخافته ومن عرفه تمت معرفته

5- أن تضيء شمعة صغيرة خير لك من أن تنفق عمرك تلعن الظلام

6- لا يحزنك إنك فشلت مادمت تحاول الوقوف على قدميك من جديد

7- صديقك من يصارحك بأخطائك لا من يجملها ليكسب رضاءك

8 - الابتسامة كلمة طيبة بغير حروف

9- لا داعى للخوف من صوت الرصاص .. فالرصاصة التى تقتلك لن تسمع صوتها

10 -- يستطيع الناس أن يعيشوا بلا هواء بضع دقائق وبلا ماء أسبوعين وبلا

طعام حوالى شهرين وبلا أفكار سنوات لا حصر لها

من مواضيعى :

--------------

دروس تعلم كيف تصحح أخطائك بنفسك

برنامج الحائط النارى العربى ---- جديد

برنامج ساعة بالعقارب ------ جديد

لعبة سناك الشهيرة مع الكود

غير نظرتك لل picturebox وانظر ماذا فعلت بها

حمل ملف فلاش على الفورم بكل سهولة

مكتبة تحتوى على 50000 كتاب مجانى معظمها عن الكمبيوتر و البرمجة

برنامج المترجم العربى لترجمة الافلام

#13

مشكور انت المنقذ ولكن اريد الحفظ الحفظ على امتداد (bmp)

مشكور وفقك الله

الحفظ

#14
SavePicture Picture1.Image, "C:\VB_PHOTO.bmp"

1- لا خير في حسن الجسوم وطولها إن لم يزن حسن الجسوم عقول

2- لا تنظر إلى صغر الخطيئة .. ولكن انظر إلى عظم من عصيت

3- قد يجمع المال غير آكله . . ويأكل المال غير من جمعه

4- من وثق بالله أغناه ومن توكل عليه كفاه ومن خافه قلت مخافته ومن عرفه تمت معرفته

5- أن تضيء شمعة صغيرة خير لك من أن تنفق عمرك تلعن الظلام

6- لا يحزنك إنك فشلت مادمت تحاول الوقوف على قدميك من جديد

7- صديقك من يصارحك بأخطائك لا من يجملها ليكسب رضاءك

8 - الابتسامة كلمة طيبة بغير حروف

9- لا داعى للخوف من صوت الرصاص .. فالرصاصة التى تقتلك لن تسمع صوتها

10 -- يستطيع الناس أن يعيشوا بلا هواء بضع دقائق وبلا ماء أسبوعين وبلا

طعام حوالى شهرين وبلا أفكار سنوات لا حصر لها

من مواضيعى :

--------------

دروس تعلم كيف تصحح أخطائك بنفسك

برنامج الحائط النارى العربى ---- جديد

برنامج ساعة بالعقارب ------ جديد

لعبة سناك الشهيرة مع الكود

غير نظرتك لل picturebox وانظر ماذا فعلت بها

حمل ملف فلاش على الفورم بكل سهولة

مكتبة تحتوى على 50000 كتاب مجانى معظمها عن الكمبيوتر و البرمجة

برنامج المترجم العربى لترجمة الافلام

#15

مشكورررررررررررررررررررررر وفقك الله (المنقذ) VB_ROCKET

بس الكتابه موقعها بال Picture محدد اريد مستخدم برنامجي هو الذي يحدد المكان ممكن يالمنقذ

والمربع مكانه محدد

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

ارجوك

#16

مشكورررررررررررررررررررررر وفقك الله (المنقذ) VB_ROCKET

بس الكتابه موقعها بال Picture محدد اريد مستخدم برنامجي هو الذي يحدد المكان ممكن يالمنقذ

والمربع مكانه محدد

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

ارجوك

باشا مهندس VB_ROCKET و بلال

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

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