AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Problem bei Verschlüsselungsprogramm

Ein Thema von Firefly · begonnen am 17. Mär 2010 · letzter Beitrag vom 23. Mär 2010
Antwort Antwort
Firefly

Registriert seit: 17. Mär 2010
4 Beiträge
 
#1

Re: Problem bei Verschlüsselungsprogramm

  Alt 22. Mär 2010, 15:55
Aaalso das ganze funktionier mittlerweile ganz gut,
bloß geht das "if klartext[i] in alphabet then" nicht.
gibts da eine alternative? vielleicht eine, die meine variable alphabet von oben beeinhaltet?
die hier:

Delphi-Quellcode:
constructor TCaesar.Create;
var i:Char;
begin
  Alph:=' ';
  for i:= 'ato 'zdo begin
    Alph:=Alph+i;
    Alph:=Alph+Alph;
  end;
  inherited Create;
end;
Die variable besteht ja quasi zweimal aus dem alphabet, aber ich krieg es nicht hin, dass die encode funktion irgendwie überprüft, ob der buchstabe der reingeht auch in dieser variable vorkommt!
ich hatte schon überlegt das ganze in einer schleife laufen zu lassen und dann halt jeden buchstaben einzeln über den index anszusprechen und zu vergleichen.
aber das geht irgendwie nicht, weil ich wollte das mit "if klartext[i] = alphabet[i]" machen, aber dann guckt der ja nicht alle buchstaben durch.
Ich hab das auch schon mit "if klartext[i] = alphabet[1] or alphabet [2].... or alphabet[26]" probiert, aber das geht scheinbar auch nicht, also syntaktisch.
fällt euch da was ein?

und "AnsiLowerCase" geht auch nicht, hab' jetzt UpCase genommen.
muss ich dann in Encode noch was ändern?

danke schonmal für eure ganze hilfe! (:
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:23 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz