比如
var
ip:PAnsiChar;
command:PAnsiChar;
....command;='net send'+ip+'hello';报错
incompatible types:'string'and 'PAnsiChar'
var
ip:PAnsiChar;
command:PAnsiChar;
....command;='net send'+ip+'hello';报错
incompatible types:'string'and 'PAnsiChar'
解决方案 »
- fastreport 显示行颜色
- 关于假Wsock32.dll导致的程序初始化错误!
- Delphi 導入 Flash 控件,如何讓它實現透明背景? 能不能做到?
- 如何由指定月末日期得到月初日期(类似财务上的结算日期)?急!急!急!急!
- 求助关于动态表名的标识问题
- 我设置了TmainMenu的ownerDraw等于true,为什么在onDrawItem中接收不到重画事件
- 散分6
- 颜色clInfoBk可以用十六进制表示吗?其值为多少?
- 我控制面板中的程序有些卸载不了啦。怎么办
- 简单问题:用database怎么连远程的数据库?
- 不用BDE直接链access库发布时出错,如何解决?好头疼!
- 请帮我解释一下程序
ip: PAnsiChar;
command: PAnsiChar;
temp: String;
begin
temp:= 'net send '+ ip +'hello';
copmmand:= PAnsiChar(temp);
end;
GetMem(ip,255);
StrCopy(ip,'Test');
StrCopy(Command,'net send');
StrCat(Command,ip);
StrCat(Command,'hello');
FreeMem(ip);
FreeMem(command);
然后。
这么和你说:
var
A, B, D: PChar;
C: String;
begin
C := StrPas (A) + StrPas (B);
D := PChar (C);
//或者》》
//D := PChar (StrPas (A) + StrPas (B));
end;