• 0
Ala2 VB

تطوير مكتبة DLL ذات امكانيات عالية ترفع الفاجوال بيزك من مرتبة اسوأ لغات البرمجة

سؤال

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

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

حبيت اطرح هذا الموضوع , لتطوير لغة Visual Basic بحيث مثلاً نضع فيها كائنات جديدة (مثل App , Clipbord , Err ...)

ونرفعه من مرتبة أسوأ لغة برمجة والتي يحتلها بجدارة , تحتى لغة 0 \ 1 تتفوق على VB :angry:

مثل :

Send : كائن لارسال الرسائل

System : كائن للتحكم بالنظام ومعرفة بعض المعلومات عنه

Draw : كائن خاص بالرسم الاحترافي

WEB : كائن للتعامل مع النت , كجلب بيانات من صفحات أو ارسال بيانات او احضار IP صفحة ... إلخ

Files : كائن خاص بالتعامل مع الملفات

ActiveXX : كائن لتطوير صفات لأداة موجود كتغيير استايل مربع نص , تغيير لون زر أمر ... إلخ

وهكذا

أرجو ممن يريد المشاركة انه يقول لي , محش له عذر اعتقد ان ده اسهل من عمل لغة برمجة , وان كان بداية لعملها

شكراً على وقتكم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

168 إجابة على هذا السؤال .

  • 0

بسم الله

دائما كده يا علاء مواضبعك جامدة ومثيرة

بس حابب اعلق على كلامك اللي من الواضح انك اتاثرت بكلام الاخ حريف برمجة

لغة الفيجوال بيزك مش اسوا لغة ولا حاجة بالعكس دي اكثر لغة شعبية في العالم

والموضوع برضو آراء يعني كل مبرمج وله طريقة واسلوب وبالتالي لغة تتناسب مع اسلوبه ده

اما بالنسبة لموضوعك انا عن نفسي شايف انه مثير وجميل ومش هيبقى مشكلة

يعني مثلا انت ممكن تجمع اربع او خمس دوال API او يمكن اكتر علشان تعمل وظيفة واحدة في الاخر

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

وبكده نبقى حطينا اول نقطة في التطوير اللي انت عايزه

ارجو من الله ان يكون كلامي مفيد

والله اعلم

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

:D :D :D

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

موضوع شيق ولكن سوف نحتاج إلى مصمم فوتوشوب وخبير في عمل ActiveX وخبير آخر غي عمل DLL وإن شاء الله نطور الفيجيوال ليكون في مراتب عالية بين اللغات

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي امير :

انا قصدي نعملها بنفسنا مش API ,استفدنا ايه لو عملناها API

بعدين الفاجوال بيزك الاكتر شعبية , صح .. لكنه ضعيف .. ليه ؟؟ مثلاً في السي تقدر تنشأ زر أمر مثلث , في الفاجوال يا مربع يا مستطيل ,, فهمتني

اخي احمد :

ردك قصير لكن معبر .. شكراً لك وانا فعلاً اتاثرت بكلامك لانه مقنع فعلاً

اخي سعد :

بالنسبة للفوتوشوب اعرف منتدى فيه ناس جامدة

بالنسبة للدي ال ال DLL فمبرمجين الفاجوال بيزك المحترفين يعرفوا يعملوها زي الاخ اسامة

بالنسبة للاكتيف اكس فهي خبرة زي ما انت قلت , وعندك الاخ احمد اسماعيل

ماشاء الله عليكم كلكم

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

انتم ورايكم

شكراً Ala2 VB

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بسم الله

يا اخ علاء

انا قصدي باستخدام دوال API مجرد مثال لكن ي نفس الوقت انت لوعايز تتعامل مع الويندوز هتتعامل ازاي من غيرها

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

اقولك ان كلامك من منظور ديق جدا جدا

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

وانا عن نفسي عملت زرار مدور وبستخدمه في برامجي

المشكلة مش في لغة البرمجة المشكلة في المبرمج اللي بيستخدم هذه اللغة

ولو انت او غيرك مش بتعرف تبرمج بيها متقلش انها لغة ضعيفة

لكن قول انا لا استطيع التعامل معها

وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0
المشكلة مش في لغة البرمجة المشكلة في المبرمج اللي بيستخدم هذه اللغة

ولو انت او غيرك مش بتعرف تبرمج بيها متقلش انها لغة ضعيف

صحيح و لا أقصد أهانة لأحد , شوف أبداعات اللغة دى على موقع PSC !
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اولا يا محمد اهلا بيك وحمد لله على السلامة

بالنسبة لضعف اللغة هى بتعرف تعمل حاجات كتير ومبقلش ان الواحد يرميها وشفت الى على PS2 و ال Vb accelerator

بس انا شغال فى برمجة الجرافكس مثلا والفى بى اخر اصدار تدعمه من ال Direct x هو الاصدار 8 + بطئها الشديد تعرف ان السى ++ وحدها مبتسدش فى اللمجال ده وبتحتاج اسمبلى معاها

وكمان قارن ادوات الفى بى مع ادوات السى ++ هتلاقى ان الفى بى بتاكل الذاكرة + مميزات اخرى فى السى ++ مثلا التعامل مع البت

كمان حاجة شوف اى دالة فى بى على برنامج Debugger وتلاقى الحشو الى هى عاملها

باختصار فى الكتير لكن برده مش معناه ان احنا نسيب اللغة

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بسم الله

الاخ العزيز محمد سيد انت فين يا عم من زمان وحشتنا والله

انا مش عايز اقول حاجة انا بس عايز اسلم عليك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

أخواني دعونا نبدأ بمشروع صغير مثلا مكتبة DLL بها أهم الدوال الغير موجودة مع الفيجيوال (نستطيع إنشاء دوال خاصة بنا ) و ActiveX مثلا لزر بشكل الأكس بي ومن ثم نقوم بدمج هذة الأشياء مع الفيجيوال لتحل مكان الأشياء القديمة.

ما رأيكم؟؟؟

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بسم الله

كلام جميل

بس هات مثال معين

اما عن ازرار بشكل XP دي مش مشكلة وناس كتير عملوها ومنهم الدكتور اللي كان بيديني برمجة

وانا لما اتقنت التعامل مع ActiveX عملت واحد

بس المشكلة هو استبدالها مكان القديم

على العموم طالما الفكرة قائمة هنوصل ان شاء الله

بس المهم ميبقاش الموضوع مجرد حماسة في الاول وينتهي بعد كده

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0
مميزات اخرى فى السى ++ مثلا التعامل مع البت

اوافقك على ما ذكرت باستثناء الفقرة بالاعلى . هي السي ++ تتعامل مع البت والفيجوال تتعامل مع الولد؟؟!! :) الفيبي ايضا تتعامل مع البت على ما أظن.

في الحقيقة انني عملت على الفيبي مشاريع عديدة من بينها اتصالات وتحكم و داتا بيز ولم تعيقني الا في شيئ واحد وهو عندما اردت عمل image proccessing فكانت لغة غير مناسبة وتوقفت عن الخوض فيها.

حريف برمجة يا ليت مثال على عدم قدرة البيسك على التعامل مع البت .

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

لا إن شاء الله أخي أمير ولكن نريد تفاعل

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الفكرة المطروحة جميلة جدا أنا مبرمج فيجوال بيسك و لما بقول لحدا أني مبرمج في بي بيقولي :في بي ؟؟؟؟؟!!!!!

على الرغم من أني ماحاولت أي شي إلا و مشي حالو يعني المسألة متعلقة بالمبرمج .مبرمج الفيجوال بيسك أصلا لازم يحطو على راسهم لأنو قادر على البرمجة بلغة مثل الفي بي و هي لغة سيئة (على حد تعبيرهم) . يعني إنتاج أحسن شي باستخدام أسوأ شي :D

في الحقيقة انني عملت على الفيبي مشاريع عديدة من بينها اتصالات وتحكم و داتا بيز ولم تعيقني الا في شيئ واحد وهو عندما اردت عمل image proccessing فكانت لغة غير مناسبة وتوقفت عن الخوض فيها.

أنا أوافق الأخ عماد خليل الرأي بس في Image Processing كانت في بي صعبة وفي بعض الأمور مستحيلة

و أنا جاهز للمشاركة في أي وقت تطلبوني فيه ...

