下面是写的一个小Demo及其运行结果
源码如下:
procedure TForm1.Button1Click(Sender: TObject);
var
str1 : string;
str2 : shortstring;
str3 : PChar;
begin
str1 := 'abcde';
str2 := 'abcde';
str3 := 'abcde';
Memo1.Clear();
Memo1.Lines.Add('sizeof(str1)=' + inttostr(sizeof(str1)));
Memo1.Lines.Add('sizeof(str2)=' + inttostr(sizeof(str2)));
Memo1.Lines.Add('sizeof(str3)=' + inttostr(sizeof(str3)));
Memo1.Lines.Add('------------------------');
Memo1.Lines.Add('sizeof(string)=' + inttostr(sizeof(string)));
Memo1.Lines.Add('sizeof(shortstring)=' + inttostr(sizeof(shortstring)));
Memo1.Lines.Add('sizeof(PChar)=' + inttostr(sizeof(PChar)));
Memo1.Lines.Add('------------------------');
Memo1.Lines.Add('lengh(str1)=' + inttostr(length(str1)));
Memo1.Lines.Add('length(str2)=' + inttostr(length(str2)));
Memo1.Lines.Add('length(str3)=' + inttostr(length(str3)));
Memo1.Lines.Add('------------------------');
Memo1.Lines.Add(inttostr(Length('abcd')));
end;
end.
//源码的截图如下
运行结果
string:默认为AnsiString
-------------------------------------------------------------------------------------
shortstring:数据最大长度为255,内存中第一个字节保存的是后面字符数据的长度,所以shortstring加上长度应该最大为256字节,从运行结果可以看出:string 和 PChar是指针,而shortstring可以看成是数组,因为:sizeof(string) == sizesof(PChar) == 4,都是4字节,和其指向的字符串长度无关,是一个32位无符号整数。
例如:strShort := 'abcde'; 则在内存存储的是4_a_b_c_d_e,下划线只是起分割作用,不算数据。
-------------------------------------------------------------------------------------
PChar:以'\0'结尾的字符串,PChar就是一个字符指针,同C++中的char* p = "abcde";
不同的是下标从1开始算起,WIN32 API使用这种'\0'结尾的字符串,当给WIN32 API函数传参数时一定要注意是以'\0'结尾的。
-------------------------------------------------------------------------------------