Question

delphi7 读取 memo1 中的字符串,按行分割,每隔5秒弹出弹出 每行的字符串内容

memo1 中的字符串
第 1个 5秒弹出
第 2个 5秒弹出
第 N个 5秒弹出

怎样将memo1中的代码取出,并按每一行分割,没相隔5秒 弹出一个Showmessage(第1个5秒弹出的内容)

Answer 1

可以同timer控件，定时5秒执行，也可以采用楼上的方法

Answer 2

使用timer控件吧.使用循环会使窗体假死的

Answer 3

for i := 0 to memo1.lines.count -1 do
begin
showmessage(memo1.lines.Strings[i]);
sleep(5000);
end;