在开发软件的时候,常常要判断用户的输入值是否完整,比如一个表的字段name是必须有值的,在界面上用意个edit给他输入值.
程序一
begin
if trim(editname.text) = '' then
begin
showmessage('请输入姓名');
exit;
end;
sql := 'insert into tablexxx values(''' + edtname.text + ''','''.....
''''
执行sql语句
end;程序二
property name: string read getName write setName; function getName:string;
begin
if trim(editname.text) <> '' then
result := edtname.text
else
raise exception.create('请输入姓名');
end; begin
try
sql := 'insert into tablsexxx values(''' + name + ''','''.......;
执行sql语句
except
on e:exception do
showmessage(e.message);
end;
end;应该用那一种比较好呢.第二种如果自定义一个异常类来处理的话是不是更好呢.
程序一
begin
if trim(editname.text) = '' then
begin
showmessage('请输入姓名');
exit;
end;
sql := 'insert into tablexxx values(''' + edtname.text + ''','''.....
''''
执行sql语句
end;程序二
property name: string read getName write setName; function getName:string;
begin
if trim(editname.text) <> '' then
result := edtname.text
else
raise exception.create('请输入姓名');
end; begin
try
sql := 'insert into tablsexxx values(''' + name + ''','''.......;
执行sql语句
except
on e:exception do
showmessage(e.message);
end;
end;应该用那一种比较好呢.第二种如果自定义一个异常类来处理的话是不是更好呢.
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货