SpinEdit mit größeren Erhöhungsschritten

[DelphiManiac]

Hallo,

ich benutze in meinem Programm eine Komponenete der JVCL (JEDI).

Um genauer zu sein ein TJVSpinEdit.

Dieses Editfeld kann Zahlen aufnehmen und über ein Up/Down Feld erhöhen erniedrigen.
Hier gibt es die Eigenschaft

Delphi-Quellcode:

 
  JvSpinEdit1.Increment:=1;

Diesen Erhöhungschritt kann ich setzten.

Ich will, dass mein Editfeld bei länger gedrückte Maustaste den Erhöhungsschritt erhöht.

Diese kann ich ja auch ohne Probleme machen

Beispiel Up -Ereignis

Delphi-Quellcode:

procedure TFrmMain.JvSpinEdit1TopClick(Sender: TObject);
begin
  if JvSpinEdit1.Tag > 10 then // wenn 10 mal in die Prozedure gesprungen (TopClick des Up-Buttons)
  begin
    JvSpinEdit1.Increment:=10; // Erhöhe Zählschritt
  end
  else
  begin
    JvSpinEdit1.Increment:=1;
  end;
  JvSpinEdit1.Tag:=JvSpinEdit1.Tag+1; //  Zähle den Tag hoch

end;

Mein Problem ist es aber , wie kann ich feststellen, dass die Maustaste losgelassen wurde`??????
Dann muss ich ja meinen Increment Schritt wieder zurücksetzen

Delphi-Quellcode:

PseudoCode
procedure OnMausTasteLosgelassen (Sender:TObject)
begin
  JvSpinEdit1.Increment:=1; // Setzte zurück
end;

Hoffe ihr helft mir bei dem Prob!!
Denn ich verzweifel hier gleich

Gruß DelphiManiac