TUpDown

[Daniel B]

Hallo,

Zitat:

Zitat von silent

super, ich hab die beispiele nicht mit installiert und finde delphi cd nicht... hab cd nie in hüllen -_-

Du hast nicht alle normalen Komponenten installiert? :shock:

Grüsse, Daniel :hi:

[Pseudemys Nelsoni]

ne, hab indy etc und was ich nicht brauche weggelassen, btw ich würd auch die normale Scrollbar gerne nehmen...warum gibts nicht einfach sowas wie "onArrowUpClick" und "onArrowDownClick".... die ereignisse der scrollbar sagen mir irgendwie alle nicht wie ich aif die einzelnen clicks der pfeile reagiere und in der hilfe hab ich auch nichts gefunden.
mit dem UpDown dingda hatte ich

Delphi-Quellcode:

  if button = btNext then
  begin
    Edit1.Text := IntToStr(StrToInt(Edit1.Text) + 1);
    UpDown1.Position := StrToInt(Edit1.Text);
  end;
  if button = btprev then
  begin
    Edit1.Text := IntToStr(StrToInt(Edit1.Text) - 1);
    UpDown1.Position := StrToInt(Edit1.Text);
  end;

aber die is irgendwie komisch und funzt nich ganz recht weil die irgendwie mit min/max und sowas geht

also ich möcht lieber die normale Scrollbar nehmen, aber wie?

gruss silent^^

[Daniel B]

Hallo,

Zitat:

Zitat von silent

ne, hab indy etc und was ich nicht brauche weggelassen, btw ich würd auch die normale Scrollbar gerne nehmen...warum gibts nicht einfach sowas wie "onArrowUpClick" und "onArrowDownClick"...

Das mit den zwei getrennten Prozeduren für Up und Down hätte der SpinButton. Solltest Du vielelicht doch nachinstallieren. Das wäre doch das was Du willst und es sieht auch so aus wie der TUpDown.
Eine blödere Möglichkeit ist einfach zu prüfen, wo Du mi der Maus hinklickst, auf dem Formular. Wäre zwar machbar, aber das "reindrücken" der Pfeile wäre nicht sichtbar. Also eher unschön.

Grüsse, Daniel :hi:

[Pseudemys Nelsoni]

huhu daniel,

danke für die tips, ich hab es mit der Scrollbar geschafft und benutze nun diese :)