Bilder Verschlüsseln

[Corpsman]

also eine komplette lösung will ich dir eigentlich nicht hinschreiben, aber hier mal etwas was dir die Richtung zeigen könnte

Nehmen wir an du hast ein dreistelliges Passwort "ABC" dann zerlegst du es in seine Chars und verschlüsselst via Xor

eine Wirklich schlechte (Weil langsame) und nicht für variable PW's geeignete Lösung sei etwa :

Delphi-Quellcode:

var i,j:Integer
    bi:TBitmap;
    r,g,b:Byte;
begin
.. Init
  for i := 0 to bi.width -1 do
    for j := 0 to bi.height -1 do begin
       r := getRvalue(bi.canvas.pixels[i,j]);
       g := getgvalue(bi.canvas.pixels[i,j]);
       b := getbvalue(bi.canvas.pixels[i,j]);
       r := r Xor 65; // 65 ist der Ascii Code von "A"
       g := g Xor 66; // 66 ist der Ascii Code von "B"
       b := b Xor 67; // 67 ist der Ascii Code von "C"
       bi.canvas.pixels[i,j] := rgb(r,g,b);
    end;
.. Freigeben
end;

ich hoffe das hilft dir auf die sprünge, letzendes must da aber noch einiges Optimieren das es nachher brauchbar geht..