Hallo,
ich komm gleich zu Sache:
Ich habe ein Problem mit einer FOR-Schleife. Ich möchte mit einer FOR-Schleife die Wurzel/das Quadrat aus 1 bis 25 ausrechnen. Das Ganze möchte ich dann in einer ListBox ausgeben.
Nun, mein Code sieht bisher so aus:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var WaI:extended;Qva,a:integer;i:integer;
Begin
For i:=1 to 25 do ;
begin
WaI:=sqrt(i) ;
i:=integer(ListBox1.Items) ;
For a:=1 to 25 do
Begin
Qva:= sqr(i);
a :=integer(ListBox2.Items) ;
end;
Wenn ich auf "Start" drücke kommt eine Fehlermeldung, welche lautet:
Zitat:
Unit.pas(62): Anweisung erwartet, aber Dateiende gefunden
Ich weiß nun nicht, was ich falsch gemacht habe.
Und ich hab noch ne zweite Frage:
Wie kann ich das Ganze in ner ListBox ausgeben? Hab es mit dem Obenstehenden Code versucht, dann kommt aber beim Quadrat die Fehlermeldung
Zitat:
Anweisung für FOR-Schleifenvariabe gefunden
Das kommt aber beim ersten nicht.
Ich hoffe ihr könnt mirin beiden Fragen helfen!
Gruß,
timmy
PS: 1. Zeile 62 ist längst hinter den letzten "End".
2. Bin Delphi-Neuling