AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Turm von Hanoi
Thema durchsuchen
Ansicht
Themen-Optionen

Turm von Hanoi

Ein Thema von Matze · begonnen am 28. Sep 2004 · letzter Beitrag vom 21. Feb 2007
Antwort Antwort
Benutzerbild von Matze
Matze
Registriert seit: 7. Jul 2003


Ich wurde darauf angesprochen, den Source des Programms Turm von Hanoi herauszurücken.

Ich habe leider keine Zeit, ihn ausreichend zu kommentieren, ein paar Kommentare von damals stehen drin, ich hoffe, es ist einigermaßen verständlich.

Da ich nur ungern Fremdkomponenten benutze, enthält das Projekt massig Images und Labels (damals wollte ich unbedingt ein "nicht standard"-Design machen, keine Ahnung warum...


Ich veröffentliche den Code rein zu Lernzwecken.
Angehängte Dateien
Dateityp: zip turmhanoi_185.zip (303,0 KB, 423x aufgerufen)
 
Benutzerbild von Alexander Roth
Alexander Roth

 
Turbo Delphi für Win32
 
#2
  Alt 14. Okt 2004, 15:27
Perfekt Programmiert.
Alle Achtung!

Mega nett von dir den Code Rauszugeben.
Zitat:
Ich veröffentliche den Code rein zu Lernzwecken
Lernen kann ich viel davon. Danke.
Alexander Roth
  Mit Zitat antworten Zitat
Mobby

 
Delphi 5 Standard
 
#3
  Alt 20. Feb 2007, 11:55
Also auch nochmal von mir herzlichen Dank für den Code!!!

Nur leider kann ich deine Laufvariablen und das Verschieben der einzelnen Steine nicht richtig nachvollziehn. Mir ist unklar wie die Steine von einem zum anderen Stapel gezogen bzw .da es ja Image sind "gebeamt" werden.


Wäre super nett, falls mir jemand auf die Sprünge helfen könnte!

MfG Mobby


Vielleicht komme ich dann ja weiter bei meinem eigenen Programm und bin auch voll "on Fire"
  Mit Zitat antworten Zitat
Benutzerbild von stahli
stahli

 
Delphi 11 Alexandria
 
#4
  Alt 20. Feb 2007, 18:07
Hallo Matze,

absolut beeindruckende Lösung!!!

Ich habe mir das ´ne ganze Weile angesehen und einige sehr erstaunliche Lösungen gefunden.
Allerdings ein größeres Projekt auf die Art zu realisieren wäre aber wohl doch sehr aufwändig ;-(

Als I-Punkt könnten die Steine vielleicht direkt bewegt (in Form einer Parabel gehoben und auf dem neuen Stapel abgelegt) werden...

Stahli
  Mit Zitat antworten Zitat
Benutzerbild von Matze
Matze

 
Turbo Delphi für Win32
 
#5
  Alt 20. Feb 2007, 22:41
Hi

oha, das Programm ist nun auch in die Jährchen gekommen und der Code auch nicht der beste. Mir ging's damals darum, einmal ein Skin-ähnliches Design zu erstellen. Ich bin prinzipiell gegen Designs, die vom eingestellten Windows-Theme abweichen, doch wie die meisten Anfänger, möchte man das mal ausprobieren. Da ich keine Fremdkomponenten nutzen wollte, habe ich die VCL dafür wirklich missbraucht. *g* Unbenannte Komponenten und ähnliches. Also so sollte man das eigentlich nicht machen, sondern es ist eine kleine Demo, was theoretisch mit den Standardkomponenen möglich wäre. Auf den Trick mit dem transparenten Labels war ich damals besonders stolz.

Zitat von Mobby:
Mir ist unklar wie die Steine von einem zum anderen Stapel gezogen bzw .da es ja Image sind "gebeamt" werden.
Das geschieht über

Code:
procedure TForm1.Verschieben(n: integer; s, z, h: integer);
Diese Prozedur ist rekursiv, ruft sich also selbst wieder auf. Das Nachvollziehen ist bei rekursiven Aufrufen nicht immer leicht, das gebe ich zu, aber wenn man sich konzentriert und einmal verstanden hat, wie eine Rekursion abläuft, ist es gar nicht mal so kompliziert.

@stahli: Schön, dass es dir gefällt!

Zitat von stahli:
Als I-Punkt könnten die Steine vielleicht direkt bewegt (in Form einer Parabel gehoben und auf dem neuen Stapel abgelegt) werden...
Das kannst du gerne implementieren und hier zu Verfügung stellen, wenn du magst.
  Mit Zitat antworten Zitat
Benutzerbild von sirius
sirius

 
Delphi 7 Enterprise
 
#6
  Alt 21. Feb 2007, 08:14
Zitat:
Das Nachvollziehen ist bei rekursiven Aufrufen nicht immer leicht, das gebe ich zu, aber wenn man sich konzentriert und einmal verstanden hat, wie eine Rekursion abläuft, ist es gar nicht mal so kompliziert.
Im Fall von "Turm von Hanoi" habe ich das mal hier versucht bildlich darzustellen.
  Mit Zitat antworten Zitat
Benutzerbild von xZise
xZise

 
Delphi 2009 Professional
 
#7
  Alt 21. Feb 2007, 13:01
BTW: Turm von Hanoi (bitte Linkung beachten!)
Fabian
  Mit Zitat antworten Zitat
Mobby

 
Delphi 5 Standard
 
#8
  Alt 21. Feb 2007, 21:39
also von der problematik des turms von hanoi versteh ich alles...ich hab auch schon zieg seiten gefunden wo man es selbst spielen kann...mein problem ist nur diese rekrusive(haben wir gerade in der schule) zu verstehn. ich mein das mit dem aufrufen in sich selbst ist mir klar und dass es bei großen prozessen schneller geht und hier eigentlich die iterative einfacher aber der lehrer hätte es gern so also machen wir das...und um einen geeigneten algorhytmus zu finden ist uns matze's werk ins auge gesprungen und wir(noch zwei andere personen aus meinem basiskurs informatik) versuchen nun eine für uns geeignete art zu finden dieses problem selbst zu lösen...wobei wir schon bugs gefunden haben

uns fehlt einfach der ansatz um die ganze sache aufzuziehn...und die visualisierung fanden wir auf den ersten blick überladen aber man gewöhnt sich dran wenn man es 2h lang versucht nachzuvollziehn

mfg mobby
  Mit Zitat antworten Zitat
Antwort Antwort


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 22:46 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz