Delphi X执行shell命令,并获取返回结果
Delphi X执行shell命令,并获取返回结果话不多说,我们上代码; 建议你把以下代码抄到线程里面运行。话不多说,我们上代码; 建议你把以下代码抄到线程里面运行。uses System.Classes, Winapi.Windows, System.SysUtils;function RunDosCommand2(Command: string): string;const //预防返回量大,我们设置4096个字节 DEF_OUTPUT_BUFSIZE = 4096;var
原创
2020-08-01 09:56:49 ·
494 阅读 ·
0 评论