delphixe中关于pchar的问题
begin
try
Result := PChar(GetPub_WebServicePortType(false, AURL).downLoad(ATaskType, AJXS8M,
AIP, AJSON));//当这个接口数据不大是能正常传给调用的exe,当数据很大时这里的result是有值的,但是调用的exe接收到的是空
//aa := TStringList.Create;
//aa.Add(Result);
//aa.SaveToFile('11.txt');//这个是用来调试的,存成记事本有9m
except
on E: Exception do
begin
Result := PChar(E.Message);
end;
end;
end;
我也这样试过:result返回left(GetPub_WebServicePortType(false, AURL).downLoad(ATaskType, AJXS8M,
AIP, AJSON)),N),当n到1500多的时候就出现那种情况了
相关推荐
Delphi7升级到Delphi 2010、Delphi XE、Delphi XE2总结
Delphi7升级到Delphi 2010、Delphi XE、Delphi XE2总结 !最后有个项目要移植到64位,所以这个很有用。在2010中PChar已经不再表示PAnsiChar而是表示PWideChar,如果依然这样写,运行时很可能会得到一个内存访问错误。因为每 次Inc(P),实际上指针向前移动了2字节,因为SizeOf(WideChar)=2,Inc(P)相当于 P:=P+SizeOf(WideChar)。 解决方法是把PChar替换成PAnsiChar
delphi隐藏窗体在windows任务栏,在右下角,单独集成单元文件,比控件好用
delphi隐藏窗体在windows任务栏,在右下角,单独集成单元文件,比控件好用,支持delphi7---XE10,主要区分是下面的函数 delphiXE10 procedure TShellNotifyIcon.LoadAppIcon; var s: string; begin with NotifyIcon do begin cbSize := SizeOf; //TNotifyIconData Wnd := Classes.AllocateHWnd(WndProc); uID := 1; uFlags := NIF_ICON or NIF_MESSAGE or NIF_TIP; uCallBackMessage := WM_NotifyIcon; hIcon := Application.Icon.Handle; s := HintStr; //StrLCopy(szTip, PAnsiChar(s), Length(s)); //Icon.OnClick:=onclik(TObject); StrCopy(szTip,PChar(s)); end; Shell_NotifyIcon(NIM_ADD, @NotifyIcon); end; delphi7 procedure TShellNotifyIcon.LoadAppIcon; var s: string; begin with NotifyIcon do begin cbSize := SizeOf(TNotifyIconData); //TNotifyIconData Wnd := Classes.AllocateHWnd(WndProc); uID := 1; uFlags := NIF_ICON or NIF_MESSAGE or NIF_TIP; uCallBackMessage := WM_NotifyIcon; hIcon := Application.Icon.Handle; s := HintStr; //StrLCopy(szTip, PAnsiChar(s), Length(s)); //Icon.OnClick:=onclik(TObject); StrCopy(szTip,PChar(s)); end; Shell_NotifyIcon(NIM_ADD, @NotifyIcon); end;
Delphi XE10 调用外部程序并等待其运行结束_调用外部程序等待运行结束_
Delphi XE10 调用外部程序并等待其运行结束
delphi实现ping功能代码
用delphi语言来实现网络中ping的相关功能!
DELPHI在视窗里执行DOS命令并返回结果.rar
DELPHI在视窗里执行DOS命令并返回结果,测试可用。


