Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Balken zeichnen (https://www.delphipraxis.net/67299-balken-zeichnen.html)

egbert 12. Apr 2006 16:10


Balken zeichnen
 
Hallo !
Ich bin heute den ersten Tag in diesem Forum und noch etwas unbeholfen. :roll:
Mein Name ist Eggi , ich bin 28 Jahre und von Beruf Krankenpfleger.
Möchte mich so mal nett vorstellen. :hi:
Für mich ist Programmierung nur ein kleines Hobby , ich mache das zur
Enspannung , bin also kein Profi. Habe mich mit Turbo Pascal 7.0 beschäftigt ,
einige für mich nützliche Programme geschrieben , wollte mich aber etwas weiter
entwickeln und kam so zu Delphi ( Delphi3 ).Jeder Anfänger hat dämliche Fragen ,
ich werde da wohl keine Ausnahme machen ...
Es geht um folgendes : Ich möchte nichts weiter , als das auf einer leeren Fläche
ein farbiger 2D Balken von oben nach unten läuft. ( oder von unten nach oben ). Das
ist egal. Das möchte ich natürlich ohne einen störenden Einfluss.
Praktisch wie eine Fortschrittsanzeige , nur eben mit 2D Balken.
Total genial wäre das natürlich in 3D. Aber da fang ich bestimmt an zu spinnen. :spin2:

Für einen netten Tip wäre ich sehr dankbar.

eggi :hi:

Alexander Roth 12. Apr 2006 16:31

Re: Balken zeichnen
 
Hallo,

du nimmst am besten ein Shape (ist unter Zusätzlich (jedenfalls in delphi7)) und stellst brush.color auf deine wunschfarbe.
Und kannst mit einem Timer (ist unter system ganz vorne) dein Shape nach ober oder unten bewegen, indem du immer die Eigenschaft shape1.top durch eins erniedrigts oder erhöhst.

Mavarik 12. Apr 2006 16:34

Re: Balken zeichnen
 
hmm

[Glaskugelmode=on]

Nimm doch eine ProgressBar und setze die Orientation auf pbVertical

[Glaskugelmode=off]

Sowas?

Frank :coder:

Matze 12. Apr 2006 16:37

Re: Balken zeichnen
 
Hallo Eggi, herzlich willkommen! :hi:

TGauge (Reiter: Beispiele) empfiehlt sich dafür ebenfalls, dort kannst du auch die Farben nach Gutdünken wählen. Wenn du dort ShowText auf false stellst, siehst du die Prozentanzeige nicht mehr und die Anzeige bekommst du vertikal, indem du Kind auf gkVerticalBar stellst.

Edit: Ob es TGauge in Delphi 3 schon gab, kann ich dir allerdings nicht sagen. Delphi 2005 Personal gibt es auch kostenlos in der DP zum Herunterladen, falls dich das näher interessieren sollte. Dann kannst du auch ohne Probleme Anwendungen im XP-Stil erzeugen (XP-Manifest).


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:38 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-2025 by Thomas Breitkreuz