易截截图软件、单文件、免安装、纯绿色、仅160KB

求助Delphi编程

想实现用窗口显示一个变量的值: 这个变量值会变的, 第一行显示第一个变量的值,如果变量有变化时,再在第二行显示变化后的值,依此第三行,第四行...显示该变量值。感激不尽!
你的所有变量应该是存储在数据库或者某个ini/txt中吧。
Delphi(Pascal) code:

adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select 姓名 from 用户清单 where 用户编号='''+edit1.Text+'''');
adoquery1.Open;
edit2.Text:=adoquery1.fieldbyname('姓名').AsString;
//其余变量以此类推


不知道是不是你的要求


memo1.lines.add('var1='+sdata1);

memo1.lines.savetofile(FileName);

2L给的方法就不错.

用listbox

谢谢各位的回答,让我增长了Dephi的认识。分太少,所以就只给2楼啦。呵呵。


相关问答:

这个SQL语句有什么问题? - Delphi / 非技术区

select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )

开盘价比收盘价低两分以下的情况

Mark!!!!!!

se ......

xml创建后如何销毁? - Delphi / 网络通信/分布式开发

xml := CreateOleObject('Microsoft.XMLHTTP');
  xml.Open('GET','http://www.google.com', False);
  xml.Send;
  xml.responseText;
使用xml.responseText可以获取网页源码,但是再次 ......

关于Delphi IXMLDOMNodeList 保存

var
FXmlDoc:IXMLDomDocument;
begin
使用FXmlDoc.save('文件路径');
结果发现保存后的该文件中文全部为乱码,如何解决
end;
参考这个
http://blog.csdn.net/jiangnanandi/archive/2008/11/28/3399804.aspx ......

delphi动态数组指针问题

就一个button事件
procedure TForm1.btn7Click(Sender: TObject);
Type
  TMyArr = array of array of array of Integer; {定义一个三维动态数组类型}
  Pint = ^TMyArr;
var
  PArr: Pint; ......

请教关于delphi命名管道的问题

下面是网上找的一个事例,但在本机报错.
请教下错误原因,或者给另外的事例更好!谢谢
//Server
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Form ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号