28-03-2012, 01:08 PM
وعليكم السلام ورحمة الله وبركاته
مقتبس:
بالتوفيق.
مقتبس:
PHP كود :
Author: Thomas Stutz
{
By default, a TRichedit's text is limited to 64 KB.
Setting the Maxlength property to $7FFFFFF0 allows you to have approx.
2GB of text.
}
procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit11.MaxLength := $7FFFFFF0;
end;
//طريقة أخرى
procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage(RichEdit1.Handle, EM_EXLIMITTEXT, 0, $7FFFFFF0);
end;
اللهم احقن دماء المسلمين، لا تنسوهم بالدعاء...