تم تعديل بواسطه X-Ware
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

أي شركة أعرفها .. بأي لغة برمجة عندما يتطرق جزء من عملها لـ Image Processing فتستخدم مكتبات جاهزة ..

أخي حريف البرمجة

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

وأنا لست مع الموضوع .. لأن ليس به جديد ..مجرد تجميع لأشياء موجودة بالفعل بأكواد صغيرة ..

فالأداة ستكون حجمها كبير .. وبطيئة بشكل بشع ..

تم تعديل بواسطه Pharaonic_Guy
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0
أخواني دعونا نبدأ بمشروع صغير مثلا مكتبة DLL بها أهم الدوال الغير موجودة مع الفيجيوال (نستطيع إنشاء دوال خاصة بنا ) و ActiveX مثلا لزر بشكل الأكس بي ومن ثم نقوم بدمج هذة الأشياء مع الفيجيوال لتحل مكان الأشياء القديمة.

مضبوط اخي , كلامك جميل جداً اخي ..... هذا قصدي

وأنا لست مع الموضوع .. لأن ليس به جديد ..مجرد تجميع لأشياء موجودة بالفعل بأكواد صغيرة ..

فالأداة ستكون حجمها كبير .. وبطيئة بشكل بشع ..

مين قال نعمل اداة ؟؟

انا اقول مكتبة DLL بها دوال تساعدنا في عملنا بحيث تزيد كفائة اللغة وتسهلها

مثلاً ما نكتب الكود ده كده :

Private X(8) As Integer
Private y(8) As Integer
'Integer arrays that hold the actual 2D coordinates of the
'8 corners of the cube.These are the values used to plot
'the cube on the form after the X,Y,Z coordinates of each cube
'corner have been converted to 2 dimensinal X and Y coordinates.
Private Const Pi = 3.14159265358979
'Constant used to convert degrees to radians
Private CenterX As Integer
Private CenterY As Integer
'The center of the 3 dimensional plane,where it's
'X=0 , Y=0 , Z=0
Private Const SIZE = 250
'The length of the cube achmes,therefore also adjusts the overall size.
Private Radius As Integer
'The radius of the rotation.Each one of the 8 corners of the cube
'rotates around the vertical Y axis with the same angular speed and radius
'of rotation.
Private Angle As Integer
'The value of this variable loops from 0 to 360 and it is passed
'as an argument to the COS and SIN functions (sine and cosine)
'that return the changing Z and X coordinates of each corner
'as the cube rotates around the Y axis
Private CurX As Integer
Private CurY As Integer
'Variables that hold the current mouse position on the form.
Private CubeCorners(1 To 8, 1 To 3) As Integer
'The array that holds the X,Y and Z coordinates of the 8 corners
'The center of the 3D plane is right on the center of the cube.
'So ,if SIZE the length of one achmes,it's:
'CenterCube(1,1) = SIZE/2 ' X coordinate of 1st corner
'CenterCube(1,2) = SIZE/2 ' Y coordinate
'CenterCube(1,3) = SIZE/2 ' Z coordinate
'Actually,we only need to give a value for the Y coordinates
'of each corner since that will never change during the rotation
'as all corners rotate around the Y axis ,with only their Z and X
'coordinates changing periodically.
Private Sub Form_Load()
Me.ScaleMode = 3
Picture1.ScaleMode = 3
Timer1.Interval = 1
'Set here the cube Width and color.
Me.ForeColor = vbBlue
Me.DrawWidth = 3
Picture1.AutoRedraw = True
Show
Picture1.Height = Picture1.Width
Picture1.Move ScaleWidth / 2 - Picture1.ScaleWidth / 2, Picture1.Height
CenterX = ScaleWidth / 2
CenterY = ScaleHeight / 2
'Set the center of the 3D plane to reflect the center of the form.
Angle = 0
Radius = Sqr(2 * (SIZE / 2) ^ 2)
'Give a value to the radius of the rotation.This is
'the Pythagorean theorem that returns the length of the
'hypotenuse of a right triangle as the square root
'of the sum of the other two sides raised to the 2nd power.
CubeCorners(1, 2) = SIZE / 2
CubeCorners(2, 2) = SIZE / 2
CubeCorners(3, 2) = -SIZE / 2
CubeCorners(4, 2) = -SIZE / 2
CubeCorners(5, 2) = SIZE / 2
CubeCorners(6, 2) = SIZE / 2
CubeCorners(7, 2) = -SIZE / 2
CubeCorners(8, 2) = -SIZE / 2
'Assign a value to the Y coordinates of each cube.This
'will never change through out the rotation since the cube
'rotates around the Y axis.Play around with these if you like
'but the 3D prism will no longer resemble a cube...
End Sub

