在edit1中填的数据一定是9位,如果不是就提示:
if edit1.Text=''or length(trim(edit1.text))<> 9 then
showmessage('代码为9位,请修改!')lengh的用法对不对?
if edit1.Text=''or length(trim(edit1.text))<> 9 then
showmessage('代码为9位,请修改!')lengh的用法对不对?
解决方案 »
- 关于c/s,使用SQL Server2000,多客户端开发系统的建议
- delphi中,将数据库数据添加到combobox里的问题,我是新手,请多帮助
- 字符串转换问题
- dephi6的控件修改成支持delphi7要注意些什么问题?
- 关于dll的窗体的问题
- 数据更新出了问题,详见描述,在线等待,完了就给分
- 请问网关和代理服务器有什么不同???????
- 调试过程出现下列问题:编译通不过,如何解决?在线等待
- 请教一个问题:新增记录并刷新数据集后定位记录。
- 我翻完了CSDN的贴子,也没有找到答案?TREEVIEW的问题,谁能帮我????高分赠送
- 打印疑问
- 散分,提供一点点例程下载COM DCOM Ocx.....等
if length(trim(edit1.text))<> 9 then
showmessage('代码为9位,请修改!')非要用的话,要加括号
if (edit1.Text='') or (length(trim(edit1.text))<> 9) then