السلام عليكم اخوتي اول موضوع لي في المنتدى وان شاء الله مايكون الاخير
برمجت الة حاسبة بسيطة ان شاء الله تعجبكم انا جديد في استخدام الدلفي لدى الكود كله كان بماتعلمته من الباسكال تقريبا
:d
و عليكم السلام و رحمة الله
بعض الملاحظات على السريع :
- يجب على اداتك ان تقبل الا الأرقام.
- عن عمل C الذي يعمل Clear لا يجب ان يخرج من الــ Edit، اضف اليه SetFocus
- تطويرها لكي تعمل مع لوحة المفاتيح تكون اسرع و افضل.
بالتوفيق ان شاء الله
Free_M كتب :[FONT=arial black]السلام عليكم اخوتي اول موضوع لي في المنتدى وان شاء الله مايكون الاخير
برمجت الة حاسبة بسيطة ان شاء الله تعجبكم انا جديد في استخدام الدلفي لدى الكود كله كان بماتعلمته من الباسكال تقريبا
:d
السلام عليكم و رحمة الله :
حبذا أخي لو أرفقت السورس ، لكي نتمكن من المساعـدة في تصحيح الأخطاء ، أو نستفيد إذا كانت هناك أفكار مستخدمة جديدة ، و لا ننسا أن الموقع تعليمي ، و ليس لتحميل البرامج ، و إلا فهناك آلات حاسبة احترافية تفي لكل غرض.
إلى جانب ملاحظات الأخ المشرف STRELiTZIA :
الفاصلة : لا تعمل الفاصلة إلا التي هي متواجدة فوق (يمين) مسطرة المسافات ، المقترنة بالتاء مربوطة و علامة الإستفهام. أما النقطة بقسم الآلة الحاسبة للوحة المفاتيح ، أو الزر ببرنامجك ، لا تعمل. في الحدث OnKeyPress للــ : Edit
كود :
if key in ['.' , ','] then
begin
key := DecimalSeparator;
end;
اجبار Edt على قبول الأرقام و الفاصلة و المسح فقط:
كود :
if not (Key in [#8, '0'..'9', DecimalSeparator]) then Key := #0;
المهم نشجع كل محاولات الأحباء و أرشدك (لأن أساتذتنا لم يتركو لنا شيئا لقوله) إلى الرابط:
http://www.delphi4arab.net/forum/showthread.php?tid=45
إقتباس :اخ STRELiTZIA : لم افهم قصدك هنا
عن عمل C الذي يعمل Clear لا يجب ان يخرج من الــ Edit، اضف اليه
عند عمل clear لــ Edit فان الــ Cursor يخرج منها و لا نستطيع الكتابة ثانية الا بعد النقر في الــ Edit مرة اخرى، عمل SetFocus لــ Edit يحل المشكل او كتابة صفر يكون افضل...
إقتباس :مبتدئ في استخدام الدلفي
مرحبا بك بيننا و ان شاء الله تفيد و تستفيد
بالتوفيق ان شاء الله
الف شكر استاذ وصلت الفكرة
راح اعيد برمجتها بهذه الافكار الجديدة وان شاء الله اوفق والجميع كذلك
free_m كتب :الف شكر استاذ وصلت الفكرة
راح اعيد برمجتها بهذه الافكار الجديدة وان شاء الله اوفق والجميع كذلك
و أنا أيضا أشكر الأستاذ نيابة عنك فهو دوما بالعون ، و أشجعك: محاولة جيدة ، لقد تخلصت من مشكلة c ، بقيت بعض الملاحظات الطفيفة التي أسلفتها في مشاركتي ، إضافة إلى ملاحظة أخرى ، أرجع عرضها إلى حين تخلصك مما طرح .
بالتوفيق .سلام .
.السلام عليكم
اخي الكريم اظن انه يمكنك الاستفادةمن السورس التالي للالة الحاسبة العلمية
هي رائعة اتمني ان تلقي نظرة علي السورس فانك حنما ستستفيد منه
وشكرا