Question

怎么样初始化delphi中的TabSheet1

我做了一个Delphi7.0+SQL在做到数据录入时遇到难题了！
比如：
录入窗口TabSheet1中有几个DBEdit三个DBComboBox还有一个DBMemo1控件，请问如上几个控件里的数据怎么样才能录入到一个数据表里？？？用一个Button1控件事件来录入!请问代码怎么写???
请问在录入窗口TabSheet1中怎么样才能让DBEditDBComboBox控件中都变为默认或者就是空的!然后你就可以添加新的数据了,而不是一进入录入窗口TabSheet1中DBEditDBComboBox控件中显示旧数据记录???造成输入新数据时的不便其实我要的是录入数据初始化时DBEditDBComboBox以及DBMemo1控件都变为默认或者就是空的???

如上的录入功能代码怎么写???还有编辑???
请大侠们能给代码看看!!!最好在Button1控件的事件里来添加新的数据? 急！

Answer 1

用ADOQuery 或 ADOTable连接到数据库,生成永久字段用DataSource连接上一步的控件上,然后将你的TabSheet1中的控件的DataSoruce属性设置为这个Datasource的Name 将第一步的表Open；（可以放到窗口显示事件中，看你的选择了）在Button1控件事件来中，用ADOQuery 或 ADOTable的Append方法增加一空行，然后在在Button2控件事件来中，用ADOQuery 或 ADOTable的Post方法提交数据到数据库