vnc Passwort setzen

[noi]

Um den VNC Server für zukünftige Aufgaben anpassen zu können möchte ich, sofern dies möglich ist, einen opensource VNC verwenden. Zum Schreiben in die Registry benutze ich folgenden Code

Delphi-Quellcode:

     u:=DES_Encrypt('hugohugo',VNC_DES_Key);
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Software\ORL\WinVNC3', true) then
    begin
      try
        reg.WriteBinaryData('aaa',u,sizeof(u));
      except

      end;
    end;
  finally
    reg.Free;
  end;

Das Ergebnis ist dann

Zitat:

aaa -> a8 11 ce 00
Password -> a9 12 64 c2 00 de 76 65

Wie du siehst führe ich meine Tests nur mit 8 Zeichen langen Passwörtern durch. Als VNC Referenz habe ich hier TightVNC genommen, da der Quelltext (d3des.c) sehr gut zu deiner Unit zu passen scheint(s. Anhang).