为什么我的memo只显示第一行?
procedure TMAINFORM.Button2Click(Sender: TObject); var s:string;
i:integer;
begin i:=0;
s:='催缴数据提取中...';
memo1.Lines.Strings[i]:=s;
i:=i+1;
s:='催缴数据提取成功';
memo1.Lines[i]:=s;
end;
procedure TMAINFORM.Button2Click(Sender: TObject); var s:string;
i:integer;
begin i:=0;
s:='催缴数据提取中...';
memo1.Lines.Strings[i]:=s;
i:=i+1;
s:='催缴数据提取成功';
memo1.Lines[i]:=s;
end;
解决方案 »
- Memo控件,如何删除最后一行后光标不能在移到该行。。
- 一个具备很高性价比的帖子:这样的功能好不好实现,只需要大家提供方法.
- 请教一个问题,比较简单的?
- 求助,用IdFtp如何实现下载目录功能?
- 哪有DELPHI 8 下载
- 为什么在线程中使用TCLIENTSOCKET,关闭线程时总是报错?
- 如何在KeyDown事件中判断 up 或 down 这两 个键??????????
- 请高手指点,为什么我的DLL形式的WebService调用不成功呢?
- 想玩网络游戏了..:)问大家都玩什么..
- Delphi的命名规范问题?
- 哪位做过ISAPI DLL型Webservice程序的高手,请帮忙看看我得程序出了什么问题?
- 线程需不需要释放啊
var
s:string;
begin
s:='催缴数据提取中...';
memo1.Lines.Add(S);
s:='催缴数据提取成功';
memo1.Lines.Add(S);
end;