我建了一个用户表,user1(id,name,password,权限)
在主窗体mainform新建记录类型变量
type
user=record //建立一个记录类型变量
id:string;
name:string;
quanxian:string;
登陆窗体里的的验证代码是
mm:=Trim(user1table.FieldValues ['password']);
If (mm=password.Text ) then
begin
Check:=True;
Mainform.user1.id :=user1table.FieldValues ['id'];
Mainform.user1.name :=user1table.FieldValues ['name'];
Mainform.user1.quanxian :=user1table.FieldValues['quanxian'];
mainform.StatusBar1.Panels [0].text:='今天日期: '+FormatDateTime('yyyy年m月d日', Date);
Mainform.StatusBar1.Panels [1].Text :='用户名称: '+mainform.user1.name+' '+'汽院信管系武玺制作';
Mainform.StatusBar1.Panels[2].Text :='用户编号: '+mainform.user1.id;
Mainform.Show ;Close;
end;
但是运行时却弹出 ‘user1table:field ’quanxian' not found‘进程终止。
请大家帮忙看下 是哪里出了问题?数据表里面明明有数据的啊
在主窗体mainform新建记录类型变量
type
user=record //建立一个记录类型变量
id:string;
name:string;
quanxian:string;
登陆窗体里的的验证代码是
mm:=Trim(user1table.FieldValues ['password']);
If (mm=password.Text ) then
begin
Check:=True;
Mainform.user1.id :=user1table.FieldValues ['id'];
Mainform.user1.name :=user1table.FieldValues ['name'];
Mainform.user1.quanxian :=user1table.FieldValues['quanxian'];
mainform.StatusBar1.Panels [0].text:='今天日期: '+FormatDateTime('yyyy年m月d日', Date);
Mainform.StatusBar1.Panels [1].Text :='用户名称: '+mainform.user1.name+' '+'汽院信管系武玺制作';
Mainform.StatusBar1.Panels[2].Text :='用户编号: '+mainform.user1.id;
Mainform.Show ;Close;
end;
但是运行时却弹出 ‘user1table:field ’quanxian' not found‘进程终止。
请大家帮忙看下 是哪里出了问题?数据表里面明明有数据的啊
就是字段找不到,错误很简单呀
user1table.FieldValues['quanxian']; 到底是quanxian?还是权限?楼主搞清楚~~
我都改成’quanxian‘了 刚测试了,但是还是通不过运行
检查下你表中有没'quanxian' 这字段,或者看 user1table看有没限制字段