Forum: Programmieren allgemein
by Sierra,
13. Nov 2006
Sorry, ich vergaß.
Na klar kann ich euch die Lösung mitteilen.
Es war eigentlich ein dummer Fehler, da ich die Variablen
var D: array of Byte;
I,J: Byte;
natürlich "public" deklarieren musste.
Forum: Programmieren allgemein
by Sierra,
12. Nov 2006
Hat sich erledigt.
Trotzdem vielen Dank.
Forum: Programmieren allgemein
by Sierra,
12. Nov 2006
Hi!
Ich habe versucht mit RC4 einen Text aus einem Memo-Feld zu verschlüsseln.
Ich habe das folgendermaßen gelöst.
procedure TForm1.hatVerschluesselnClick(Sender: TObject);
var Str1, Str2: String;
begin
Case hatCalgorithmen.ItemIndex of 0: begin
Str1:=hatMplain.Text;