誰か実装してください。

TProcess = class
public
　procedure Execute;
　procedure Terminate;
　property Executing: Boolean;
published
　property ExeName: String read FExeName write FExeName;
　property Directory: String read FDirectory write FDirectory;
　property Args: TStrings read FArgs write FArgs;
　property Priority: TProcessPriority;

　property UsePipe: Boolean;
　
　property OnExecute;
　property OnExit;
　
　property OnStdOutput;
　property OnErrOutput;
　property OnInput;
end;