Hallo,
ich bin neu hier im Forum und hoffe, dass ich alles richtig mache
.
Zu meinem Problem:
Ich programmiere jetzt ein Jahr mit Lazarus kleinere Dinge, wie Ampeln, Timer, und BMI Rechner.
Doch jetzt komme ich langsam an meine Grenzen:
Ein Rechentrainer mit den für mich neuem Integer Zeug und so
.
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
result_a: array[(round_i)] of integer;
i:integer;
begin
for i := 1 to round_i do begin
result_a[i]:= a*b;
if (c = reuslt_a[i]) then //result_a:= richtig
end;
end;
Hier soll nun folgendes passieren:
round_i ist die Anzahl der Runden (Aufgaben), welche ja auch bestimmen soll, wie groß der/das Array sein soll, und ist deshalb als Integer festgelegt.
Nun soll beim klicken das Ergebnis mit der Eeingabe
c verglichen werden, und wenn richtig soll das im
result_a[1] hinterlegt werden. Beim nächsten klicken (bei der nächsten Aufgabe) erneut. Diesmal soll das Ergebnis aber in
result_a[2] hinterlegt werden. Und so weiter. Wie mache ich das? SO kommt es nämlich zu einer Fehlermeldung.
Und wie kann ich
Code:
zahla.caption:=IntToStr(Random(area_n));
zahlb.caption:=IntToStr(Random(area_n));
passend in die Schleife einfügen?
Ich bin sehr dankbar, für Hilfe!!
Liebe Grüße Joel
PS ich hoffe, ich habe mein Problem richtig geschildert! Ich kann auch den ganzen Quelltext einfügen
.
und ich nutze Lazarus