AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Diagramm zeichnen...
Thema durchsuchen
Ansicht
Themen-Optionen

Diagramm zeichnen...

Ein Thema von EConvertError · begonnen am 10. Sep 2006 · letzter Beitrag vom 13. Sep 2006
 
Benutzerbild von Nikolas
Nikolas

Registriert seit: 28. Jul 2003
1.528 Beiträge
 
Delphi 2005 Personal
 
#6

Re: Diagramm zeichnen...

  Alt 11. Sep 2006, 19:28
Nimm dir doch ein Array mit so vielen Einträgen, wie du Punkte anzeigen willst. (Sagen wir mal 60). Das schreibst du erst mal voll und benutzt in der ersten Minute noch eine Integer-Variable, an der du ablesen kannst, wie viele Einträge schon gefüllt sind. Nach dem du eine Minute gewartet hast, überschreibst du den ersten Wert mit dem 61. und setzt deine Variable von vorhin auf 2. Daran kannst du dann ablesen, dass zuerst Wert nr.2 gezeichnet werden soll, dann Werte 3 bis 60 und dann der erste. Dann überschreibst du nr. 2 und passt deine Markierung an.
Somit brauchstdu zeitunabhängig nur 60 Speicherplätze für deine Daten.

Das hier könntest du dann einsetzen:
Delphi-Quellcode:
for i:=k to (length+k) do
 memo1.Lines.Add(inttostr(i mod (length+1) ));
Zu Maßstab:
Geh einfach deine Liste durch und suche den höchsten Wert. Wenn der dann durch einen 100Px hohen Balken dargestellt werden soll, errechnest du die Höhen der Balken einfach per IrgendEinMesswert/MaximalerMesswert*100;
Speicher am Besten den Höchsten Wert und überprüf nur wenn ein neuer dazu kommt, das sollte die schnellste Methode sein.


Mein 1000. Post
Erwarte das Beste und bereite dich auf das Schlimmste vor.
  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 02:27 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 by Thomas Breitkreuz