diff options
author | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-07-27 07:22:38 +0000 |
---|---|---|
committer | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-07-27 07:22:38 +0000 |
commit | d64abbcef47704ae31de46e63f9954a6d8859ae1 (patch) | |
tree | bb9c5d7eaa92408d9cdca475cb9587eefc9f64fd /packages/fcl-base | |
parent | 318914f393ddf01e0805765382050faa7f2ebd5f (diff) | |
download | fpc-d64abbcef47704ae31de46e63f9954a6d8859ae1.tar.gz |
* Marked extra constructor as overloaded
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@13467 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-base')
-rw-r--r-- | packages/fcl-base/src/idea.pp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/packages/fcl-base/src/idea.pp b/packages/fcl-base/src/idea.pp index b752a59e8d..0f3008ed74 100644 --- a/packages/fcl-base/src/idea.pp +++ b/packages/fcl-base/src/idea.pp @@ -82,7 +82,7 @@ Type Protected Procedure CreateCryptKey(Const S : String; Var Key : TIDEACryptKey); Public - Constructor Create(AKey : TIDEAKey; Dest: TStream); + Constructor Create(AKey : TIDEAKey; Dest: TStream); overload; Property Key : TIDEAKey Read FKey; end; @@ -90,7 +90,7 @@ Type TIDEAEncryptStream = Class(TIDEAStream) public - Constructor Create(Const AKey : String; Dest: TStream); + Constructor Create(Const AKey : String; Dest: TStream); overload; Destructor Destroy; override; function Write(const Buffer; Count: Longint): Longint; override; function Seek(Offset: Longint; Origin: Word): Longint; override; @@ -101,7 +101,7 @@ Type TIDEADeCryptStream = Class(TIDEAStream) public - Constructor Create(Const AKey : String; Dest: TStream); + Constructor Create(Const AKey : String; Dest: TStream); overload; function Read(var Buffer; Count: Longint): Longint; override; function Seek(Offset: Longint; Origin: Word): Longint; override; end; |