在线求助类型转换

Question

在D5中怎样实现把string类型赋给pchar类型，注意是D5

Answer 1

var
  pc:PChar;
  str:String;
str:='这是string类型的数据';
pc:=Pchar(str);
//进行强制类型转换.

Answer 2

不是这样的，pc定义如下
pc:array[0..21]of char

Answer 3

用strpcopy函数:
var
  pc:array[0..21]of char;
  str:String;
begin
str:='这是string类型的数据';
strpcopy(pc,str);