我正在使用 Lazarus 开发一个执行 gcc 的程序:
var
AProcess: TProcess;
begin
if SaveDialog1.Execute then
AProcess := TProcess.Create(nil);
AProcess.CommandLine := 'gcc.exe ' + SaveDialog1.FileName + ' -o ' TextField23.Text;
AProcess.Options := AProcess.Options + [poWaitOnExit, poUsePipes];
AProcess.Execute;
AProcess.Free;
end;
但是我想在另一个 Form( OutputForm
) 上显示 gcc 的日志(输出),它只有一个 TMemo( OutputMemo
)。
我该怎么做?