关于RICHEDIT！！！！简单问题！快来拿分！

Question

Length()Length(RichEdit.Lines.Text)OnChange里处理RichEdit.Lines.Count

Answer 1

1. length()
2. length(RichEdit.lines.text)
3. 列数还是行数？？？行数为RichEdit.Lines.Count！

Answer 2

建议使用LENGTH（WIDESTRING（TEXT））；否则，一个汉字会被当作两个字符！！

Answer 3

//包括#13#10procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
  L: Integer;
begin
  L := Length(RichEdit1.Lines.Text); //字符个数
  I := Length(WideString(RichEdit1.Lines.Text)); //双字节字符个数
  ShowMessage(Format('普通字符:%d(个);汉字字符:%d', [I - L + I, L - I]));
end;

Answer 4

No.3procedure TForm1.RichEdit1Change(Sender: TObject);
begin
  //RichEdit1.Lines.Count
end;