Changeset 560 for Common/UPool.pas

Timestamp:

Sep 10, 2022, 11:35:01 AM (3 years ago)

Author:

chronos

Message:

• Modified: Code cleanup.
• Added: Implode and explode method.
• Added: Custom specialized generic classes.

File:

• Common/UPool.pas (modified) (2 diffs)

Common/UPool.pas

@@ -106 +106 @@
 constructor TThreadedPool.Create;
 begin
-  inherited Create;
+  inherited;
   Lock := TCriticalSection.Create;
 end;
@@ -114 +114 @@
   TotalCount := 0;
   Lock.Free;
-  inherited Destroy;
+  inherited;
 end;