TShellSession

public
`constructor Create(AShell:TShell; AIdentifier:LongWord);`
`destructor Destroy; override;`
private
`FShell:TShell;`

`FLock:TCriticalSectionHandle;`

`FIdentifier:LongWord;`	Unique identifier for this session
`FFlags:LongWord;`

`FPrompt:String;`	Current prompt for this session

`FData:Pointer;`	Shell private data for this session

`FHistories:TLinkedObjList;`
`FCurrentHistory:TShellHistory;`

`procedure SetFlags(AFlags:LongWord);`
`procedure SetData(AData:Pointer);`

`function GetPrompt:String;`
`procedure SetPrompt(const APrompt:String);`
protected
`function AcquireLock:Boolean;`
`function ReleaseLock:Boolean;`
public
`property Shell:TShell read FShell;`

`property Identifier:LongWord read FIdentifier;`
`property Flags:LongWord read FFlags write SetFlags;`

`property Prompt:String read GetPrompt write SetPrompt;`

`property Data:Pointer read FData write SetData;`

`function AddHistory(const ACommand:String):Boolean;`
`procedure ClearHistory;`
`function FirstHistory:String;`
`function LastHistory:String;`
`function NextHistory:String;`
`function PrevHistory:String;`
`function CurrentHistory:String;`

Contents