如何找出tmemo组件中的字符数？

问题描述

我要做的是创建一个按钮，该按钮将备忘录中的字符数输出到标签中

抱歉，这似乎是一个愚蠢的问题，但我仍在学习Delphi。

解决方法

最简单的方法是调用备忘录的https://api.flutter.dev/flutter/widgets/Flexible-class.html方法：

返回控件文本的长度。

procedure TForm1.Button1Click(Sender: TObject);
var
  Len: Integer;
begin
  Len := Memo1.GetTextLen;
  Label1.Caption := IntToStr(Len);
end;

,

有几种方法可以获取TMemo中文本的长度。 最快的方法是要求Windows返回长度（是Windows实现了TMemo）：

MemoLen := GetWindowTextLength(Memo1.Handle);

或

MemoLen := SendMessage(Memo1.Handle,WM_GETTEXTLENGTH,0);

另一种方法是检索备忘录的文本并查询其长度：

MemoLen := Length(Memo1.Text);