Forum: Object-Pascal / Delphi-Language
Delphi
by rollstuhlfahrer,
22. Mai 2010
was heißt: "zu oft verschlüsselt"??
und deine Prüfmethode ob nur erlaubte Zeichen in dem Eingabefeld stehen ist der letzte Müll. Es muss nur 1 Zeichen drin sein und schon meint die, es wären nur gültige Zeichen drin. Meint sie, es wären nur ungültige Zeichen drin, dann kommt irgendwas zufälliges raus, weil v nicht initialisiert ist.
Mach doch ne eigene Funktion mit booleschem Rückgabewert,...
Forum: Object-Pascal / Delphi-Language
Delphi
by rollstuhlfahrer,
22. Mai 2010
wie in #11 schon gesagt: Es fehlt ein .Text
Bernhard
Forum: Object-Pascal / Delphi-Language
Delphi
by rollstuhlfahrer,
22. Mai 2010
außerdem finde ich es angebracht, dass man Variablen entsprechend ihrer Bedeutung benahmt. Du hast jetzt hier 4 Zählvariabnel. Als ich vor etwa 3 Monaten eine Caesar-Verschlüsselung im Unterricht erstellen sollte, kam ich mit einer einzigen zurecht. KLeiner Tipp dafür: Schau dir mal den Quellcode von UpperCase an. Da braucht man nur 1 Zeile zu verändern und den Schlüssel einzulesen (inkl. aller...
Forum: Object-Pascal / Delphi-Language
Delphi
by rollstuhlfahrer,
22. Mai 2010
Soweit ok.
Folgendes musst du mit deinem Edit verknüpfen, in das nur Zahlen dürfen (OnKeyPress). Dies sorgt dafür, dass nur Zahlen eingegeben werden können und alles andere in einem Fehlerton endet.
procedure TForm1.eSchluesselKeyPress(Sender: TObject; var Key: Word);
begin
if NOT (Key in ) then
Key := #0;
end;
Hausaufgaben macht hier keiner und erst recht keine Facharbeit. ->...