Button1Click的代码如下:
with ADODataSet1 do begin
if not Active then Open;
Append;
......
FieldByName('SDDZ').AsString := Edit3.Text;
FieldByName('SDDH').AsString := Edit4.Text;
........
Post;
end;
其中,ADODataSet1 所连接的sql数据库表是不允许空的,可是我在每个Edit都没有输入东东,一按Button1,也post成功了,打开数据库一看,还真新增了一行,除了ID自增以外,其他字段都是空的. 我猜想是有空格,而不是真正的NULL,那么应该怎么改代码呢?谢谢 (我的目的:字段为空,就不允许Post)
with ADODataSet1 do begin
if not Active then Open;
Append;
......
FieldByName('SDDZ').AsString := Edit3.Text;
FieldByName('SDDH').AsString := Edit4.Text;
........
Post;
end;
其中,ADODataSet1 所连接的sql数据库表是不允许空的,可是我在每个Edit都没有输入东东,一按Button1,也post成功了,打开数据库一看,还真新增了一行,除了ID自增以外,其他字段都是空的. 我猜想是有空格,而不是真正的NULL,那么应该怎么改代码呢?谢谢 (我的目的:字段为空,就不允许Post)
-------
很弱的问:这句应该加在哪儿?
to:weizi2000(秋风啊):我想知道应该怎么写代码?
MessageDlg('try again!',mtWarning,[mbOk], 0);
Edit3.SetFocus;
exit;
end;建议在执行sql数据库表操作之前,先对录入值进行判断...