Alles was ich machen wollte ist folgendes
Delphi-Quellcode:
procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
if (SpinEdit1.Text='') or (SpinEdit1.Value<1) then begin
ShowMessage('Bitte einen Wert von 1 bis 10000 eingeben'); end else begin
bla bla
Ich möchte unbedingt Live die Werte berechnen und nicht OnExit