Hallo!
ich habe eben mal was ausprobiert und es funktioniert,
schreibe das hier in das OnKeyDown Ereignis der Komponente:
Delphi-Quellcode:
If (Key = VK_DELETE) and (length(TSpinEdit(Sender).Text) = 1) then
Key:= 0;
Man könnte es auch noch folgendermaßen erweitern,
falls der Wert automatisch auf "0" gesetzt werden soll:
Delphi-Quellcode:
If (Key = VK_DELETE) and (length(TSpinEdit(Sender).Text) = 1) then
begin
Key:= 0;
TSpinEdit(Sender).Value:= 0;
end;
Gruß
Pfoto