社区
Delphi
帖子详情
为什么if Length(trim(dbEdit1.Text))<>8 不好用呀?
tflb
2003-08-22 09:42:04
if Length(trim(dbEdit1.Text))<>8 then
smd1.Caption := '系统提示';
smd1.Text:= '输入的"学号"格式必须是8位数字,请重新输入!';
smd1.ShowModal;
无论输入是不是8位数据,都有提示信息,为什么不进入判断呀!!
把条件改成>,<都是一样的.学号字段是字符型.请指点一下!!
...全文
31
6
打赏
收藏
为什么if Length(trim(dbEdit1.Text))<>8 不好用呀?
if Length(trim(dbEdit1.Text))8 then smd1.Caption := '系统提示'; smd1.Text:= '输入的"学号"格式必须是8位数字,请重新输入!'; smd1.ShowModal; 无论输入是不是8位数据,都有提示信息,为什么不进入判断呀!! 把条件改成>,<都是一样的.学号字段是字符型.请指点一下!!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
IORILI
2003-08-22
打赏
举报
回复
要一步一步来,不要着急
belllab
2003-08-22
打赏
举报
回复
呵呵,基本语法错误!
cnhgj
2003-08-22
打赏
举报
回复
这个问题是检分问题,可惜来晚了!
xuejinlong
2003-08-22
打赏
举报
回复
呵呵
tonylk
2003-08-22
打赏
举报
回复
看来你还是基础没学好,写成泥那样的话相当于:
if Length(trim(dbEdit1.Text))<>8 then begin
smd1.Caption := '系统提示';
end;
smd1.Text:= '输入的"学号"格式必须是8位数字,请重新输入!';
smd1.ShowModal;
lvloj
2003-08-22
打赏
举报
回复
if Length(trim(dbEdit1.Text))<>8 then
BEGIN
smd1.Caption := '系统提示';
smd1.Text:= '输入的"学号"格式必须是8位数字,请重新输入!';
smd1.ShowModal;
END;
PowerBI系列之Power Query专题
PowerBI系列之Power Query专题1. 获取数据 数据源种类介绍和获取Excel数据源输入数据和拷贝数据:创建辅助表解析Json/XML数据格式获取Web网页数据和URL添加动态参数连接数据的四种模式:Import、DirectQuery、Live Connection、Dual双 属于混合模式连接数据库:Sql server、 Mysql(直连但是必须先安装一个mysql插件)DirectQuery直连查询:Sql serverO
DB
C方式获取数据表关联或多个Sql或调用存储过程获取数据SQL中动态传参和自定义函数: sql中使用参数或数据库名称使用参数连接Sharepoint和OneDrive数据源连接Dataset和Dataflow 替换本地数据源为Sharepoint数据源并保留数据处理操作 终止当前数据刷新Loading:Cancel Query数据源设置-重置数据连接凭证PBIDS连接数据源创建和使用报表模块(输入或值列表)利用报表模板和参数控制线下报表数据权限DirectQuery启用自动页面刷新和更改检测管理聚合表提高DirectQuery查询性能动态M查询参数提高DirectQuery查询性能添加数据刷新时间 DateTime.LocalNow()和Getdate()2. 数据清洗和M语言M语言和官方文档介绍PowerQuery中查阅M函数:=#shared, Ctrl+Space提示数据清洗之常用技能:提升标题、更改数据类型、保留删除错误或空行,删除重复项、选择列和删除列、填充单元格、合并列、拆分、提取、替换、条件替换、添加自定义列,添加条件列、添加索引列、分组、添加年月日列、追加和合并查询透视和逆透视以及转置合并单元格的Excel文件处理导入文件夹中多Excel文件并合并解决多文件合并中列顺序不一致使用参数和函数批量导入文件 文本中提取中文、英文、数字等处理双引号转义 列拆分详解解决列名改变错误解决列丢失错误动态显示、排序和重命名列为所有列名添加前缀列名字母大写和分隔符调整
Trim
标题列中的多余空格如何处理load数据错误为什么load的Excel数据有null空行为什么load的Excel数据标题在第二行灵活添加占位符规范同类相似数据数据按多列排序为分组添加Index序号分组内值合并诊断工具分析数据处理过程PowerQuery小技巧分享 新冠病例活动轨迹地图标识
限制并方便用户输入 (转)
限制并方便用户输入 (转)[@more@]限制并方便用户输入(2002/12/03 三金 版权所有) 防止用户误输入是软件开发的一项必不可少的工作,除才之外,还要为用户的使用提供最大方便。当然,我们可以利用或开发新的组件...
转帖:怎样实现olecontainer控制Word预览时可以翻页?
怎样实现olecontainer控制Word预览时可以翻页? 怎样实现olecontainer控制Word预览时可以翻页? 实现word预览: oleContainer1.Loadfromfile(FFileName); 实现word编辑: try oleContainer1.Loadfromfile(FFile
Text
限制用户输入
(一)T
Edit
、T
DB
Edit
、TComboBox、T
DB
ComboBox的输入分三种类型限制: (1)任意输入 (2)整数输入 (3)浮点数输入 限制的项目如下: (1)整数输入只能输入数字0-9、+、- (2)浮点输入只能输入数字0-9、+、-、. (3)+和-只能有其一,并且只能出现在最前面 (4).只能有一个 (5)限制小数位数 函数如下: procedur...
delphi操作word
delphi操作word
一、Delphi程序启动Word
采用CreateOleObjects的方法来启动Word,调用VBA代码,具体实现过程为:
首先使用GetActiveOleObject('Word.Application')判断当前内存中是否存在Word程序,如果存在,
则直接连接,如果没有Word程序,则使用CreateOleObject('Word.Application')启动Word二、Delphi程序新建Word文稿
格式:WordDo
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章