[سوال] غیرفعال کردن اسکرول خودکار Memo ؟

[godvb]

سوال دوستان.

وقتی توی یه دونه MEMO اطلاعات درج میشه بصورت خودکار عمل اسکرول انجام میشه،و همیشه در انتهای Memo هستیم. حالا میخام این کار انجام نشه و دست خودم باشه. البته قابل ذکر توی XE3


ممنون.

[lord_viper]

بیشتر توضیح بده مهندس

[godvb]

سلام داداش، نوکرتم، خوبی تو؟


آقا نیگاه یک Memo واس لاگ گذاشتم توی برنامه ام، هروقت داده ای درج میشه توی MEMO خودش اسکرول میشه و میاد پایین.و همیشه آخرین داده های وارد شده رو نشون میده. حالا میخام این اسکرول شدن رو خودم یک گزینه بزارم یوزر خواست اسکرول بشه نخواست هم اسکرول نشه. چون پیش فرض اسکرول میشه MEMo دیگه.

[veyskarami]

کد:

procedure TForm1.Memo1Change(Sender: TObject);
begin
memo1.Lines.BeginUpdate;
SendMessage(Memo1.Handle, EM_LINESCROLL, 0,memo1.Lines.Count - (memo1.Lines.Count*2));
memo1.Lines.EndUpdate;
end;