B
bill_max
Unregistered / Unconfirmed
GUEST, unregistred user!
运行时出现parameter XXX has no default value,程序如下:
if maskEdit1.Text <> '' then begin
MainForm.Query1.sql.Add('Insert into 用户 Values (''' + Edit1.Text + ''','+ pasWord+')');//原来为.Add('Insert into 用户 Values (''' + Edit1.Text + ''',1)');时可通过
MainForm.UserView.Items.Add(nil,Edit1.Text);
end
else begin
MainForm.query1.SQL.add('Insert into 用户 Values (''' + Edit1.Text + ''','+''+')');//原来为.add('Insert into 用户 Values (''' + Edit1.Text + ''',0)');时可通过
MainForm.UserView.Items.Add(nil,Edit1.Text) ;
MainForm.Userview.Refresh;
end;
数据表中对应的pasWord的属性已设为字节
if maskEdit1.Text <> '' then begin
MainForm.Query1.sql.Add('Insert into 用户 Values (''' + Edit1.Text + ''','+ pasWord+')');//原来为.Add('Insert into 用户 Values (''' + Edit1.Text + ''',1)');时可通过
MainForm.UserView.Items.Add(nil,Edit1.Text);
end
else begin
MainForm.query1.SQL.add('Insert into 用户 Values (''' + Edit1.Text + ''','+''+')');//原来为.add('Insert into 用户 Values (''' + Edit1.Text + ''',0)');时可通过
MainForm.UserView.Items.Add(nil,Edit1.Text) ;
MainForm.Userview.Refresh;
end;
数据表中对应的pasWord的属性已设为字节