اسکرول اتوماتیک در memo در اینتراوب

[saber1366]

سلام
چطور میشه توی یک IWmemo وقتی که خط اضافه میکنیم بصورت اتوماتیک به آخر ممو اسکرول شود و احتیاج نباشه کاربر با ماوس بره آخر ممو رو نگاه کنه.

[مجید]

سلام
چطور میشه توی یک IWmemo وقتی که خط اضافه میکنیم بصورت اتوماتیک به آخر ممو اسکرول شود و احتیاج نباشه کاربر با ماوس بره آخر ممو رو نگاه کنه.

سلام
فکر میکنم این مشکلتو حل کنه

  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;

[saber1366]

ببخشید Selstart را از نوع اینتجر تعریف کردم. اما روی EM_LINEINDEX خطا میدهد!
لطفا راهنمایی کنید.

[مجید]

ببخشید Selstart را از نوع اینتجر تعریف کردم. اما روی EM_LINEINDEX خطا میدهد!
لطفا راهنمایی کنید.

یونیت Winapi.Messages را به uses اضافه کنید.

و کد زیر را هم اصلاح کنید

  with IWMemo1 do
  begin
    SelStart := Perform(EM_LINEINDEX, IWMemo1.Lines.Count, 0);
    IWMemo1.SelLength := 0;
    Perform(EM_SCROLLCARET, 0, 0);
    Memo1.SetFocusIW;

ضمنا نیازی به تعریف متغیر ندارید . selstart از خصوصیات IWMemo هست

[saber1366]

یونیت Winapi.Messages را به uses اضافه کنید.

و کد زیر را هم اصلاح کنید

  with IWMemo1 do
  begin
    SelStart := Perform(EM_LINEINDEX, IWMemo1.Lines.Count, 0);
    IWMemo1.SelLength := 0;
    Perform(EM_SCROLLCARET, 0, 0);
    Memo1.SetFocusIW;

ضمنا نیازی به تعریف متغیر ندارید . selstart از خصوصیات IWMemo هست

ببخشید هم روی SelStart و هم روی SelLength خطا میدهد.
من از اینتراوب 14.0.32 استفاده میکنم.

[مجید]

حق با شماست کد بنده برای این کار مناسب نبود. حالا شما بفرمایید صورت مساله چیست. شاید راه بهتری وجود داشته باشه

[saber1366]

حق با شماست کد بنده برای این کار مناسب نبود. حالا شما بفرمایید صورت مساله چیست. شاید راه بهتری وجود داشته باشه

صورت مساله همان برنامه چت آنلاین هست. iwmemo را گذاشتم برای نمایش متن گفتگوی دو نفر.
با نوشتن متن در یک تکست باکس در هر طرف چت و ردن کلید اینتر متن در ممو نشان داده شود. و ممو اسکرول شود پایین.
بطور ویژه از شما تشکر میکنم که جواب من را میدهید فکر کنم کسی دیگه اینجا وجود ندارد.

[مجید]

یه نگاهی به این بنداز شاید برات مفید باشه
[برای مشاهده لینک ها شما باید عضو سایت باشید برای عضویت در سایت بر روی اینجا کلیک بکنید]

البته به روش Indy هست نه اینتراوب

[saber1366]

آقا مجید ممنون از راهنمایی هاتون
ولی به این نتیجه رسیدم از این سایت به جایی نمیرسم اصلا کسی اینجا فعالیت نمیکنه
بهترین کار اینه خودم همتم را زیاد کنم
خدانگهدار