Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
5. Mai 2013
Leider hatten wir das mit dem TryStrtoInt noch nicht. Nur eben Exit und if...else wie du sagst.
mit 'Exit' funktioniert's jetzt auch, hab's einfach vergessen!^^
Aber trotzdem Danke für deine Hilfe! ;)
Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
5. Mai 2013
Stimmt! Das hab ich ja vollkommen vergessen! :D Jetzt funktioniert es auch, Danke! :thumb:
Hier noch mal der Teil des Codes der verändert wurde:
begin
if (edtZahl.Text='') then begin lblFehler.Visible:= true; Exit; end
else begin
lblFehler.Visible:= false;
a:= StrtoInt(edtZahl.Text);
if (a > 10000) then begin lblFehler3.Visible:= true ;Exit; end // Hab dann einfach 'Exit'...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
4. Mai 2013
Also mein Lehrer hat uns jetzt mehr Zeit gegeben und die Primzahlen berechnet das Programm jetzt auch.
Das Problem ist jetzt aber, das keine Fehlermeldung mehr angezeigt wird, wenn nichts im Editfeld steht.
Auch wenn die Zahl größer ist als der angegebene Bereich (also bei mir array of) zeigt es zwar die Fehermeldung, rechnet aber trotzdem die Primzahlen bis 10006 aus. Wenn man dann 10006...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
28. Apr 2013
Das Problem ist wirklich, dass ich es bis Morgen brauche. Es ist ja nicht so, dass ich die ganze Woche lang faul rumgesessen hätte, ich habs ja wirklich versucht, aber mit meinem mickrigen Wissen kann ich leider nicht alles aufeinmal verstehen. Ich hab ja versucht es die Woche über zu verstehen, damit ich extra nicht die Leute hier im Forum belästige, aber gegen Ende hab ichs immer noch nicht...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
28. Apr 2013
Ja, wirklich!^^ Wir wollen es ja nicht, um es zu haben, sondern um es zu verstehen! Da hilft es leider nicht wirklich nur zu sagen was falsch ist (ich glaub wir beide sind wie mein name schon sagt in dem gebiet richtige noobs!^^)
Forum: Algorithmen, Datenstrukturen und Klassendesign
by info.noob,
28. Apr 2013
Ich muss genau das gleiche wie Descolas machen und hab vesucht das zu machen was du geschrieben hast, aber das klappt irgendwie nicht. Es sagt immer das Siebdeseratosthenes nich definert ist! Ich würde auch gern wissen wo dann die veriablen genau hinkommen. Das vorher mit dem n:=StrtoInt(Edit.Text)hat auch nicht geklappt!
Ich kann dir ja meinen Quellcode zeigen:
procedure...