AGB  ·  Datenschutz  ·  Impressum  







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

Graphenalgorithmen

Ein Thema von sixarp · begonnen am 13. Jun 2004 · letzter Beitrag vom 28. Aug 2006
Antwort Antwort
Seite 1 von 2  1 2      
sixarp
Registriert seit: 9. Mai 2004
Hiermit möchte ich mein Programm vorstellen, welches bekannte Graphenalgorithmen anwendet und darstellt.

Aktuelle Version: v0.7

Bisher wurde das Programm nur unter WinXP getestet

Bitte spart nicht mit der Kritik.


Testet das Programm bitte richtig durch.

Danke
sixarp

[edit=Admin]Download weiter unten: klick Mfg, Daniel[/edit]
 
Benutzerbild von ibp
ibp

 
Delphi 7 Architect
 
#2
  Alt 13. Jun 2004, 11:53
Hallo,
hab mal ein wenig rumgespielt...
1. Die Eingabe der Knoten und Kantenlänge ist über das menu etwas aufwendig, ich weiß es gibt shortcuts, es ist mit einem rechten mausklick und menu angenehmer
2. die grids sollten editierbar sein
3. bei kante entfernen sollte der start und endknoten nicht nummeriert sein, sondern mit seiner bezeichnung
4. in der ansicht sollte man die knoten oder kanten direkt aktivieren und bearbeiten können...
vielleicht auch durch das ziehen mit der maus verknüpfungen erstellen, die kantenlänge kann man ja dann nacheditieren
5. zwar hast du beim erstellen der kanten, beim ausführen die abfrage ob start und zielpunkt identisch sind, schöner wäre es wenn die drop-down-liste den jeweiligen schon gewählten knoten nicht mehr erscheint
6. wenn man einen graphen mit 4 knoten erstellt, kantenlängen sind alle gleich und schut sich die kürzesten wege an, dann werden nicht alle möglichen kürzesten wege dargestellt... siehe anhang... der weg a-b-c = a-d-c !

... so das wars erstmal, hoffe es hilft ein wenig ...
Miniaturansicht angehängter Grafiken
graph.jpg   wege.jpg  
  Mit Zitat antworten Zitat
sixarp
 
#3
  Alt 13. Jun 2004, 12:13
@ibp: Super! Danke für die tollen Verbesserungsvorschläge!

rsilo
  Mit Zitat antworten Zitat
sixarp
 
#4
  Alt 14. Jun 2004, 10:46
Ich möchte nun die etwas überarbeitete Version v0.75 vorstellen:


Vorschläge von ibp:

Zitat:
1. Die Eingabe der Knoten und Kantenlänge ist über das menu etwas aufwendig, ich weiß es gibt shortcuts, es ist mit einem rechten mausklick und menu angenehmer
Du hast absolut recht. Ich hab ein PopupMenu eingefügt

Zitat:
2. die grids sollten editierbar sein
Der 1. Grid (AdjazenzMatrix) ist editierbar, der 2. Grid nicht, wieso denn auch er berechnet nur die Transitive Hülle

Zitat:
3. bei kante entfernen sollte der start und endknoten nicht nummeriert sein, sondern mit seiner bezeichnung
Stimmt. Hab ich damals vegessen. Ist jetzt geändert

Zitat:
4. in der ansicht sollte man die knoten oder kanten direkt aktivieren und bearbeiten können...
vielleicht auch durch das ziehen mit der maus verknüpfungen erstellen, die kantenlänge kann man ja dann nacheditieren
Hab ich noch nicht eingefügt. Das wäre zum Abschluss des Projekts als absolute Krönung zu machen

Zitat:
5. zwar hast du beim erstellen der kanten, beim ausführen die abfrage ob start und zielpunkt identisch sind, schöner wäre es wenn die drop-down-liste den jeweiligen schon gewählten knoten nicht mehr erscheint
Super Tip, hab ich auch eingebaut

Zitat:
6. wenn man einen graphen mit 4 knoten erstellt, kantenlängen sind alle gleich und schut sich die kürzesten wege an, dann werden nicht alle möglichen kürzesten wege dargestellt... siehe anhang... der weg a-b-c = a-d-c !
Im Prinzip stimmt das ja, denn a-d-c stellt eine Alternative zu a-b-c dar. Ich den oder die alternativen Wege implementiert, allerdings unter Kommentare gesetzt, da bei mir ein Konzeptproblem auftritt, welches ich noch beheben muss.

Dieses angesprochene TabSheet "Kuerzeste Wege" berechnet alle kürzesten Wege vom Startknoten aus, zu allen anderen Knoten. Bei der alter Version hatte ich immer den Knoten A als Startknoten, nun habe ich ein Form für die Starknotenauswahl (Combobox) eingebaut.

@ibp: Ich danke dir vielmals für dein tolles Feedback. Falls du noch weitere Einfälle hast, melde ich bitte.

Ich möchte euch alle weiter bitten, mein Programm auf Herz und Nieren zu testen.

Danke

sixarp

[edit=Admin]Download der aktuellen Version weiter unten: klick Mfg, Daniel[/edit]
  Mit Zitat antworten Zitat
Benutzerbild von ibp
ibp

 
Delphi 7 Architect
 
#5
  Alt 14. Jun 2004, 11:42
hi, bin nochmals durchgegangen...

