diff --git a/X2UtService.GUIContext.Form.pas b/X2UtService.GUIContext.Form.pas index addc190..43fe566 100644 --- a/X2UtService.GUIContext.Form.pas +++ b/X2UtService.GUIContext.Form.pas @@ -38,7 +38,6 @@ type FServiceThread: TThread; FAllowClose: Boolean; protected - destructor Destroy; override; procedure DoShow; override; procedure UpdatePredefinedControlCodes; virtual; @@ -48,6 +47,8 @@ type property ServiceThread: TThread read FServiceThread; public + destructor Destroy; override; + property Context: IX2ServiceContext read FContext write FContext; property Service: IX2Service read FService write FService; end;