var a:real;
b:real;
begin
a:=strtofloat(edit1.text);
b:=(2.05*a);
memo1.lines.text:=floattostr(b);
每次我输入一个数memo1中在第一行显示,就把以前的覆盖了!
我想在memo1中达成一竖排。
b:real;
begin
a:=strtofloat(edit1.text);
b:=(2.05*a);
memo1.lines.text:=floattostr(b);
每次我输入一个数memo1中在第一行显示,就把以前的覆盖了!
我想在memo1中达成一竖排。
解决方案 »
- D6/D7中添加ActiveX控件TRealAudio,播放在线视频报Floating point division by zero
- 高分求解[如何在StringGrid中加上行字段和列行号] 最好加上实例代码
- 字符串函数问题,帮帮忙。
- 编一个CHM类型的程序。需要什么知识
- Printer与窗体控件位置
- 静儿有delphi问题需要帮助QQ:9813117
- cxgrid里,怎么样使当鼠标点了一下后处于选 中状态,再点一下后处于编辑状态,就跟dbgrid一样的效果?
- HELP!!光标在edit时,按下enter触发事件?
- 如何使button根据edit的内容改变enable属性
- 在DELPHI中如何实现编程播放DVD
- 如何操作excel中的纪录?高分相送!!!
- 请教ADO连接问题!
如果是,只要把 memo1.lines.text:=floattostr(b);
换成 memo1.Lines.Add(floattostr(b));
就可以了
memo1.Lines.Strings[]才是lines里面每一行的值。
要往链尾追加行,要用memo1.Lines.Add(str)