![]() |
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: |
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. |
Re: Balken zeichnen
hmm
[Glaskugelmode=on] Nimm doch eine ProgressBar und setze die Orientation auf pbVertical [Glaskugelmode=off] Sowas? Frank :coder: |
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 ![]() |
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