Home Explore Help
Sign In
pascal
/
fpc
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* Make OnLastRelease event available. Patch by michalgw, fixes issue #41247

Michaël Van Canneyt 3 months ago
parent
e867b54034
commit
dd3a4de619
1 changed files with 1 additions and 0 deletions
Unified View Show Diff Stats
  1. 1 0
      packages/winunits-base/src/comserv.pp

+ 1 - 0
packages/winunits-base/src/comserv.pp
View File 

@@ -99,6 +99,7 @@ type
 
     property IsInteractive: Boolean read fIsInteractive;
 
     property IsInteractive: Boolean read fIsInteractive;
 
     property StartMode: TStartMode read FStartMode;
 
     property StartMode: TStartMode read FStartMode;
 
     property ServerObjects:integer read fCountObject;
 
     property ServerObjects:integer read fCountObject;
 
+    property OnLastRelease: TLastReleaseEvent read FOnLastRelease write FOnLastRelease;
 
   end;
 
   end;
 
 
 
 var
 
 var