TProcess

type TProcess = class(TComponent)

protected

  FRunning: Boolean;

  FExitCode: Cardinal;

  FInputStream: TOutputPipeStream;

  FOutputStream: TInputPipeStream;

  FStderrStream: TInputPipeStream;

  FProcessID: Integer;

  FThreadID: Integer;

  FProcessHandle: Thandle;

  FThreadHandle: Thandle;

  procedure CloseProcessHandles; virtual;

  procedure CreateStreams(); virtual;

  procedure FreeStream();

  procedure Loaded; override;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Execute; virtual;

  procedure CloseInput; virtual;

  procedure CloseOutput; virtual;

  procedure CloseStderr; virtual;

  function Resume; virtual;

  function Suspend; virtual;

  function Terminate(); virtual;

  function WaitOnExit();

  function ReadInputStream();

  function RunCommandLoop(); virtual;

  property WindowRect: Trect; [rw]

  property Handle: THandle; [r]

  property ProcessHandle: THandle; [r]

  property ThreadHandle: THandle; [r]

  property ProcessID: Integer; [r]

  property ThreadID: Integer; [r]

  property Input: TOutputPipeStream; [r]

  property Output: TInputPipeStream; [r]

  property Stderr: TInputPipeStream; [r]

  property ExitStatus: Integer; [r]

  property ExitCode: Integer; [r]

  property InheritHandles: Boolean; [rw]

  property OnRunCommandEvent: TOnRunCommandEvent; [rw]

  property RunCommandSleepTime: Integer; [rw]

  property OnForkEvent: TProcessForkEvent; [rw]

published

  property PipeBufferSize: Cardinal; [rw]

  property Active: Boolean; [rw]

  property ApplicationName: TProcessString; [rw] deprecated ;

  property CommandLine: TProcessString; [rw] deprecated ;

  property Executable: TProcessString; [rw]

  property Parameters: TProcessStrings; [rw]

  property ConsoleTitle: TProcessString; [rw]

  property CurrentDirectory: TProcessString; [rw]

  property Desktop: string; [rw]

  property Environment: TProcessStrings; [rw]

  property Options: TProcessOptions; [rw]

  property Priority: TProcessPriority; [rw]

  property StartupOptions: TStartupOptions; [rw]

  property Running: Boolean; [r]

  property ShowWindow: TShowWindowOptions; [rw]

  property WindowColumns: Cardinal; [rw]

  property WindowHeight: Cardinal; [rw]

  property WindowLeft: Cardinal; [rw]

  property WindowRows: Cardinal; [rw]

  property WindowTop: Cardinal; [rw]

  property WindowWidth: Cardinal; [rw]

  property FillAttribute: Cardinal; [rw]

  property XTermProgram: string; [rw]

end;

TProcess

TObject