Trackbar Anordung umkehren

**Larsi**

Hi,
gibt es eine Möglichkeit, dass man bei einer Trackbar 0 nach rechts und links das Maximum hat. Das bräuchte ich nämlich, da ich die Trackbar vertikal benutze und deshalb 0 unten sein soll.

MFG Lars Wiltfang

**Klaus01**

Hallo Lars,

kannst Du das nicht einfach umrechnen?

z.B. so:

markieren

Delphi-Quellcode:

			procedure TForm1.TrackBar1Change(Sender: TObject);

begin

  edit1.Text:=IntToStr(TrackBar1.max-Trackbar1.Position);

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

  Trackbar1.Position:=Trackbar1.Max;

end;

Grüße
Klaus

**Matze**

Hallo,

also so schwer ist das doch nicht:

Lass die TrackBar von 0-100 laufen und rechne das Ergebnis entsprechend um:

Erg := Max - TrackBar.Position; Grüße

Edit: Da war der Klaus wohl schneller.

Trackbar Anordung umkehren

Trackbar Anordung umkehren

Re: Trackbar Anordung umkehren

Re: Trackbar Anordung umkehren

Forumregeln

Larsi Registriert seit: 10. Feb 2007 2.262 Beiträge Delphi 2007 Professional	#1 Trackbar Anordung umkehren 24. Mai 2008, 17:54 Hi, gibt es eine Möglichkeit, dass man bei einer Trackbar 0 nach rechts und links das Maximum hat. Das bräuchte ich nämlich, da ich die Trackbar vertikal benutze und deshalb 0 unten sein soll. MFG Lars Wiltfang Ein Tag ohne Delphi ist ein verlorener Tag! Homepage zu meinem neuen Programm: StreamZ
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.755 Beiträge Delphi 10.4 Sydney	#2 Re: Trackbar Anordung umkehren 24. Mai 2008, 18:03 Hallo Lars, kannst Du das nicht einfach umrechnen? z.B. so: markieren Delphi-Quellcode: procedure TForm1.TrackBar1Change(Sender: TObject); begin edit1.Text:=IntToStr(TrackBar1.max-Trackbar1.Position); end; procedure TForm1.FormCreate(Sender: TObject); begin Trackbar1.Position:=Trackbar1.Max; end; Grüße Klaus Klaus
	Zitat

Matze (Co-Admin) Registriert seit: 7. Jul 2003 Ort: Schwabenländle 14.929 Beiträge Turbo Delphi für Win32	#3 Re: Trackbar Anordung umkehren 24. Mai 2008, 18:03 Hallo, also so schwer ist das doch nicht: Lass die TrackBar von 0-100 laufen und rechne das Ergebnis entsprechend um: Erg := Max - TrackBar.Position; Grüße Edit: Da war der Klaus wohl schneller.
	Zitat