![]() |
|
كيفية طبع اشياء من خلال الدلفي - نسخة قابلة للطباعة +- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum) +-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3) +--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13) +--- الموضوع : كيفية طبع اشياء من خلال الدلفي (/showthread.php?tid=115) |
كيفية طبع اشياء من خلال الدلفي - ahcene - 28-03-2008 السلام عليكم و رحمة الله تعالى و بركاته اما بعد : فبعد ان انضممت الى هذا المنتدى اطال الله عمره اردت و لو بقليل ان انقل ما تعلمته رغم انني مازلت حتى الان مبتدا في الدلفي وهذا اول موضوع لي في هذا المنتدى و هو عن كيفية طباعة نص ما و ***** ان يعجبكم . 1-ادرج زر من القائمة standard ![]() 2-و ادرج العنصر richedit من القائمة win32 ![]() 3-و كذلك ادرج العنصر print dilog من القائمة dialogue ![]() 4-سيصبح شكل الفورم الخاص بك كالتالي
كيفية طبع اشياء من خلال الدلفي - ahcene - 28-03-2008 5-افعل كما في الصورة كي يتسنى لك رؤية محرر الشيفرة بكل سهولة ![]() 6-اضف comctrls,stdctrls الى السطرuses الواقع تحت interface ![]() هنا قمنا باضافة الكلمتين الى الكلمات لان عملية الطباعة بالطابعة تحتاج هذا المعرف لتتصل بمنفذ الطابعة 7-اضغط مرة اخرى على هذا الزر كي تنتقل الى الفورم ![]() 8-الان اضغط مرتين على button1 كي تنتقل الى محرر الشيفرة تحت حدث النقر على الزر و اكتب التالي بين begin و end ![]() هنا قمت بستعمال الاداة الشرطية لأحدد للبرنامج انه اذا تم تشغيل الاداة printdialog فسيقوم بارسال النص الموجود في الريش ايديت ليطبع تحت اسم ltp1 ان شاء الله افدتكم و لو قليلا راجيا منكم دعوة صالحة ثم ردتا صارحة ثم رسالة راسخة. اخوكم ahcene المثال مع المرفقات كيفية طبع اشياء من خلال الدلفي - hisham_h_m - 16-01-2011 شكرا على المشاركة الرائعة وايضاً يمكنك اجراء الطباعة عن طريق استخدام المنهجيتين (Print.BeginDoc , Print.EndDoc) لطباعة مايحتويه اي مكون " نصي " (TEdit , DBGrid , Label , Memo) و اي نص من سلسلة نصية |