[LockBox3] Komischer Stream bei RSA Keys

[milos]

Hallo ihr beiden,

Vielen Dank für eure Tipps.

Ich habe beides versucht, leider auch ohne Erfolg. Bei himitsu's Vorschlag bin ich mir nicht 100% sicher ob ich das so gemacht habe wie es gedacht ist.

Der Code sieht momentan so aus:

Delphi-Quellcode:

var
  LStream : TFileStream;
begin
  FSig := TSignatory.Create(nil);
  FCryptoLib := TCryptographicLibrary.Create(nil);
  FCodecRSA := TCodec.Create(nil);

  // setup codec
  FCodecRSA.CryptoLibrary := FCryptoLib;
  FCodecRSA.StreamCipherId := 'native.RSA';
  FCodecRSA.ChainModeId:= 'native.CBC';
  FCodecRSA.AsymetricKeySizeInBits := 512;

  // setup sig
  FSig.Codec := FCodecRSA;

  // generate and save keys
  if FSig.GenerateKeys then
  begin
    LStream := TFileStream.Create('D:/rsa_keys.txt', fmCreate);
    try
      LStream.Position := 0;
      LStream.Size := 0;
      FSig.StoreKeysToStream(LStream, [partPublic, partPrivate]);
      LStream.Size := LStream.Position;
    finally
      LStream.Free;
      ShowMessage('Success');
    end;
  end
  else
    ShowMessage('Failed');
end;

Der Output des Streams in eine neue Datei sieht leider immer noch ähnlich aus:

Code:

N
LockBox3   @   ™p ½„µH*XVªr¤\ö�ÖðÞæÞÒ*9yíó£¹›ÙœÓv¨¶Í÷ì…€n`K
0)j7ÐNõCˆ@l    @   Áa‡,‰"¬½ÖU¼;‘†É“@u¬gO=éïç{ö÷~u\ã~Œ1#Ò¿hDz¹e�r=>=øØ VÒÃ!   ¹›fmÈä9m…t¾ÇŠƒ*‡M/¸’åc˜°WDHåIh    á«ÕÓÌÍß¼˜¼e*=þÏ
X' wJŽwenî4!   ©h®'9¿0Tûù¶©|ØÜ'&†¢£ü }÷À"iî>    áÞÃËcçÎ߬�øxd²sõI~šç•j׬ܨ,    ̘ñ0/ÚdkEjòMIaFµs¹’M)t–}ðÝ,…˜N
LockBox3   @   •†ïâTøØ*8y9]ÌäË_=�ò�ÂÊKß°á2é1(ób‚EtÕ†=2eé)ÃT142:qåÌh>Òä&n’�    @   Á�ÔQ
J`äÄÙX¢]ÁÔÝ&
»SdU&#8240;IrKzIóBw&#8240;2#úÄ&#8250;Ù&#732;0´KÛó;<ÎAÏjÖÚÐ&#8250;ºÀ
�|!   &#8211;wßÝÒïNbµrðq&#8249;&#338;Ï&#8482;mZµÙçØ&#382;à&#8211;&    Q±*h&#8220;ÞÑÄаÅ4Ó¾Gû?p&#8217;«ºgÞXløÌ><!   q=pt
ñòÊ°K!î3`Eiæ%Þþ&#8364;ùp=&#8224;¬�kaà    qÂ&#382;±d{«ß©F¢N¦&#8216;OÏÿ&#381;�(&#8224;kU&#8249;&=4W.!   êôÄåpótézô?ËZW&#8250;³ð&#338;½}&#8217;È̳#&#8364;óäÑ#

Folgende Dinge habe ich noch ausprobiert:
- Manuelle Installation von LockBox3 ohne GetIt (bringt keine spürbare Änderung)
- Weitere Dinge mit LStream.Position und LStream.Size (auch kein Effekt)

Mittlerweile denke ich eher dass dies ein Problem mit der Umgebung bzw. der Installation der Bibliothek ist. Könnte dies sein? Falls ja, was könnte ich tun um dies zu testen? Eine zweite Umgebung steht mir momentan leider nicht zur Verfügung. Könnte den Code jemand bei sich lokal testen und schauen ob auch solch ein "gibberish" rauskommt?

Vielen Dank für eure Unterstützung.