Calling abstract method in TIdHMACSHA1.InitHash;

Giganews Newsgroups
Subject: Calling abstract method in TIdHMACSHA1.InitHash;
Posted by:  Dominic Willems (emp…@emptiness.net)
Date: Mon, 14 Sep 2009

Couldn't install dclIndyProtocols in D5 because this was causing an
abstract error in unit IdHMACSHA1. The inherited needs to be removed.

procedure TIdHMACSHA1.InitHash;
begin
//  inherited;      <--- commented out and it works
  FHash := TIdHashSHA1.Create;
  FHashSize := 20;
  FBlockSize := 64;
  FHashName := 'SHA1';
end;

Version 10.2.3.

Replies