es hat mir keine Ruhe gelassen und daraufhin habe ich den Aufruf dahingehend verändert:
Delphi-Quellcode:
procedure TForm1.btn1Click(Sender: TObject);
var Key, Text : String;
xByte:TArray<System.Byte>;
begin
Key := (edtkey.text);
Text:= (edtText.text);
xByte:=THash_SHA224.HMAC(TEncoding.UTF8.GetBytes(Key),TEncoding.UTF8.GetBytes(Text));
edtoutput.text:= StringToHex(TEncoding.ANSI.GetString (xByte));
end;
Es klappt nun und ich erhalte den gewünschten HMAC-Hash.
Geht das so, kann man das so machen? Oder ist das aus eurer Sicht Klamauck.
Die Umwandlung string to Hex habe ich mit einer gesonderten Methode durchgeführt. Da gibt es sicher
geschmeidigere Lösungen.
Für eure Meinungsäußerung wäre ich dankbar.