SpinEdit MinValue

[thomas2009]

Hi
Ich verstehe nicht, warum ich 0 in SpinEdit eintippen kann,
obwohl SpinEdit.MinValue=1
Nur wenn SpinEdit1 den Focus verliert, dann wird der Value von 0 zu 1 verändert

Ich darf in SpinEdit kein 0 eintippen. Ich habe versucht inEvent Onchange :

Delphi-Quellcode:

procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
if (SpinEdit1.Value>0) and (SpinEdit1.Text<>'') then begin
SpinEdit2.Text:=IntToStr(Trunc(x / SpinEdit1.Value));

end else begin
exit; end;
end;

Trotzdem bekomme ich Fehler ! wenn ich 0 eintippe oder den Wert in SpinEdit1 lösche !