Das HAus des Nikolaus

[ATwardz]

Endlich habe ich mal Zeit gefunden meine Projekte zu sortieren/löschen!

Naja, dabei sind meine alten Schulprojekte wieder ans Tageslicht gekommen und da habe ich mir gedacht, da "Das Haus des Nikolaus" zum Lehrplan eines Infokurses am Gym gehört oder besser gesagt Backtracking, das ich es hier mal als open source präsentiere!


Das Programm listet alle Möglichkeiten das Haus des Nikolaus zu zeichnen auf (Bei 1 beginnend)<--sorry hatte ich voirher falsch beschrieben!
Das Programm macht keine Fehler, es sind wirklich 44 Möglichkeiten! Wer es nicht glaugt kann sie sich per Listbox-Doppelklick zeichnen lassen!




Wird gerne auch von Lehrer als Facharbeit vergeben! :coder:

Es gibt noch viele weiter schöne Beispiele die man coden kann, z.B.
das Problem der 9 Damen auf einem Schachbrett oder ein Solitär-Spiel zu coden!

Vielleicht kann es ja jemand gebrachen oder hat freude dran!

@wardz

[Dax]

Häng's doch wegen glaichberechtigung noch mal als .ZIP an...
Bitte?

[ims]

krass :shock: , hätte nicht gedacht, dass es soviele lösungen gibt. cooles progi, danke dir! :thuimb:

@Dax: mach doch WinRar drauf, dann spielts keine rolle :wink: ... winrar kann auch .zip-dateien erstellen...

[himitsu]

Ich dachte auch nicht, dass es soooo viele sind, hatte sogar den Verdacht, bei dir kommen auch die spielgelverkehrten Varianten vor. (wo bei 2 begonnen wird)

Aber mal 'ne Frage: gibt es keine Varianten, wo bei 5, oder 4 begonnen wird?

[MikeS]

Moin zusammen!

Ich finde das Programm sehr interessant und die vielzahl an Lösungen!
Bei mir tritt jedoch folgender Fehler auf!

List index out of bounds(-1)

dies geschieht wenn ich durch doppelklick eine folge zum zeichnen
ablaufen lasse und dann auf start drücke!

vielleicht läßt sich da noch was machen!

[hacker]

Hi!

Das programm ist toll!!Gute idee! :thuimb:
Jedoch entsteht bei mir der selbe fehler wie bei MikeS.
Das lässt sich wohl noch ändern...


Gruss Häcki :hi:

[ATwardz]

Hi,

erstmal danke für die Blumen!

HAcker, bei mir funktioniert das Programm ohne Fehlermeldeung!
Hast du etwas am Code Verändert?

Diese Fehlermeldeung mzss mit folgender Zeile in Verbindeung stehen!

Delphi-Quellcode:

Wert:=strtoint((listbox.Items.Strings[listbox.itemindex])[ida]);

Setze mal für listbox.itemindex EINS ein und schau ob er dir die erste Lösung zeichnet!

Des weiteren sollten die Werte vor der Timeraktivierung diese Werte enthalten!

Delphi-Quellcode:

  ida:=1;
  Wert:=0;

Stell den Timer so aus 500-1000 sonst kommt der Rechner nit mehr nach!

Sag bescheid ob du weiter gekommen bist!

@wardz

[MikeS]

@ATwardz

hast Du meinen vorherigen Beitrag auch gelesen!
Habe nichts am Code geändert und bin wie beschrieben vorgegangen!

[ATwardz]

Hi,

Setz mal zu Anfang des Startbutton clicks!

Timer1.enabled:=false;
Resetgrafik;

Dann müsste es gehn, werde die verbesserte Version auch hochladen!

@wardz

[ATwardz]

Zu himitsu!

Gemeint sind alle Lösungen von 1 beginnen sorry!
Natürlich sind alle spiegelverkehrten Lösungen ebenfalls möglich!

Soweit ich weiss kann man nur bei 1 und 2 anfangen aber du kannst ja die startpositionen verändern un gucken ob es ne Lösung gibt! :-D

@wardz