在写数据库程序的时候有N多个输入框,下拉选择框,提交信息的时候总要有个判断输入是否为空吧!总不能写N个判断吧!有什么好的方法来解决这个问题吗?

解决方案 »

  1.   

    findcompnent函数循环判断,这样你可以省些力气.
      

  2.   

    设定数据库字段不为空,提交时输入框为空就会告警。(在程序设计中运行程序会有二个告警,运行EXE文件就有一个告警)
      

  3.   

    你也可以将要做判断的控年做成控件数组( 当然没有办法做成象VB中那样的) 举个例子.
    假如你有edit1,edit2,edit3,edit4四个控件要判断(控件就如如上命名)然后你可以写一个判断的过程.
    function PD;Boolean;
    var i:integer;
    begin
      result:=True;
      for i:=1 to 4 do
        if (findCompnent('edit'+inttostr(i)) as TEdit).Text='' then result=false;
    end;就可以了. :) 
      

  4.   

    用CSAE么,要么用数据库定义的参照完整性