Forum: Sonstige Fragen zu Delphi
by guidok,
24. Mär 2010
Naja, im einfachsten Fall probier es doch mal so:
(IntToStr( StrToInt(text) + StrToInt(schluessel)))
Für den Schlüssel musst du dann natürlich eine separate Indexvariable nehmen, die von 1 bis Length(Schluessel) - 1 gezählt wird und dann wieder bei 1 beginnt.
Ein kleiner Tip noch: Überleg dir bevor du programmierst erst mal auf einem Blatt Papier was du machen willst und wie es...
Forum: Sonstige Fragen zu Delphi
by guidok,
24. Mär 2010
Und was war nu der Fehler?
Forum: Sonstige Fragen zu Delphi
by guidok,
24. Mär 2010
Also bei mir funktioniert das problemlos:
procedure TForm1.Button1Click(Sender: TObject);
var
s: integer;
ttext: string;
begin
for s:= 1 to length(Edit1.Text) do
begin
Forum: Sonstige Fragen zu Delphi
by guidok,
24. Mär 2010
korregieren --> korrigieren :wink: