Forum: Object-Pascal / Delphi-Language
by yga,
25. Jan 2012
Danke an alle, der Thread kann geschlossen werden, es klappt jetzt alles. :-D
@Helmi: Das ist TryStrToInt ist praktisch, das werd ich auch in Zukunft benutzen, thx.
Forum: Object-Pascal / Delphi-Language
by yga,
25. Jan 2012
Okay, das verwirrt mich. Ich hab doch bei jedem der drei Fälle mit if abgesichert, dass sich auch mehr als 2 Kugeln der Farbe dort befinden, ansonsten springt er doch sofort zum Ende und "lost" den nächsten Fall aus. Mein einziges Problem besteht nun noch darin, dass wenn Weiß eine ungerade Anzahl hat, sich das Programm aufhängt. Ich weiß bloß nicht, wie das damit zusammenhängt...
Forum: Object-Pascal / Delphi-Language
by yga,
25. Jan 2012
Aah, danke. :D Vielen Dank für die schnelle Hilfe.
Sorry, Random(x) wurde mir anders erklärt, dass er dort eine zufällige Zahl aus der Menge 0 bis x raussucht. Deswegen auch diese umständliche Beschreibung. Ist gemerkt.
until s+w=1; war so gemeint, dass wenn die Anzahl beider Kugeln im Topf 1 ist, die Schleife enden soll. Muss ich mir nochmal genauer anschauen.
Mir war beim Code noch ein...
Forum: Object-Pascal / Delphi-Language
by yga,
25. Jan 2012
Hallo Community,
ich bin Info-Neuling und schlicht erschlagen von der Masse an Subforen, ich hoffe ich poste hier im richtigen Bereich. Ich brauche Hilfe bei einem Info-Projekt. Ich habe zahlreiche Änderungen am Code vorgenommen, es funktionierte sogar kurzzeitig, doch dann bei nebensächlichen Bugfixes wieder nicht, etc. Ich bin vollkommen aufgeschmissen, bin das Programm zig mal durchgegangen...
