Changeset 47 for branches/ByteArray/Channel.pas

Timestamp:

Oct 25, 2023, 12:33:07 AM (7 months ago)

Author:

chronos

Message:

• Added: Common package.
• Modified: Improved BigInt class.

File:

• branches/ByteArray/Channel.pas (modified) (1 diff)

branches/ByteArray/Channel.pas

@@ -9 +9 @@
   TChannel = class
   type
-    TRead = function (Address: TBigInt; DataSize: Byte): TBigInt of object;
-    TWrite = procedure (Address: TBigInt; DataSize: Byte; Value: TBigInt) of object;
+    TRead = function (Address: TBigInt; DataSize: TBigIntSize): TBigInt of object;
+    TWrite = procedure (Address: TBigInt; DataSize: TBigIntSize; Value: TBigInt) of object;
     TGetSize = function : TBigInt of object;
   var