AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Sammelbilder [lineares Feld]

Ein Thema von me2u · begonnen am 25. Apr 2007 · letzter Beitrag vom 3. Mai 2007
 
Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#8

Re: Sammelbilder [lineares Feld]

  Alt 26. Apr 2007, 22:41
Ein paar Dinge
1. Doppelposts sind erst ab 24 h erlaubt (lieber editieren. Die Antworter werden es dir danken)
2. Benutzte statt einer for-schleife eine while-schleife. Weil es kann ja sein, dass man mit 100 Tafeln immer noch nicht alle gefunden hat
3. Du machst einen größeren Fehler bei der Zuweisung:
Delphi-Quellcode:
if x[Random(..)] = false then
  x[Random(..)] := true;
Und zwar erstellst du einmal beim überprüfen und einmal beim setzen eine Zufallszahl, welche unterschiedlich sein können.
Also =>
Delphi-Quellcode:
a := Random(..)
if x[a] = false then
  x[a] := true;
4. Wenn du das Bild schon besitzt beendet er die Prozedur Was nicht im Sinne der Aufgabe ist.

Mein Tipp wäre also:
Durchlaufe die Schleife solange bis du keine fehlenden Bilder mehr hast. (fehlende Bilder ist eine Variable)
In jeden druchlauf überprüfst du ob du das Bild schon hast.
Wenn es ein neues Bild ist, setze ein weniger fehlendes Bild und setze das Bild auf wahr.
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:04 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz