PDA

View Full Version : مبتدی: اسکرول در edit


tomalaki
جمعه 11 اسفند 1391, 20:24 عصر
سلام. چطور میشه توی ادیت باکس اسکرول ایجاد کنی؟ یا اینکه وقتی محتوای یک ادیتباکس بیشتر از طول ادیت باکس میشه، کلمات جدید توی خط جدید وارد بشه.
عقاب سیاه
جمعه 11 اسفند 1391, 20:36 عصر
درود از memo استفاده کنید.
tomalaki
جمعه 11 اسفند 1391, 23:03 عصر
چطور میشه توی ممو همه رو توی یک خط وارد کرد؟ مثلا با فشردن دکمه کلمه جدید نره سطر بعد.
ممنون.
tomalaki
جمعه 11 اسفند 1391, 23:32 عصر
چطور میشه توی ممو همه رو توی یک خط وارد کرد؟ مثلا با فشردن دکمه کلمه جدید نره سطر بعد.
ممنون.
خودم یه راهی کشف کردم:
memo1.text:=memo1.text+edit1.text
عقاب سیاه
جمعه 11 اسفند 1391, 23:36 عصر
چطور میشه توی ممو همه رو توی یک خط وارد کرد؟ مثلا با فشردن دکمه کلمه جدید نره سطر بعد.
ممنون.

خواهش می کنم
با زدن enter یا رسیدن خط به انتهای طول ممو؟
Mask
شنبه 12 اسفند 1391, 11:12 صبح
البته خاصیت ScrollBars رو بر روی ssHorizontal قرار بدید.
khorsandreza
شنبه 12 اسفند 1391, 22:07 عصر
در رویداد memo دستور زیر را قرار دهید تا کلید Entrt غیر فعال شود و صرفا در یک سطر دریافت کند و یا تعداد طول کاراکترهار را محدود کن

if (Key = #13) then
Begin
Key := #0;
DBMemo3.SetFocus;

End;