سلام
چطور میشه توی یک IWmemo وقتی که خط اضافه میکنیم بصورت اتوماتیک به آخر ممو اسکرول شود و احتیاج نباشه کاربر با ماوس بره آخر ممو رو نگاه کنه.
نمایش نسخه قابل چاپ
سلام
چطور میشه توی یک IWmemo وقتی که خط اضافه میکنیم بصورت اتوماتیک به آخر ممو اسکرول شود و احتیاج نباشه کاربر با ماوس بره آخر ممو رو نگاه کنه.
سلامنقل قول:
نوشته اصلی توسط saber1366 [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
فکر میکنم این مشکلتو حل کنه
کد:with IWMemo1 do
begin
// Move to 3rd line, Character 3:
SelStart := Perform(EM_LINEINDEX, 2, 0) + 3;
IWMemo1.SelLength := 0;
Perform(EM_SCROLLCARET, 0, 0);
IWMemo1.SetFocus;
end;
ببخشید Selstart را از نوع اینتجر تعریف کردم. اما روی EM_LINEINDEX خطا میدهد!
لطفا راهنمایی کنید.
یونیت Winapi.Messages را به uses اضافه کنید.نقل قول:
نوشته اصلی توسط saber1366 [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
و کد زیر را هم اصلاح کنید
ضمنا نیازی به تعریف متغیر ندارید . selstart از خصوصیات IWMemo هستکد:with IWMemo1 do
begin
SelStart := Perform(EM_LINEINDEX, IWMemo1.Lines.Count, 0);
IWMemo1.SelLength := 0;
Perform(EM_SCROLLCARET, 0, 0);
Memo1.SetFocusIW;
نقل قول:
نوشته اصلی توسط مجید [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
ببخشید هم روی SelStart و هم روی SelLength خطا میدهد.
من از اینتراوب 14.0.32 استفاده میکنم.
حق با شماست کد بنده برای این کار مناسب نبود. حالا شما بفرمایید صورت مساله چیست. شاید راه بهتری وجود داشته باشه
صورت مساله همان برنامه چت آنلاین هست. iwmemo را گذاشتم برای نمایش متن گفتگوی دو نفر.نقل قول:
نوشته اصلی توسط مجید [برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
با نوشتن متن در یک تکست باکس در هر طرف چت و ردن کلید اینتر متن در ممو نشان داده شود. و ممو اسکرول شود پایین.
بطور ویژه از شما تشکر میکنم که جواب من را میدهید فکر کنم کسی دیگه اینجا وجود ندارد. :rolleyes:
یه نگاهی به این بنداز شاید برات مفید باشه
[برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]
البته به روش Indy هست نه اینتراوب
آقا مجید ممنون از راهنمایی هاتون
ولی به این نتیجه رسیدم از این سایت به جایی نمیرسم اصلا کسی اینجا فعالیت نمیکنه
بهترین کار اینه خودم همتم را زیاد کنم
خدانگهدار