delphi指针和字符串

要点：

1.数组名称要用@取地址才能作为地址, 与c++有点不同

2.StrCopy函数是把第二个参数复制到第一个参数地址里面去

3.StrCat函数是把第二个参数字符串内容，接到第一个参数地址后面

program MyPoint; //指针详解

{$APPTYPE CONSOLE}

uses

SysUtils,windows,Generics.Collections ;

{指针和字符串}

procedure MyFunc5();

var

str : array [1..50] of char;

pstr : PChar; //Pchar 也就是 ^Char

begin

StrCopy(@str, '田攀学Delphi!'); //数组名称要取地址才能作为首地址与c++有点不同

StrCat(@str, ' To Be No1 !');//把指针和后面字符串指针内容连接起来

GetMem(pstr, sizeof(char) * 50);//为指针pstr开辟50个char长度的空间

StrCopy(pstr, @str);//赋值字符串

Writeln(pstr);

FreeMem(pstr); //释放指针

end;

{main主函数}

begin

MyFunc5();

Readln;//回车退出

end.

https://www.cnblogs.com/GodPan/p/3390100.html

推荐分享