急!在线等待....请教!是关于存入记录数据库的条件判断问题(0分)

  • 主题发起人 主题发起人 dongfang7410
  • 开始时间 开始时间
D

dongfang7410

Unregistered / Unconfirmed
GUEST, unregistred user!
我写一段存数据库记录程序..窗体中有许多文本框及下拉列表(EDIT1...13,COMBOX1..22)
这些信息必须输入,只有当判断用户已输入所有信息,才能将信息写入数据库,所以加入判断..如果用IF ELSE语句这样恐怕...
肯定非常繁琐..请问有什么简单的方法..请指教!
 
简单的方法肯定有,不知你用不用?
在设置数据表的时候,只需将该文本框相对应的字段设置为不允许为空。
让它自己报错好了。
 
最好的办法就是让系统自动报错,然后截获报错信息。
 
也可以设置数据表的相关字段值不允许为空
 
for i:= 0 to form1.ComponentCount-1 do
begin
if (form1.compoents is tedit) then
begin
if trim((form1.compoents as tedit) .text)='' then
showmessage('不允许为空');
end;
end;

COMBOX 类似;
 
后退
顶部