delphi4arab منتديات دلفي للعرب
كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3 - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3 (/showthread.php?tid=3754)



كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3 - hifi2037 - 04-01-2012

السلام عليكم و رحمة الله
كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3


كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3 - paix144 - 04-01-2012

و عليكم السلام ورحمة الله
مرحبا بك في المنتدى أخي
بالطبع أخي، في الحدث OnChange ل TMemo
كود :
procedure TForm1.Memo1Change(Sender: TObject); const MaxLine = 5; begin if Memo1.Lines.Count > MaxLine then Memo1.Perform(EM_UNDO, 0, 0); Memo1.Perform(EM_EMPTYUNDOBUFFER, 0, 0); end;



كيف كتابة عدة اسطر في memo و تحديد هذا العدد مثلا ب 3 - hifi2037 - 04-01-2012

شكرا اخي بارك الله فيك