看一下这段代码
rarpath:string;
rar:^string;
begin
path:=edit1.Text;
backpath:=edit1.text+'\ctback'+timestr+'\';
rarpath:='a c:\test.rar c:\test.txt';
rar:=@rarpath;
shellexecute(handle,nil,'winrar',rar^,nil,SW_SHOW);
错误信息为:
[Error] main.pas(92): Incompatible types: 'String' and 'PAnsiChar'
怎样把String 类型强制转换为PAnsiChar
rarpath:string;
rar:^string;
begin
path:=edit1.Text;
backpath:=edit1.text+'\ctback'+timestr+'\';
rarpath:='a c:\test.rar c:\test.txt';
rar:=@rarpath;
shellexecute(handle,nil,'winrar',rar^,nil,SW_SHOW);
错误信息为:
[Error] main.pas(92): Incompatible types: 'String' and 'PAnsiChar'
怎样把String 类型强制转换为PAnsiChar
用楼上的方法就可以了