Browse Source

* added tthread.destroy override

peter 24 years ago
parent
commit
ee7feef590
1 changed files with 5 additions and 2 deletions
  1. 5 2
      fcl/inc/classesh.inc

+ 5 - 2
fcl/inc/classesh.inc

@@ -1014,7 +1014,7 @@ type
     FCallExitProcess : boolean;
     FCallExitProcess : boolean;
 {$endif}
 {$endif}
     constructor Create(CreateSuspended: Boolean);
     constructor Create(CreateSuspended: Boolean);
-    destructor Destroy; { override; !!!: Why???}
+    destructor Destroy; override;
     procedure Resume;
     procedure Resume;
     procedure Suspend;
     procedure Suspend;
     procedure Terminate;
     procedure Terminate;
@@ -1242,7 +1242,10 @@ function LineStart(Buffer, BufPos: PChar): PChar;
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.8  2001-02-09 20:38:28  sg
+  Revision 1.9  2001-04-13 18:03:51  peter
+    * added tthread.destroy override
+
+  Revision 1.8  2001/02/09 20:38:28  sg
   Merges from Fixbranch:
   Merges from Fixbranch:
   * Extended TRect type to have TopLeft and BottomRight fields as well
   * Extended TRect type to have TopLeft and BottomRight fields as well
   * Added "Driver" property to TReader
   * Added "Driver" property to TReader