Private Sub DrawCube()
Cls
For i = 1 To 8
X(i) = CenterX + CubeCorners(i, 1) + CubeCorners(i, 3) / 8
y(i) = CenterY + CubeCorners(i, 2) + Sgn(CubeCorners(i, 2)) * CubeCorners(i, 3) / 8
'These two lines contain the algorith that converts the
'coordinates of a point on the 3D plane (x,y,z) ,into 2
'dimensional X and Y coordinates that can be used to plot
'a point on the form.Play around with the 8's and see what happens...
Next
Line (X(3), y(3))-(X(4), y(4))
Line (X(4), y(4))-(X(8), y(8))
Line (X(3), y(3))-(X(7), y(7))
Line (X(7), y(7))-(X(8), y(8))
Line (X(1), y(1))-(X(3), y(3))
Line (X(1), y(1))-(X(2), y(2))
Line (X(5), y(5))-(X(6), y(6))
Line (X(5), y(5))-(X(1), y(1))
Line (X(5), y(5))-(X(7), y(7))
Line (X(6), y(6))-(X(8), y(8))
Line (X(2), y(2))-(X(4), y(4))
Line (X(2), y(2))-(X(6), y(6))
Line (X(1), y(1))-(X(4), y(4))
Line (X(2), y(2))-(X(3), y(3))
Line (X(4), y(4))-(X(8), y(8))
Line (X(3), y(3))-(X(7), y(7))
'The plotting of the cube onto the form.
'We have to draw each achmes seperately and then
' "connect" the bottom square with the top square.
DoEvents
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, y As Single)
CurX = X
CurY = y
'Store the current position of the mouse cursor into
'the variable CurX,CurY.
End Sub

Private Sub Timer1_Timer()
Select Case CurX
Case Is > ScaleWidth / 2
Angle = Angle + Abs(CurX - ScaleWidth / 2) / 20
If Angle = 360 Then Angle = 0
Case Else
Angle = Angle - Abs(CurX - ScaleWidth / 2) / 20
If Angle = 0 Then Angle = 360
End Select
'Change the direction and the angular speed of the rotation
'according to the position of the mouse cursor.If it's near
'the left edge of the form then the rotation will be
'anti-clockwise ,it's near the right edge it will be
'clockwise. The closer to the center of the form the
'cursor is,the slower the cube rotates.
'The angular speed of the rotation is controlled by the
'pace at which 'Angle' (the value that we pass to the
'(COS and SIN functions) increases or decreases (increases
'for anti-clockwise rotation and decreases for clockwise rotation).
For i = 1 To 3 Step 2
CubeCorners(i, 3) = Radius * Cos((Angle) * Pi / 180)
CubeCorners(i, 1) = Radius * Sin((Angle) * Pi / 180)
Next
For i = 2 To 4 Step 2
CubeCorners(i, 3) = Radius * Cos((Angle + 2 * 45) * Pi / 180)
CubeCorners(i, 1) = Radius * Sin((Angle + 2 * 45) * Pi / 180)
Next
For i = 5 To 7 Step 2
CubeCorners(i, 3) = Radius * Cos((Angle + 6 * 45) * Pi / 180)
CubeCorners(i, 1) = Radius * Sin((Angle + 6 * 45) * Pi / 180)
Next
For i = 6 To 8 Step 2
CubeCorners(i, 3) = Radius * Cos((Angle + 4 * 45) * Pi / 180)
CubeCorners(i, 1) = Radius * Sin((Angle + 4 * 45) * Pi / 180)
Next
'Give the new values to the X and Z coordinates of each one
'of the 8 cube corners by using the COS and SIN mathematical
'functions.Notice that corners 1 and 3 always have the same
'X and Z coordinates, as well as 2 and 4, 5 and 7,6 & 8.
'Take a look at the little scetch on the top of the form
'to see how this is explained (imagine the cube rotating
'around the Y axis)
DrawCube
End Sub

