在EDIT中将输入变为大写

简介:

var PymstEnd:string;
   i,str_len,selInt:Integer;


begin
  selInt:=E_PYM.SelStart;
  E_PYM.text:=UpperCase(E_PYM.text);
  E_PYM.SelStart:=selInt ;
  str_len:=Length(E_PYM.text);
  PymstEnd:=UpperCase(E_PYM.text);












本文转自鹅倌51CTO博客,原文链接:http://blog.51cto.com/kaixinbuliao/963949 ,如需转载请自行联系原作者







相关文章
|
JSON 数据格式
jwt->jwt简介,jwt工具类,jwt集进成spa项目
jwt->jwt简介,jwt工具类,jwt集进成spa项目
165 0
|
XML 分布式计算 安全
hadoop 配置 单机伪分布式
hadoop 配置 单机伪分布式
308 0
hadoop 配置 单机伪分布式
|
Kubernetes 网络协议 Shell
kubernetes1.9.2基于kubeadm的高可用安装HA
使用kubeadm安装安全高可用kubernetes集群[安装包地址] 非高可用安装三步即可 在master上 cd shell && init.sh && master.sh 在node上 init.
1669 0
|
Java 开发者
Kotlin 中的接口 Interface : so much better
Interface was introduced in Java as a new programming feature. It describes CAN-BE instead of IS-A relationship.
5648 0
|
API
SharePoint 2013 版本功能对比
  前言:在SharePoint使用中,经常纠结于版本问题,SharePoint 2013主要有免费的Foundation和收费的标准版、企业版三个版本,他们之间的功能上是不一样的,找了一些资料才发现下面的这个表格,还是很清楚的描述了各个版本的区别,拿过来给大家看看。
1250 0
|
2天前
|
弹性计算 运维 搜索推荐
三翼鸟携手阿里云ECS g9i:智慧家庭场景的效能革命与未来生活新范式
三翼鸟是海尔智家旗下全球首个智慧家庭场景品牌,致力于提供覆盖衣、食、住、娱的一站式全场景解决方案。截至2025年,服务近1亿家庭,连接设备超5000万台。面对高并发、低延迟与稳定性挑战,全面升级为阿里云ECS g9i实例,实现连接能力提升40%、故障率下降90%、响应速度提升至120ms以内,成本降低20%,推动智慧家庭体验全面跃迁。