关于Delphi中的字符串的详细分析

 

只是浅浅的解析下,让大家可以快速的理解字符串。

其中的所有代码均在Delphi7下测试通过。

Delphi 4,5,6,7中有字符串类型包括了:

  • 短字符串(Short String
  • 长字符串(Long String
  • 宽字符串(Wide String
  • 零结尾字符串(Null-Terminated String)、PChar和字符数组

1、短字符串(Short String

固 定长度,最大字符数个数为255,短字符串也成为长度字节(Length-byte)字符串,这时因为短字符串的第0个元素包含了这个字符串的长度(字符 串中字符的个数)。因此ShortString的缺省最大长度为256个字节(255个字符+1个长度字节=256),声明一个短字符串有两种方式,如 下:

  1. var
  2. S: ShortString;   { 255个字符长度,256个字节}
  3. S1: String[255];  { S1和S的字符类型一样}
  4. Len: Integer;
  5. begin
  6. S := 'Hello';
  7. Len := Ord(S[0]); { Len现在包含S的长度为5,Ord函数可以把一个字符类型转换为整数类型}
  8. Len := SizeOf(S); { Len现在包含的是ShortString类型的大小,为256字节}
  9. end;

以上例子通过S[0]可以获得S的字符串长度,当然也可以用Length函数来确定一个短字符串的长度。

可以通过数组的下标来访问ShortString中的一个特定位置的字符,具体使用参看下面例子和注释说明:

  1. var
  2. S: string[8];
  3. i: Integer;
  4. begin
  5. S := 'a_pretty_darn_long_string';
  6. { 因为S只有8个字符大小,
  7. 因此s的实际存储的内容为“a_pretty”}
  8. i := 10;
  9. S[i] := 's';
  10. { 因为S只有8个字符大小,
  11. 试图改写第10个元素,将会使内存混乱}
  12. end;

2、长字符串(Long String

长字符串 (AnsiString)是一种动态分配的字符串,其大小只受可用内存的限制。声明一个长字符串,只需要用关键字String不加大小参数即可。

在Delphi 7中AnsiString包含的字符是用单字节存储的。

  1. var
  2. S: string;

由于是动态分配的,一次可以随意修改字符串,而不用担心对其他的影响,也不用担心越界的问题。String类型没有0元素,试图存取String类型的0元素会产生一个编译错误。

通过Length函数也可以获得长字符串的长度,也可以通过SetLength过程为长字符串设置长度。其在内存中分配情况如下:

3、宽字符串(Wide String

宽字符串和长字符串一样,大小只受有效内存的限制,并实行动态分配。

在Delphi 7 中WideString被实现为2个字节存储一个字符,用WideString来处理多字节字符是十分方便的。如:

  1. var
  2. S: string;
  3. { 在Delphi 7中默认string等同于AnsiString}
  4. WS: WideString;
  5. begin
  6. S := '世界你好';
  7. WS := S;
  8. ShowMessage(S[1]);  { 此时无任何显示,因为S[1]取出的是‘世’的一半}
  9. ShowMessage(WS[1]); { 显示‘世’}
  10. end;

4、零结尾字符串(Null-Terminated String)、PChar和字符数组

在C和C++中没有真正的字符串数据类型,都是通过以Null结尾(0)的字符数组来实现的,字符数组没有长度字节,因此只能通过结尾的Null标 志来作为字符串的字符结束标志。又因为Windows是用C编写的,很多Windows函数要用到以字符数组作为参数,但Pascal字符串类型不是字符 数组,因为为了让Pascal字符串也能与Windows兼容,就需要一个字符串数组,PChar类型正是符合这种需求,在任何需要字符数组的地方都可用 PChar。

虽然AnsiString和WideString都已经实现了NULL

相应的也有PAnsiChar和PWideChar,分别对应于AnsiChar字符和WideChar字符。

例如:Windows MessageBox函数,此函数声明如下:

  1. function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer; stdcall;

第二个和第三个参数需要一个指向字符数组的指针,为了可以调用此函数,有以下三种方法来实现

1PChar()类型转换

  1. var
  2. Text: string;
  3. Caption: string;
  4. begin
  5. Text := 'This is a test.';
  6. Caption := 'Test Message';
  7. MessageBox(0, PChar(Text), PChar(Caption), 0);
  8. { 这里PChar用来把string类型转换为Null结尾的字符串}
  9. end;

其中

2PChar变量

我们先做一个实现,看看PChar类型到底是啥呢?

运行下面程序

  1. var
  2. Text: PChar;    { 声明为PChar类型}
  3. Str: string;    { 声明为String类型}
  4. begin
  5. Text := 'This is a test.';             { 都被赋予了相同的字符串}
  6. Str := 'This is a test.';
  7. ShowMessage(IntToStr(SizeOf(Text)));   { 4字节,实质是指针}
  8. ShowMessage(IntToStr(SizeOf(Str)));    { 也是4字节,也是指针}
  9. end;

通过上面的程序,我们知道Text只不过是一个指针而已。

  1. var
  2. Text: PChar;
  3. begin
  4. Text := 'This is a test.';
  5. MessageBox(0, Text, 'Test Message', 0);
  6. { 这里Text直接声明为了PChar类型,字符串常量可以直接用}
  7. end;

指针Text指向了这样一个内存区域,一个包含Null的结尾的’This is a test’字符串的区域。其等同于下面的代码:

  1. const
  2. TempString: array[0..15] of Char = 'This is a test.'#0;
  3. var
  4. Text: PChar;
  5. begin
  6. Text := @TempString[0];
  7. {Text指向Null结尾的TempString字符数组的第0个元素的地址,
  8. 也就是整个字符数组的首地址}
  9. MessageBox(0, Text, 'Test Message', 0);
  10. end;

3Char类型字符数组

最有还可以用Char数组来代替PChar,代码如下:

  1. var
  2. Text1: array[0..14] of Char;  { 大小为15个字符}
  3. Text2: array[0..20] of Char;  { 大小为21个字符}
  4. begin
  5. Text1 := 'This is a test.';   {Text1和Text2的字符长度都为15个字符}
  6. Text2 := 'This is a test.';
  7. MessageBox(0, Text1, 'Test Message 1', 0);
  8. {因为Text1的字符长度超过了其声明的大小,因为会内存访问混乱,显示换乱}
  9. MessageBox(0, Text2, 'Test Message 2', 0);
  10. {Text2的字符长度比起声明的大小要小,因为正常访问,显示正确}
  11. end;

显示结果如下:

关于字符串就先浅浅的谈到这个,以后再深入了解。

********************************************************************

Delphi字符串、PChar与字符数组之间的转换

var

s: string;

p: pchar;

a: array[1..20] of char;

1、字符串 ---> PChar

p := PChar(s);

2、PChar ---> 字符串

s := p;

3、PChar ---> 字符数组

StrCopy(@a , p);

4、字符数组 ---> PChar

PChar(@a);

5、字符串 ---> 字符数组

StrCopy(@a , PChar(s));

6、字符数组 ---> 字符串

s := PChar(@a);

【注】字符串和字符数组之间的转换借助 PChar 做中转;

关于Delphi中的字符串的详细分析的更多相关文章

  1. 关于Delphi中的字符串的浅析(瓢虫大作,里面有内存错误的举例)

    关于Delphi中的字符串的浅析 只是浅浅的解析下,让大家可以快速的理解字符串. 其中的所有代码均在Delphi7下测试通过. Delphi 4,5,6,7中有字符串类型包括了: 短字符串(Short ...

  2. 内核中container_of宏的详细分析【转】

    转自:http://blog.chinaunix.net/uid-30254565-id-5637597.html 内核中container_of宏的详细分析 16年2月28日09:00:37 内核中 ...

  3. Delphi 中的字符串(还解释了shortstring)good

    一.Delphi 2009 之前的字符串(不支持 Unicode): Delphi 2009 之前的字符串分为 3 种:ShortString.AnsiString.WideString. [Shor ...

  4. javascrip中cookie的使用详细分析

    JavaScript中的另一个机制:cookie,则可以达到真正全局变量的要求. cookie是浏览器 提供的一种机制,它将document 对象的cookie属性提供给JavaScript.可以由J ...

  5. js中cookie的使用详细分析

    JavaScript中的另一个机制:cookie,则可以达到真正全局变量的要求. cookie是浏览器 提供的一种机制,它将document 对象的cookie属性提供给JavaScript.可以由J ...

  6. 转:js中cookie的使用详细分析

    cookie机制将信息存储于用户硬盘,因此可以作为全局变量,这是它最大的一个优点.它可以用于以下几种场合. (1)保存用户登录状态.例如将用户id存储于一个cookie内,这样当用户下次访问该页面时就 ...

  7. Delphi中常用字符串处理函数

    .copy(str,pos,num) 从str字符串的pos处开始,截取num个字符的串返回. 假设str为,)=,)='def' .concat(str1,str2{,strn}) 把各自变量连接起 ...

  8. 二进制原码、反码、补码以及Java中的<< 和 >> 和 >>> 详细分析

    1.计算机二进制系统中最小单位bit 在计算机二进制系统中: bit (位) :数据存储的最小单元. 简记为b,也称为比特(bit),每个二进制数字0或1就是一个位(bit),其中,每 8bit = ...

  9. Java中的<< 和 >> 和 >>> 详细分析

    <<表示左移移,不分正负数,低位补0: 注:以下数据类型默认为byte-8位 左移时不管正负,低位补0 正数:r = 20 << 2 20的二进制补码:0001 0100 向左 ...

随机推荐

  1. fedora28 安装automake

    yum install automake yum install hg //版本管理

  2. python_django_在views模块中操作状态保持(session)

    什么叫状态保持? 就比如说我们登陆一个网站,登陆之后的当前页面显示的是登陆状态,但是我们要再跳转同一网站的其他页面,则显示的未登录状态,状态保持就是:我们在当前页面登陆后,再访问其他页面时也显示为登陆 ...

  3. 数组foreach

    简单使用 代码 <!DOCTYPE html> <html lang="en"> <head> <meta charset="U ...

  4. MySQL日期格式化 利用Mysql的DATE_FORMAT()进行日期格式转换

    碰到一个MYSQL的问题,表logstatb中moment字段的内容是"年-月-日 时:分:秒",需要查询匹配“年月日”或“时:分:秒”即可的数据条目,这个时候就可以通过下面的SQ ...

  5. echarts点击柱状图时触发点击事件

    项目需求:1.通过echarts把数据展示为柱状图2.点击对应的柱状图 显示对应的弹窗 主要用到的时 echarts中的 "click" 事件, 使用demo: var myCha ...

  6. 每天进步一点点-WPF-根据数据类型加载控件

    目的,根据数据类型的不同,动态的加载适用于不同数据类型的控件(布局) 原理:为自定义的数据类型添加数据魔板,绑定的时候绑定这些数据类型的实例. 例子: 数据类型: 数据模板: <DataTemp ...

  7. Android android studio常用的一些快捷键以及常用权限

    android studio的常用快捷键:一.打印log:1.输入logt回车:  自动生成TAG的全局变量:private static final String TAG = "MainA ...

  8. 阿里巴巴AI夺肝结节诊断两项世界冠军,至今无人超越

    在澳门用人工智能预测流感趋势后,阿里巴巴还在继续探索如何用科技保障人类健康,这一次是更准确地测量肝结节. 12月28日消息,在全球LiTS(Liver Tumor Segmentation Chall ...

  9. 好久不见的博客咯!——没有可持久化的可持久化treap

    每每想要去了解可持久化treap这个好写好调的东东,然后就发现网上只有一个人的——SymenYang的!在此我必须得把他批判一番——写方法不贴代码是什么心态!而且写出来的是有问题的呀!害人不浅! 好吧 ...

  10. c# ToString()格式大全(转)

    stringstr1 =string.Format("{0:N1}",56789);               //result: 56,789.0stringstr2 =str ...