delphi中我想把memo1的字符赋值给string类型的变量

2025-03-01 22:21:15

推荐回答（4个）

回答1：

很简单
var
i:integer;
s:string;
begin
for i:=memo1.lines.count-1 do
s:=memo1.lines[i];

end;

回答2：

这与代码有关，与控件无关
Memo1中的数据不是string，是TStrings的，
你可以转换一下，将每一行数据合并到一个string里面，用#13或#10 隔开来保持样式，原代码基本不变。

回答3：

路过看到这个问题，帮你回答一下：

var str : string ;

str := Memo1.lines.text ;

就可以了

回答4：

洁白....我本来不想回答的...好吧....我猜你昨天买的书里有这个答案...