Question

在delphi7中，如何在一个字符串中查找某一地位处的字符是什么？

Answer 1

可通过函数POS及COPY配合使用实现该功能。

一、函数说明：

POS：获取特定字符所处字符串的位置，返回数据类型为整型。POS共有两个参数：POS(特定字符或字符串，源字符串)。

COPY：字符串截取，返回数据类型为字符型。COPY共有三个参数：COPY(源字符串，起始截取位（整型，可为变量），截取位数（整型，可为变量））。

二、实例演示（笔者以截取特定字符‘.'前5位为例），操作如下：

1、添加TEDIT及TBUTTON控件各一个；

2、在TBUTTON控件的单击事件中，写入代码：ShowMessage(Copy(Trim(ed2.Text),Pos('.',Trim(ed2.Text))-6,5));

3、在TEDIT中随便输入一串字符，点击TBUTTON控件，效果如下图：

Answer 2

1一个字符串就是一个数组var str: String;begin str := 'hello'; caption := str[2]; //显示eend; 查看原帖>>