Changeset 434 for Common/USyncCounter.pas

Timestamp:

Nov 19, 2012, 2:31:00 PM (12 years ago)

Author:

chronos

Message:

• Modified: Confused TRegistryEx property Context with Context parameter in some methods.
• Fixed: TURI path was not properly handled in case of file in root directory.

File:

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

Common/USyncCounter.pas

@@ -23 +23 @@
     constructor Create;
     destructor Destroy; override;
+    procedure Assign(Source: TSyncCounter);
   end;
 
@@ -71 +72 @@
 end;
 
+procedure TSyncCounter.Assign(Source: TSyncCounter);
+begin
+  Current := Source.Current;
+  Top := Source.Top;
+end;
+
 end.