Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.143 Beiträge
 
Delphi 10.3 Rio
 
#11

AW: Caesar Schifffre Quellcode interpretieren und weiterhelfen:D

  Alt 18. Jan 2012, 15:34
hmm

Delphi-Quellcode:
Var
  i : integer;
  S : ShortString;
  A : array[0..255] of byte absolute S;
  V : byte;
begin
  V := strtoint(Edit1.Text); // <-- Edit!
  S := Edit2.Text;

  for i:=1 to A[0] do
    inc(A[i],V);
end;
Mavarik

Geändert von Mavarik (18. Jan 2012 um 17:02 Uhr)
  Mit Zitat antworten Zitat