我要做这么一个程序:在窗体上添加一个button和edit,然后放置一个表单或者其他控件,在表单里输入100个(或者小于100)数据,按下按钮后把输入的值求和输出到edit,由于功能单一,不想使用数据库,而StringGrid1、DrawGrid1、DBGrid1等又没有输入焦点,不能数据输入,请问怎么解决?
解决方案 »
- 如何为外部程序的按钮添加监听事件,每次点击提交的时候把输入的信息添加到一个集合里
- 求做过工程资料管理项目的合作伙伴
- 刚学DELPHI,问几个DELPHI基本问题,欢迎来拿分
- 求廉价的联网方式
- 可以创建控件数组吗?
- 各位来看看多给点意见,更算是交朋友!
- 我用QRExpr控件计算了一个字段的和SUM(Field)!!怎样才能把这个值传给Edit控件并显示出来!!
- 请问如何给字段改名?
- 急问!!怎样对数据库进行设置才能在网络上运行我的程序?
- 如何进行十六进制数的数学运算,十六进制数变量怎麽定义,有没有进制间转换的函数?
- 如何修改报表页面设置为自定义(默认为A4)?请进来看,还有其它问题。请教!
- 高手们帮忙!(查询结果显示问题)
你放一个memo1,然后往里输入一个数据后按回车
最后button按钮中的click这么写就可以了。
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
temp:real;
tempcount:real;
begin
tempcount:=0;
for i:=0 to memo1.Lines.Count-1 do
begin
try
temp:=strtofloat(memo1.Lines.Strings[i]);
except
temp:=0;
end;
tempcount:=tempcount+temp;
end;
edit1.text:=floattostr(tempcount);end;
1、界面没有网格,不好看。
2、程序老是报错。
3、没有解决StringGrid1、DrawGrid1、DBGrid1等类似控件在不使用数据库下可以进行数据输入请帮忙解决上述三个问题,谢谢
再说它和数据库有什么关系。