So habe das jetzt in der Zwischenzeit anders gelöst
Delphi-Quellcode:
procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
with Sender as TSpinEdit do
begin
if Text = '' then Text := '0';
SelStart := Length(Text);
end;
begin
if FUpdating then Exit;
CurrText.Size := StrToInt(SpinEdit1.Text);
end;
end;
Da steht dann zwar wenn ich 8 eingebe 08 da aber das ist wie eine 8 !
Danke für eure Hilfe