首页 > TAG信息列表 > Edit1
手机号码验证
手机号码验证 if (not TRegEx.IsMatch(Edit1.Text, '^[0-9]{11}')) or (length(Edit1.Text) <> 11) then // 11位数字,否则不合格 begin ShowMessage('请输入正确的11位手机号码'); exit; end 引用 System.RegularExpressions,awtk开发实践——学习篇9:edit示例(单行编辑器控件)
说明: 本文章旨在总结备份、方便以后查询,由于是个人总结,如有不对,欢迎指正;另外,内容大部分来自网络、书籍、和各类手册,如若侵权请告知,马上删帖致歉。 QQ 群 号:513683159 【相互学习】 内容来源: 官方的手册(免费获取)Pxx=该手册的对应页码xx github-awtk 说明【数字信号】基于matlab GUI手机拨号音效模拟【含Matlab源码 909期】
一、简介 基于matlab GUI手机拨号音效模拟:按#会全部播一遍,按*会单独消除一个且播出特定声音 二、源代码 function varargout = tul(varargin) % TUL MATLAB code for tul.fig % TUL, by itself, creates a new TUL or raises the existing % singleton*. % % H = TDelphi Live Bindings 初探
Delphi Live Bindings 初探 Live Bindings,顾名思义,动态绑定。 1、绑定前: 2、点击数据源: 3、绑定连线:点击 蓝色区域, 按住 鼠标左键,一直移动到绿色区域,然后松掉鼠标左键。 系统就完成了系统绑定: 然后,Label1(数据的接受者),就会随 Edit1(数据的提供者)的数据变化而变解决MFC多个对话框之间数据交换问题
解决MFC多个对话框之间数据交换问题 初始 假设现在有两个对话框CDLG1与CDLG2 先右键对话框窗体添加两个类 类名设为CLDG1与CLDG2 任务 现在假设CLDG1有个输入框id为IDC_EDIT1 CDLG2有个输入框id为IDC_EDIT1,与一个按钮 目标是点击CDLG2的按钮就获取CDLG1的输入框,并输出在CDLG用一个 Byte 数表示 8 个复选框的选择状态
用一个 Byte 数表示 8 个复选框的选择状态 本例效果图: 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, CheckLst; type TForm1 = class(TForm) CheckListBox1: TCheck回复 "Timer008" 的一个类型转换的问题 - 不是很典型, 对其他人参考价值不大
回复 "Timer008" 的一个类型转换的问题 - 不是很典型, 对其他人参考价值不大 问题来源: http://www.cnblogs.com/del/archive/2008/07/10/1239621.html#1250359 代码文件:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Cont事件自调用 - 回复 maxcool 的问题
事件自调用 - 回复 maxcool 的问题 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; procedure Button1ClDirect2D (10) : 文本输出初步
Direct2D (10) : 文本输出初步 uses Direct2D, TypInfo; procedure TForm1.FormCreate(Sender: TObject); var f: TTextFormats; begin for f := Low(TTextFormats) to High(TTextFormats) do CheckListBox1.Items.Add(GetEnumName(TypeInfo(TTextFormats), Ord(f)MFC CEdit 垂直居中
参考: 通过发送 EM_SETRECT 消息使 VC 编辑框 文本垂直居中 其实是发送 EM_SETRECT 消息改变输入字符串的位置 1.在Edit控件所在对话框 OnInitDialog 函数中增加代码 1 CRect rect; 2 GetDlgItem(IDC_EDIT1)->GetClientRect(&rect); 3 rect.OffsetRect(5, 30); //设delphi tcomport获取电子称重量
我使用tcomport组件 读取 欧陆达AWH-30A这款电子称的重量,通过串口连接。 //波特率设置br9600 //ControlDTR 设置成 DtrEnable //TriggersOnRxChar设置成true var portData:string; //打开串口 procedure TForm1.Btn_openComportClick(Sender: TObject); begin if not ComPC++ Builder(BCB)入门书籍推荐
C++ Builder(BCB)入门书籍推荐: 《C++Builder 6程序设计教程(第二版)》 (陆卫忠,刘文亮 等编著 /2011-04-01 /科学出版社)(当当网) 《C++Builder 6编程实例精解》(赵明现),PDF,是数字版的,非扫描版的,里面还有一个俄罗斯方块游戏的完整实现。 《精彩C++Builder 6程序设计》(台湾 吴逸贤),里面有10几robotframework踩坑7--使用AutoIt脚本实现自动上传
1、将下面代码保存为 upload_file.html <html> <head> <meta http-equiv="content-type" content="text/html;charset=utf-8"/> <title>upload_file</title> <link href="http://cdn.bootcss.com/bootstrap/3.获取PC可用串口端口,并将其在combo box中显示
通常应用中,我会遇到需要用到多个串口的同时在一台PC上使用的情况,例如通过USB转串口等方式来硬件接入串口数目。 那么软件需要判断到底哪些串口号是可用的,才可以初始化相应的串口应用程序。 下面我们简单介绍一下,如何获取PC可用串口端口号,并将其显示在combo box控件中。 例程我们搜Delphi 运行代码错误:cannot focus a disabled or invisible window
Delphi 运行代码错误:cannot focus a disabled or invisible window 翻译:无法聚焦已禁用或不可见的窗口 错误原因: 无法聚焦指定控件或窗体 Delphi 正确写法: if Edit1.canFocus then Edit1.setfocus; 创建时间:2020.04.29 更新时间:[python]PyQt5- QLineEdit综合案例
综合应用 import sys from PyQt5.QtWidgets import * from PyQt5.QtGui import * from PyQt5.QtCore import * class testLinEdit_003(QWidget): def __init__(self): super(testLinEdit_003,self).__init__() self.initUI() def initUI(self):QQ聊天机器人 Delphi代码
QQ聊天机器人 前几日,看到杂志上有一篇关于开发QQ聊天机器人的文章。谈到了对QQ循环发送消息内容,感觉倒也很好玩,于是拿起Delphi开始了我的QQ聊天机器人之路。 首先要明白自己要做什么,大家都用过QQ,知道给别人发送消息的整个过程吧!要实现循环发送消息的功能该有以下几个条件: 1.selenium+AutoIt
上传文件 update.au3文件内容: ;由于Selenium本身的限制,不能驱动windows系统的资源,只能驱动浏览器来实现自动化测试,所以有些页面打开了系统的控件时,需要借助其他工具来实现。AutoIt这个工具正好能做这些事情。;*****注意:参数1可以输入控件的titile,但有时候不起作用,不稳定,最好还是Delphi十六进制字符串转换十进制32位整数
Delphi 自带函数 IntToHex 功能说明:该函数用于将“十进制”转换成“十六进制”。该函数有二个参数。第一个参数为要转换的十进制数据,第二个参数是指定使用多少位来显示十六进制数据。 参考实例: Edit1.Text := IntToHex('100', 2); 执行结果,Edit1.Text等于64。 pro