* Make Terminated property accessible for descendents

git-svn-id: trunk@16898 -
This commit is contained in:
joost 2011-02-08 19:22:09 +00:00
parent 4e18e505f6
commit 3bbfe18ec7

View File

@ -108,6 +108,7 @@ Type
procedure ShowRequestException(R: TResponse; E: Exception); virtual;
Function GetEmail : String; virtual;
Function GetAdministrator : String; virtual;
property Terminated: boolean read FTerminated;
Public
constructor Create(AOwner: TComponent); override;
Procedure Run; virtual;