### 解决 Delphi 中 `Task.standardOutput` 类型不匹配问题 在 Delphi 开发中，当使用 `NSTask` 或者类似的跨平台组件来执行外部命令并捕获其输出时，经常会遇到类型不匹配的问题。具体来说，`Task.standardOutput` 预期接收一个 `NSPipe` 实例，而开发者可能误用了其他类型的对象。 #### 错误分析 从描述来看，错误的核心在于 `Task.standardOutput` 的赋值操作未能正确完成。这通常是因为未正确初始化 `NSPipe` 对象或将非兼容的对象类型赋值给了 `standardOutput` 属性[^1]。 #### 正确解决方案 为了确保 `Task.standardOutput` 能够正常工作，必须遵循以下步骤： 1. 创建一个 `NSPipe` 实例。 2. 将该实例分配给 `Task.standardOutput`。 3. 使用 `fileHandleForReading` 方法访问管道中的数据流，并从中读取标准输出内容。 以下是完整的修正代码示例： ```delphi uses Macapi.ObjectiveC, iOSApi.Foundation, FMX.Platform.Mac; procedure ExecuteCommandAndGetOutput(const Command: string); var Task: NSTask; Pipe: NSPipe; FileHandle: NSFileHandle; Data: NSData; OutputStr: NSString; begin // 初始化任务 Task := TNSTask.Create; try // 创建管道用于捕获标准输出 Pipe := TNSPipe.Create; Task.standardOutput := Pipe; // 设置任务的标准输出到管道 // 配置任务的启动路径和参数 Task.launchPath := NSStr('/bin/sh'); // 使用 Shell 执行命令 Task.arguments := TNSArray.Wrap( TNSArray.OCClass.arrayWithObjects(NSStr('-c'), NSStr(Command), nil)); // 启动任务 Task.launch; // 等待任务结束 while not Task.isFinished do begin Sleep(10); // 循环等待直到任务完成 end; // 获取文件句柄以读取输出 FileHandle := Pipe.fileHandleForReading; Data := FileHandle.readDataToEndOfFile; // 读取所有可用的数据 // 将数据转换为字符串形式 OutputStr := TNSString.Wrap(Data.description); Writeln(string(OutputStr.UTF8String)); // 输出结果至控制台 finally Task.release; // 释放资源 end; end; // 测试调用 begin ExecuteCommandAndGetOutput('echo Hello World && ls -la'); end. ``` #### 关键点说明 - **Pipeline Setup**: `NSPipe` 是连接子进程与其父进程的重要桥梁。通过设置 `Task.standardOutput`，可以将子进程的标准输出重定向到当前应用可读的位置[^2]。 - **Waiting Mechanism**: 在某些情况下，直接调用 `ReadToEnd()` 可能会导致阻塞或无法及时获取全部输出。因此引入循环检测机制配合 `isFinished` 属性判断任务状态[^3]。 - **Thread Safety & Performance Considerations**: 上述实现简单易懂但并不完全线程安全。对于复杂场景建议考虑异步方式或其他高级技术提升性能与稳定性。 --- ###