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

بسم الله

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

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

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

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

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

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

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

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

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

والله اعلم

:D :D :D

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

اخي امير :

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

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

اخي احمد :

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

اخي سعد :

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

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

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

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

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

انتم ورايكم

شكراً Ala2 VB

بسم الله

يا اخ علاء

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

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

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

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

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

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

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

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

وشكرا

اقتباس

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

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

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

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

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

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

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

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

بسم الله

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

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

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

ما رأيكم؟؟؟

بسم الله

كلام جميل

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

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

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

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

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

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

حريف برمجة كتب:

مميزات اخرى فى السى ++ مثلا التعامل مع البت

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

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

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

اقتباس

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

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

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

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

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

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

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

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

اقتباس

أخواني دعونا نبدأ بمشروع صغير مثلا مكتبة 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)

ما رايكم ؟؟

بسم الله

اقتباس

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

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

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

اقتباس

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

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

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

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

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

وشكرا

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

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

اقتباس

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

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

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

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

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

اخي لا

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

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

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

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

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

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

بسم الله

اقتباس

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

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

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

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

ActiveX DLL دي مكتبات

ايه يارجل

اقتباس

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

ActiveX DLL دي مكتبات

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

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

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

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