delphi的Tmemo组件问题

Posted 2023-05-15

我想在程序中数出当前Tmemo组件中文本行数，查资料好想用lines属性，但没例程，请高手帮忙给个历程，并告诉我得出的行数是什么类型数据，后面的程序要用这个数，谢谢。
还有一个小问题，delphi中string和Tstring类有什么区别？

文本行数=Memo1.Lines.Count 整数型

string是字符串类型
TStrings类可以理解为多个string按行顺序排列的数组，每行Lines[i]就是一个string字符串，数组下标为行号，从0到Memo1.Lines.Count-1 参考技术A lines.count

delphi createForm 作用

createForm可以创建任何TComponent派生的类对象，因此我们可以使用它创建任何的VCL组件，例如下面的程序

 

procedure TForm6.btn1Click(Sender: TObject);
var
ameno: TMemo;
begin
Application.CreateForm(TMemo, ameno);
ameno.Parent := Self;
ameno.Lines.Add(‘3333333333333333333333333333333333333‘);
ameno.Show;
end;