XP Progressbar die hin und her läuft

**Helmi**

Hallo,

bei den Schweizern gibt es einen Code zur Erstellung einer Marquee Progressbar

link

Nur läuft diese von links nach rechts!

Ich hab aber auch schon Progressbars gesehen, die hin und her laufen
also von links nach rechts und wieder zurück...

Weiss jemand wie man so was macht?

(Ach ja - bitte keinen Verweis zu den Jedi-Komponenten)

**waseo**

Da hast Du nicht genau genug geguckt. Hier ist ein Beispiel, ebenfalls bei den Schweizern:

How to paint a moving progress bar using a background thread?

**Helmi**

Hallo,

danke für den Tip.
Nur leider ist es nicht das was ich suche.

Bei Norton gibt es eine solche ProgressBar wie ich sie gerne hätte.
Hab mal zwei bilder gemacht - eines von links nach rechts und eines von rechts nach links.

**Sunlight7**

Das geht ganz einfach, wenn Du auf einer Seite angekommen bist, die Richtung umkehren.

**Helmi**

Zitat von Sunlight7:

Das geht ganz einfach, wenn Du auf einer Seite angekommen bist, die Richtung umkehren.

Und wie macht man das?

**Sunlight7**

Beispiel:

zusammenfalten · markieren

Delphi-Quellcode:

			const Max=100;

var Pos:Integer;

    RunsLeft:Boolean;

procedure TForm1.Timer1Timer(Sender: TObject);

begin

   If RunsLeft then begin

      Dec(Pos, 1);

      If Pos=0 then RunsLeft:=False;

   end else begin

      Inc(Pos, 1);

      If Pos=Max then RunsLeft:=True;

   end;

end;

Getippt und nicht probiert, aber Sinngemäß aus einer meiner Kompos.

**shmia**

Wenn man weiss, wieviele Schritte/Bytes/Sekunden oder was auch immer ein Vorgang benötigt,
nimmt man einen Progressbar.
Hat man diese Information nicht, nimmt man einen Indikator um dem Benutzer zu signalisieren: "Hallo, ich lebe noch und bin voll bei der Arbeit!"

Indikatoren und Progressbars gibt es wie Sand am Meer.
z.B.

http://www.torry.net/pages.php?id=504 DProgressBar v.1.0

Ich finde, man sollte hier zuviel Aufwand vermeiden und zuerst darauf achten, dass das
Programm fehlerfrei und effizient arbeitet.

Man kann auch mit ganz einfachen Delphi Bordmitteln einen schönen Indikator bauen:
1.) Man nehme ein TEdit und setze den Font auf "Wingdings". Size=24
2.) Man setze den Edit1.Text := chr(x); der Wert x läuft immer von 183 bis 194

**Sunlight7**

Es gibt auch Leute, die den Sand vom Meer nicht mögen, und nur eigenen Sand verwenden, so wie ich.

Das Beispiel funkt mit kleinen Änderungen auch mit variabler Max Größe.

**Helmi**

Die DProgressBar v.1.0 läuft leider nur von links nach rechts.
Ich möchte aber, dass sie auch wieder zurückläuft.

@Sunlight7:
Deine Lösung kann man aber nicht für eine standard-Progressbar verwenden.

**Sunlight7**

Kann eine Standard ProgressBar denn den Ausblendeffekt, wie es de Norton macht?

Da bin ich nicht auf dem laufenden, weil ich die nie verwende.

Du kannst das ja in eine bestehende Kompo einbauen, oder eine eigene machen.

XP Progressbar die hin und her läuft

XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Re: XP Progressbar die hin und her läuft

Forumregeln

waseo Registriert seit: 16. Mai 2006 Ort: Isernhagen 11 Beiträge Delphi 6 Professional	#2 Re: XP Progressbar die hin und her läuft 17. Okt 2006, 12:57 Da hast Du nicht genau genug geguckt. Hier ist ein Beispiel, ebenfalls bei den Schweizern: How to paint a moving progress bar using a background thread? Wirklich überraschend sind nicht die Dinge, die wir niciht wissen, sondern die wir wissen und die nicht so sind.
	Zitat

Sunlight7 Registriert seit: 17. Sep 2006 Ort: Sonnensystem, Zentral 1.522 Beiträge Delphi 5 Standard	#4 Re: XP Progressbar die hin und her läuft 17. Okt 2006, 17:21 Das geht ganz einfach, wenn Du auf einer Seite angekommen bist, die Richtung umkehren. Windows: Ja - Microsoft: Nein -> www.ReactOS.org
	Zitat

Helmi Registriert seit: 29. Dez 2003 Ort: Erding, Republik Bayern 3.312 Beiträge Delphi XE2 Professional	#5 Re: XP Progressbar die hin und her läuft 17. Okt 2006, 17:25 Zitat von Sunlight7: Das geht ganz einfach, wenn Du auf einer Seite angekommen bist, die Richtung umkehren. Und wie macht man das? mfg Helmi >> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
	Zitat

Sunlight7 Registriert seit: 17. Sep 2006 Ort: Sonnensystem, Zentral 1.522 Beiträge Delphi 5 Standard	#8 Re: XP Progressbar die hin und her läuft 17. Okt 2006, 18:12 Es gibt auch Leute, die den Sand vom Meer nicht mögen, und nur eigenen Sand verwenden, so wie ich. Das Beispiel funkt mit kleinen Änderungen auch mit variabler Max Größe. Windows: Ja - Microsoft: Nein -> www.ReactOS.org
	Zitat

Sunlight7 Registriert seit: 17. Sep 2006 Ort: Sonnensystem, Zentral 1.522 Beiträge Delphi 5 Standard	#10 Re: XP Progressbar die hin und her läuft 17. Okt 2006, 18:46 Kann eine Standard ProgressBar denn den Ausblendeffekt, wie es de Norton macht? Da bin ich nicht auf dem laufenden, weil ich die nie verwende. Du kannst das ja in eine bestehende Kompo einbauen, oder eine eigene machen. Windows: Ja - Microsoft: Nein -> www.ReactOS.org
	Zitat