高分 delphi 表格添加数据

我想做一个窗体,上面有一个表格,还有几个文本的输入框,一个按钮。我想按按钮让输入框中的内容显示在表格中,应该怎么操作啊,代码怎么写啊。不要球使用数据库就是一个简单小程序还... 我想做一个窗体,上面有一个表格,还有几个文本的输入框,一个按钮。我想按按钮 让输入框中的内容显示在表格中,应该怎么操作啊 ,代码怎么写啊。
不要球使用数据库 就是一个简单小程序 还有就是要使用什么控件 我都不会~!
展开
 我来答
天马座的流星拳
2008-06-26 · TA获得超过3157个赞
知道大有可为答主
回答量:2756
采纳率:73%
帮助的人:885万
展开全部
这个功能并不难,使用DELPHI自己的标准控件就可以实现:
先在窗口中加入Standard控件页里的TEdit三个,分别为Edit1到Edit3,再加入一个TButton,以及Additional控件页的TStringGrid;
接着就可以开始编写代码了。
双击Button,自动跳到他的OnClick事件中,写入以下代码后运行即可。
procedure TForm1.Button1Click(Sender: TObject);
begin
//StringGrid1.Cells[列号, 行号]
StringGrid1.Cells[1,1] := Edit1.Text;
StringGrid1.Cells[1,2] := Edit2.Text;
StringGrid1.Cells[1,3] := Edit3.Text;

//以下属性可以在Delphi左侧的Object Inspector窗口中修改,可以在程序运行时动态修改,更多的属性和方法你可以自己查看Delphi的帮助文件。
//StringGrid1.ColCount 表示表格里的总列数,可修改他以实现增加减少行数
//StringGrid1.RowCount 则表示表格的总行数
//StringGrid1.DefaultColWidth 表示第零列(最左边的序号列)的宽度值
//如果你肯定不使用库的话,你可能就需要自己使用二维循环来手工表格里每个CELL的值
end;
flysouls
2008-06-26 · TA获得超过1万个赞
知道大有可为答主
回答量:2583
采纳率:0%
帮助的人:541万
展开全部
Query1.open;
Query1.Append;
Query1('要存的字段').AsString:=edit1.text;
Query1.post;
前提是设置好Query1的SQL属性,在上面写select * from 表名
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
知不知道101322
2008-06-26 · TA获得超过226个赞
知道小有建树答主
回答量:257
采纳率:0%
帮助的人:195万
展开全部
是像0FFICE一样操作吗?
好象一样的。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
壬瑜qD
2008-06-26 · TA获得超过295个赞
知道小有建树答主
回答量:477
采纳率:0%
帮助的人:315万
展开全部
在Form上添加一个Button,两个Edit,一个ListView
1.将ListView控件的ViewStyle属性设置成vsReport
2.给ListView添加列:设置其Columns属性,此处添加2列
3.给Button的单击事件添加代码:
procedure TForm1.Button1Click(Sender: TObject);
var
lstItem: TListItem;
begin
lstItem := ListView1.Items.Add;
lstItem.Caption := Edit1.Text;
lstItem.SubItems.Add(Edit2.Text);
end;
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
meieieme6ede
2008-07-03 · TA获得超过315个赞
知道小有建树答主
回答量:524
采纳率:0%
帮助的人:340万
展开全部
回答者:supercc_cn - 经理 五级

正解
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式