文档章节

WinAPI 字符及字符串函数(3): CharUpper - 字符或字符串转大写

涂孟超
 涂孟超
发布于 2014/09/26 15:36
字数 205
阅读 7
收藏 0
点赞 0
评论 0
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Button4: TButton;
    Button5: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
    procedure Button4Click(Sender: TObject);
    procedure Button5Click(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{对字符}
procedure TForm1.Button1Click(Sender: TObject);
var
  C: Char;
begin
  C := 'a';
  C := Char(CharUpper(PChar(C)));
  ShowMessage(C); {A}
end;

{对字符常量}
procedure TForm1.Button2Click(Sender: TObject);
var
  C: Char;
begin
  C := Char(CharUpper(PChar('a')));
  ShowMessage(C); {A}
end;

{对字符数组}
procedure TForm1.Button3Click(Sender: TObject);
var
  Arr: array[0..2+1] of Char;
begin
  Arr := 'abc';
  CharUpper(Arr);
  ShowMessage(Arr); {ABC}
end;

{对字符串}
procedure TForm1.Button4Click(Sender: TObject);
var
  str: string;
begin
  str := 'abc';
  CharUpper(@str[1]);
  ShowMessage(str); {ABC}
end;

{Delphi 的 System.UpCase 和 SysUtils.LowerCase}
procedure TForm1.Button5Click(Sender: TObject);
var
  c: Char;
  str: string;
begin
  c := 'a';
  c := UpCase(c);

  str := 'abc';
  str := UpperCase(str);

  ShowMessageFmt('%s, %s', [c, str]); {A, ABC}
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/11/05/1327284.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2004
码字总数 14107
作品 0
深圳
程序员
python 字符串

字符串 简介 字符串序列 用于表示和存储文本,python中字符串是不可变的,一旦声明,不能改变 通常由单引号(' ),双引号(" ),三引号(''' """)包围 其中三引号可以由多行组成,编写多行文本的...

jacked ⋅ 2016/03/12 ⋅ 0

python 中 u 和 r 加字符

字符串 简介 字符串序列用于表示和存储文本,python中字符串是不可变的,一旦声明,不能改变 通常由单引号(' ),双引号(" ),三引号(''' """)包围 其中三引号可以由多行组成,编写多行文本的...

周东尧 ⋅ 2016/08/21 ⋅ 0

Python常用内置函数(二)

字符串处理方法 1. str.capitalize: 将字符串首字母大写 str.capitalize('abc') 'Abc' 2. str.replace(old,new,[,count]): 替换字符,count定义替换的次数,默认是全替换 str1 = 'hello,worl...

技术小阿哥 ⋅ 2017/11/27 ⋅ 0

C Primer Plus 第11章 11.7 ctype.h字符函数和字符串

第7章“C控制语句 分支和跳转”介绍了ctype.h系列字符相关的函数。这些函数不能被 应用于整个字符串,但是可以被应用于字符串中的个别字符。程序清单11.26定义了一个函数,它把toupper( )函数...

idreamo ⋅ 2016/08/27 ⋅ 0

字符串操作一

S.strip 函数: 可以将字符串的左右空格t等空白内容去除,该函数可以将字符串的左右两边 的空格、 t等空白内容或指定字符串去除,并返回处理后的结果,但原字符串 并未被改变。 不带参数的s...

余二五 ⋅ 2017/11/24 ⋅ 0

java字符串关于String几个常用的方法

字符串是系统提供的一个类,用String表示. 这里说几个关于String的几个常用的方法,供大家参考下: 1.获取 分为两种:根据索引找出字符串中的字符(charAt)和根据字符串中字符的位置找出索引(inde...

zxc1258012580的博客 ⋅ 2017/12/14 ⋅ 0

字符串的常用操作(字符串的操作用得比较多,须掌握扎实)

字符串的常用操作(字符串的操作用得比较多,须掌握扎实) Length:属性,返回字符串中的字符个数。

瑞不可挡 ⋅ 2011/01/08 ⋅ 0

python string methods 和 string module区别

python的模块真的很乱,版本之间变化多且有点随意,远没有java那么严谨,造就了它的灵活又无标准。 如string模块,从python 1.6 开始,此模块就少用了,大多函数已由标准str对象实现了。 但s...

Honghe ⋅ 2012/12/05 ⋅ 0

MySQL常用函数系列之一:字符串函数(1)

本文将演示以下4个常用字符串函数: CANCAT(S1,S2,…Sn) 连接S1,S2,…Sn为一个字符串 INSERT(str,x,y,instr) 将字符串str从第x位置开始,y个字符长的子串替换为字符串instr LOWER(str) 将字符...

博为峰教研组 ⋅ 2016/11/11 ⋅ 0

Oracle基本使用——第五章 Oracle函数

Oracle基本使用——第五章 Oracle函数 第五章 Oracle函数 5.1 数学函数 --数值数据(绝对值,三角函数,对数函数,随机函数) 绝对值函数 ABS(x) 平方根函数 SQRT(x) 求余函数 MOD(x,y) 获取整...

代金券优惠 ⋅ 04/27 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

JPA入门,配置文件的设置

<?xml version="1.0" encoding="UTF-8"?> <persistence xmlns="http://java.sun.com/xml/ns/persistence" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http......

码农屌丝 ⋅ 9分钟前 ⋅ 0

Java基础——面向对象和构造器

声明:本栏目所使用的素材都是凯哥学堂VIP学员所写,学员有权匿名,对文章有最终解释权;凯哥学堂旨在促进VIP学员互相学习的基础上公开笔记。 静态成员介绍 为什么要有静态成员?静态成员用来...

凯哥学堂 ⋅ 11分钟前 ⋅ 0

vmware中Centos 7 linux的LVM磁盘扩容

系统是RHEL7(centos7差不多一样) 关闭系统,在vmware、设置、硬盘、扩展、输入数字大于当前系统内存、点击扩展。 开机再查看磁盘信息 fdisk -l 注意:可以看出sda磁盘增加了,但是根目录还...

gugudu ⋅ 21分钟前 ⋅ 0

JAVA线程sleep和wait方法区别

昨天面试,突然被问到sleep 和 wait的区别,一下子有点蒙,在这里记一下,以示警戒。 首先说sleep,sleep就是正在执行的线程主动让出cpu,cpu去执行其他线程,在sleep指定的时间过去后,cpu...

徐玉强 ⋅ 23分钟前 ⋅ 0

vuex学习--模块

随着项目复杂性增加,共享状态也越来越多。需要对转态操作进行分组,分组后在进行分组编写。学习一下module:状态管理器的模块组操作。 首先是声明: const moduleA={ state,mutations,g...

大美琴 ⋅ 26分钟前 ⋅ 0

Selenium 简单入门

安装 pip install selenium 驱动下载 https://chromedriver.storage.googleapis.com/index.html 下载最新的驱动,放入path中,可以放入Python的scripts目录下,也可以放入Chrome安装目录,并...

阿豪boy ⋅ 27分钟前 ⋅ 0

292. Nim Game - LeetCode

Question 292. Nim Game Solution 思路:试着列举一下,就能发现一个n只要不是4的倍数,就能赢。 n 是否能赢1 true2 true3 true4 false 不论删除几,对方都能一把赢5 t...

yysue ⋅ 57分钟前 ⋅ 0

6.5 zip压缩工具 6.6 tar打包 6.7 打包并压缩

zip压缩工具 zip命令可以压缩目录和文件,-r 压缩目录。 zip使用方法 zip 1.txt.zip 1.txt //压缩文件 zip -r 123.zip 123/ //压缩目录 unzip 1.txt.zip //解压 unzip 123.zip -d /root/456...

Linux_老吴 ⋅ 今天 ⋅ 0

react-loadable使用跳坑

官方给react-loadable的定义是: A higher order component for loading components with dynamic imports. 动态路由示例 withLoadable.js import React from 'react'import Loadable fro......

pengqinmm ⋅ 今天 ⋅ 0

记录工作中遇到的坑

1、ios safari浏览器向下滚动会触发window resize事件

端木遗风 ⋅ 今天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部