نكتبه كده :

Paint3d ( X , Y , Z , color , type)

نستعمله كده :

Paint3d (500,300,700,vbblue,box)

ما رايكم ؟؟

تم تعديل بواسطه Ala2 VB
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بسم الله

انا اقول مكتبة DLL بها دوال تساعدنا في عملنا بحيث تزيد كفائة اللغة وتسهلها

كلام جميل يا اخ علاء وهو ده المقصود فعلا

هي هتبقى مكتبات جاهزة هتطور عمل اللغة

يعني إنتاج أحسن شي باستخدام أسوأ شي

وده بقى الكلام المظبوط

وكلامي مش موجه لحد بعينه

لو انت حاسس ان الفيجوال بيزك لغة ضعيفة او متعرفش تعمل حاجة يبقى اثبت للعالم انك مبرمج قوي وتعرف تعمل اي حاجة باللغة الضعيفة دي

اما هتقعد تتكلم وتقول مبحبهاش ولغة خنيقة ومش عارف ايه ده بقى الكلام الفاضي

وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

هوه بقي فيه فرق في سنة 2007 علي أيديكوا بين (أداة) وبين (مكتبة DLL بالفيجوال بيسيك) .. وأنا مش واخد بالي ؟

تم تعديل بواسطه Pharaonic_Guy
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بالنسبة لكلام الاخ امير , فانا اوافقه وارجو منه تسجيل دخول على الماسنجر الان

هوه بقي فيه فرق في سنة 2007 علي أيديكوا بين (أداة) وبين (مكتبة DLL بالفيجوال بيسيك) .. وأنا مش واخد بالي ؟

ايوا اخي في فرق كبير على ما اعتقد , وانا مستغرب ان انت اللي بتقول كده وارجو توضيح وجهة نظرك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يا سيدي مفيش فرق ..

ولا فيه وجهه نظر من أساسه ..

فقط أذكر إن مكتبة DLL بالفيجوال بيسيك عبارة عن أداة ACTIVEX

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي لا

دليل بسيط ان مكتبة DLL لها الامتداد .dll ,, واداة الاكتيف اكس لها الامتداد ocx

و الاكتيف اك بننشأها من خلال ActiveX control ,, والدي ال ال بننشأها من مكان تاني خالص وبتعتمد على الكلاسس

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اللي انت عايزه يا علاء والله نمشيه علشان خاطر عيونك بجد ..

بس برده يا ريت تراجع علي مفهوم الـ ActiveX ونوعية مشاريعه أو مفهوم الـ COM بصفة عامة من أي مرجع مناسب ..

ومش عايزين نطول النقاش في هذا الأمر .. لأن هذا خارج صلب الموضوع ..

تم تعديل بواسطه Pharaonic_Guy
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

صح ؟؟ شكرا على مرورك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بسم الله

هوه بقي فيه فرق في سنة 2007 علي أيديكوا بين (أداة) وبين (مكتبة DLL بالفيجوال بيسيك) .. وأنا مش واخد بالي ؟

ايه الكلام الغريب ده :^)

ايه يا عم انت اول مره تشتغل بالفيجوال ولا ايه

ActiveX Control دي ادوات فيجوال

ActiveX DLL دي مكتبات

ايه يارجل

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0
ActiveX Control دي ادوات فيجوال

ActiveX DLL دي مكتبات

ونعم الاختلاف فعلا .. :s

يعني كلمة أداة بقت خلاص لبست في أداة ActiveX Control ..

وبقت من الكلمات المحرمة خلاص أننا نقول أداة ActiveX DLL ..

مش لاقي حاجة أقولهالك غير عليك بقاموس مختار الصحاح .. باب البرمجيات .. جزء الأدوات ..

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

انتو بتتخانقو على ايه ؟؟

ده مش الموضوع

من الآخر ... اللي عاوز يشارك يتفضل يعمل اللي يقدر عليه

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
زوار
This topic is now closed to further replies.

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .