Autor Beitrag
raven
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 54



BeitragVerfasst: Sa 14.06.03 11:00 
hi leutz ;)

  1. Ich habe 2 trackbars die beide von 1-10 gehen ... nur darf die 2. trackbar nie mehr haben als die 1. ... also wenn bei der ersten 7 eingestellt ist darf man bei der zweiten nicht 8 einstellen können ...
  2. Es gibt eine trackbar die geht von 5000 - 20000 ... die Frequensie ist auf 500 eingestellt ... so nun lasse ich mir den moemnatnen status immer in einemm label anzeigen ... also im On Change ereigniss der trackbar steht drin:
    ausblenden Delphi-Quelltext
    1:
    label1.caption:=inttostr(trackbar1.position);					

    nun ist es aber so das er mir z.b. auch 5573 anzeigt obwohl ich das doch nur in 500er schritten sehen will ... ?!? wie mach ich das das er mir immer nur 500 schritte anzeigt in meinem label?!?
danke ;) RaVeN

Moderiert von user profile iconTino: List- & Delphi-Tags hinzugefügt.
GSE
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 740

Win 2k, Win XP Pro
D5 Prof, D6 Ent, D2k5 PE
BeitragVerfasst: Sa 14.06.03 11:16 
Hi,

zu 1.)
Einfach ins OnChange der ersten Trackbar  trackbar2.max := trackbar1.position;schreiben.

zu 2.)
Ins OnChangelabel1.caption := inttostr(trackbar1.position div 500 * 500);

Weiß jetzt aber nicht ob due Frequency verwechselt:
Delphi-Hilfe hat folgendes geschrieben:
Mit Frequency können Sie den Abstand der Teilstriche in logischen Einheiten festlegen, die in der Eigenschaft Position angegeben sind. Wenn Sie Frequency beispielsweise den Wert 5 zuweisen, wird bei jedem fünften Inkrement ein Teilstrich angezeigt. Setzen Sie Frequency auf LineSize oder PageSize, um die auf dem Schieberegler verwendeten Einheiten anzuzeigen.
Zeigt also nur die Striche anders an und gibt nicht die Schritte an, wenn du nur in 500er Schritten machen willst dann Max auf 40 und Min auf 10 setzen und im OnChangelabel1.caption := inttostr(trackbar1.position * 500);

mfg
GSE

_________________
Programming today is a race between software engineers striving to build bigger and better idiot-proof programs
and the universe trying to produce bigger and better idiots. So far, the universe is winning. (Richard Cook)