SpinEdit.Value manuell verändern

[Patrick6]

Danke schonmal für die Antwort. Ich hab ein bisschen rumgespielt und das meiste geht jetzt. Mein Code sieht folgendermaßen aus:

Delphi-Quellcode:

procedure TForm1.SpinEdit1Change(Sender: TObject);
  begin
    if SpinEdit1.Text <> ''
    then
      try
        Image1.Canvas.Pen.Width := SpinEdit1.Value;
      finally
         SpinEdit1.MaxValue := 80;
         SpinEdit1.MinValue := 1;
       if
          SpinEdit1.Value > SpinEdit1.MaxValue
       then
          SpinEdit1.Text := '80';
       if
          SpinEdit1.Value < SpinEdit1.MinValue
       then
          SpinEdit1.Text := '1';
    end;
  end;

Nun kommt kein Fehler mehr bei Eingabe einer Zahl, dafür aber wenn ich z.B. ein "," oder ein Buchstabe eingeb. Kann ich hier noch was machen?