导航
  • 主页
  • 基础类
  • 应用实例
  • 新技术前沿

一个if语句

dayangyang 2002-12-29 03:28:27

我想如果没有这个分类号,就报错怎么写啊 先谢了!!
begin
with dataform.StoredProc1 do
begin
close;
unprepare;
parambyname('@分类号').Value:=trim(edit1.Text);
prepare;
open;
end


application.MessageBox('没有这个分类号','错误',mb_ok);

end;
...全文
5 点赞 收藏 9
写回复
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
lxinjun 2002-12-29
你的数据原用的是什么!(这应该是delphi问题)
回复
pengdali 2002-12-29
begin
with dataform.StoredProc1 do
begin
close;
unprepare;
parambyname('@分类号').Value:=trim(edit1.Text);
prepare;
open;
end

if dataform.StoredProc1.RecordCount=0 then
showmessage('没有这个分类号');

end;
回复
dayangyang 2002-12-29
up
回复
CoolAbu 2002-12-29
FT,这是啥?Delphi,我也不会。
回复
dayangyang 2002-12-29
请高手帮忙!!!!!!
回复
dayangyang 2002-12-29
up
回复
dayangyang 2002-12-29
to CoolAbu
我写错了,我不知道变量i放在哪,不会写,你会怎么写呢?
var:
i:string;
begin
with dataform.StoredProc1 do
if (parambyname('@分类号').Value:=trim(edit1.Text))=true then
begin
close;
unprepare;
parambyname('@分类号').Value:=trim(edit1.Text);
prepare;
open;
end


else
application.MessageBox('没有这个分类号','错误',mb_ok);

end;
回复
ToUpdate 2002-12-29
UP
回复
CoolAbu 2002-12-29
先做判断有没有这个分类号,不行吗??
回复
发动态
发帖子
MS-SQL Server
创建于2007-09-28

3.2w+

社区成员

MS-SQL Server相关内容讨论专区
申请成为版主
社区公告
暂无公告