1. mann kann nur einmal den jeweiligen startknoten angeben und das diese auswahl immer gleich hervorspringt ist ein wenig nervig, danach muß man erstmal den reiter wechseln um wieder einene neuen angeben zu können, man sollte vielleicht mittels rechter maustaste einen startknoten wählen können
2. wenn ich bei deinem beispiel einen anderen startknoten als a wähle, taucht der startknoten nicht mehr auf, liegt er halb unsichtbar in der linken oberen ecke siehe bild
3. wenn ich in der adjazenmatrix ein feld aktiviert habe und möchte auf ein anderes, kommen derweilen meldungen, auchg wenn ich nichts geändert habe...
4. was ist das für ein kleines dreieck in der form (img4)

gruß rene

ps das editieren mittel maus gefällt
Miniaturansicht angehängter Grafiken
img2.jpg   img1.jpg  
Angehängte Grafiken
 
  Mit Zitat antworten Zitat
sixarp
 
#6
  Alt 15. Jun 2004, 10:01
Die neue Version 0.78:

Vorschläge von ibp:

Zitat:
1. mann kann nur einmal den jeweiligen startknoten angeben und das diese auswahl immer gleich hervorspringt ist ein wenig nervig, danach muß man erstmal den reiter wechseln um wieder einene neuen angeben zu können, man sollte vielleicht mittels rechter maustaste einen startknoten wählen können
Stimmt. Hab ein Panel mit Combobox hinzugefügt

Zitat:
2. wenn ich bei deinem beispiel einen anderen startknoten als a wähle, taucht der startknoten nicht mehr auf, liegt er halb unsichtbar in der linken oberen ecke siehe bild
Müsste jetzt funktionieren. Ein kleiner Fehler existiert noch, welchen ich bald behebe

Zitat:
3. wenn ich in der adjazenmatrix ein feld aktiviert habe und möchte auf ein anderes, kommen derweilen meldungen, auchg wenn ich nichts geändert habe...
Genau. Hab ein kleines EditierForm eingefügt

Zitat:
4. was ist das für ein kleines dreieck in der form (img4)
Keine Ahnung! Kommt vom ActionToolbar

Zitat:
ps das editieren mittel maus gefällt
Werde ich auch noch machen, muss mich allerdings zuvor mit den Mousevents vertraut machen.

@ibp: Danke für die toole Hilfe

@Community: Bitte weiter testen

danke
sixarp

neue Version v0.9: siehe unten
  Mit Zitat antworten Zitat
Benutzerbild von ibp
ibp

 
Delphi 7 Architect
 
#7
  Alt 15. Jun 2004, 11:45
ich nochmal....

1. kosten ?
2. wenn ich keine Eingabe mache in der matrize sondern nur hin und herklicke, dann sollte auch keine verarbeitung(abfrage) für die jeweilige zelle, durchgeführt werden, hilfreich wäre da sicherlich das onchange ereignis...
3. es wird immer bedienfreundlicher
4. cool wäre eine räumliche darstellung, von der man den betrachtungswinkel wählen könnte...

gruß rené
Miniaturansicht angehängter Grafiken
trotzkeinereingabe.jpg   kosten.jpg  
  Mit Zitat antworten Zitat
sixarp
 
#8
  Alt 15. Jun 2004, 19:07
ibp:

Zitat:
1. kosten ?
Ich hab "Kosten" mal gehört. Ich hab Kantenlänge geschrieben. Gefällt dir "Kosten" nicht ?

Zitat:
2. wenn ich keine Eingabe mache in der matrize sondern nur hin und herklicke, dann sollte auch keine verarbeitung(abfrage) für die jeweilige zelle, durchgeführt werden, hilfreich wäre da sicherlich das onchange ereignis...
Stimmt. Hab ich geändert.

Zitat:
3. es wird immer bedienfreundlicher
Danke

Zitat:
4. cool wäre eine räumliche darstellung, von der man den betrachtungswinkel wählen könnte...
Super Idee. Könntest du das etwas erläutern ?


Danke

sixarp
  Mit Zitat antworten Zitat
Benutzerbild von alcaeus
alcaeus
 
#9
  Alt 15. Jun 2004, 19:13
Zitat von sixarp:
Zitat:
4. cool wäre eine räumliche darstellung, von der man den betrachtungswinkel wählen könnte...
Super Idee. Könntest du das etwas erläutern ?
Ist ja klar: Eine Isometrieansicht, in der das Ganze irgendwie dreidimensional dargestellt wird...der Rest ist dir überlassen. Und eine Isometrie dürfte bei einem Mathegenie wie dir kein Problem sein

greetz
alcaeus
Andreas B.
  Mit Zitat antworten Zitat
Benutzerbild von Nikolas
Nikolas

 
Delphi 2005 Personal
 
#10
  Alt 15. Jun 2004, 19:24
Wenn ich einen Graphen gezeichnet habe und dann auf 'minimaler Spannbaum' klicke, bekomme ich den angehängten Fehler und der Graph ist weg. Danach liefert das Programm nur noch Fehlermeldungen und muss per Task-Manager geschlossen werden. Als ich den Fehler reprodizieren wollte, hat sich dein Programm an der Stelle einfach geschlossen.

Toxman
Miniaturansicht angehängter Grafiken
fehler_198.jpg  
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


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 08:05 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