TWeekPlaner, Auslastung durch Zeitbänder visualisieren

[Satty67]

Hallo,

jemand brauchte eine Komponente, um die (wöchentliche) Auslastung eines Fuhrparks zu visualisieren. Also hab' ich kurz etwas "gebastelt". Das ganze habe ich TWeekPlaner genannt, aber bin mir sicher für eine solche Anzeige gibt es schon einen speziellen Namen. Die Komponente ist wirklich nicht besonders kompliziert, weshalb ich hier eine große Beschreibung verzichte. Für erste Ergebnisse reicht die Funktion AddBand.

Alle Methoden, Eigenschaften und das einzige neu eingeführte Ereignis ist in der beigelegten PDF in Form einer kleinen Referenz beschrieben.

Es ist keine großartige Fehlerbehandlung implementiert, da es für den Ursprungszweck soweit nicht nötig war (also eigene Exeption-Texte etc.). Letztlich ist es auch nur eine visuelle Komponente, die Daten müssen/sollten extern vorliegen. Wer die Bänder via Komponente laden/speichern will, darf gerne erweitern oder FBands per property sichtbar machen und selber etwas schreiben. (...und das Ergebnis hier posten )

Der Code steht selbstverständlich zur freien Verfügung und sollte ab Delphi5 funktionieren.

PS: Falls jemand mit Delphi 2009 Lust hat es zu testen und evtl. Problem-Stellen zu melden. Würde mich interessieren worauf ich da achten muss um wenigstens kleineren Quellcode auch weitgehend für D2009 kompatibel zu halten.

[mikhal]

Nettes Teil, habe es gerade auf die Schnelle mit Delphi 2009 getestet. Ist einwandfrei gelaufen.

Grüße
Mikhal

[ConstantGardener]

...würde ich auch ganz gern mal testen. Gibts evtl. ne zip ?

cu cg

[Satty67]

Zitat von mikhal:

mit Delphi 2009 getestet. Ist einwandfrei gelaufen.

Danke für's Testen!

Hab' oben auch noch die 7z durch eine ZIP getauscht (Inhalt ist der gleiche).

[ConstantGardener]

Hallo Satty,

danke fürs anhängen der Zip-Datei. Ich hab es mal unter D2006 getestet. Wirklich nettes Teil mit Potential.

Danke dafür... werde ich evtl. noch etwas aufboren...

cu cg

[Satty67]

Ja, an einigen Methoden sieht man auch, das mehr geplant (vorbereitet) war, genauso wie ein paar Dinge, die ich wieder hätte entfernen können Aber wie es halt so ist, erfüllt die aktuelle Version das Primärziel, was dann Erweiterungen auf eine spätere Version verschoben hat.

Aber wenn es Dir als Startbasis für eine verbesserte Version dient, ist es ja auch was...