Question

Delphi+adotable问题！

我的表定义了4个字段(姓名,性别,密码,学号)，已经导入了50多个数据；我想修改其中任意一个记录的密码，比如要修改学号('123456')的密码属性，可以用循环找到(学号='123456')，但是怎样去修改密码呢？总是出现错误，如果有谁知道ADOTable的各种属性的话，也请相告。修改密码段代码如下：
for j:=0 to i do
begin
if (Form1.ADOTable1['密码']=edit2.text) and (Form1.ADOTable1['学号']=p1)
then begin
Form1.ADOTable1.Open;
Form1.ADOTable1.Edit;
Form1.ADOTable1['密码']:=p2;
edit1.Text:='';
edit2.Text:='';
edit3.Text:='';
showmessage('修改密码成功！');
Form1.ADOTable1.Close;
Form1.ADOTable1.Open;
非常感谢！！！
我装的DELPHI 上没DataModule这个组件，应该下那个控件来安装呢？谢谢！

Answer 1

.......
Form1.ADOTable1.Open;
Form1.ADOTable1.Edit;
Form1.ADOTable1['密码']:=p2;
edit1.Text:='';
edit2.Text:='';
edit3.Text:='';
Form1.ADOTable1.Post; //注意这里，每次修改后Post才生效！
showmessage('修改密码成功！');
Form1.ADOTable1.Close;
Form1.ADOTable1.Open;
........

这样就好了，另外，不要用Form1，用Self！
=============================================
DataModule应该不算是控件，要创建一个DataModule，你点击Delphi的菜单，选择File -> New -> Data Module 即可！