Настройка SpinEdit

[Praud]

Можно как-то написать свои min и max value для SpinEdit?
Мне нужно например 1,2,3,4,5, Forever

[Praud]

Вот подумал можно было бы так написать, но почему-то не работает...

if SpinEdit2.Text='10000' then SpinEdit2.Text:='Forever';

[northener]

Сообщение от Praud

Мне нужно например 1,2,3,4,5, Forever

Возьмите ComboBox вместо SpinEdit для такой цели.

[Praud]

ComboBox никак не подходит. Был бы вообще идеальный вариант использовать Edit, но слишком много ограничений.Почему не работает мой код представленный выше?

[northener]

Сообщение от Praud

Почему не работает мой код представленный выше?

У меня работает. Т.е. Forever пишет и ошибок не выдает.

[Praud]

А у меня стоит от min value 1, max - 5
if SpinEdit2.Text='5' then SpinEdit2.Text:='Forever';

Щелкаю 1,2,3,4,5 - Forever не выдает

[northener]

Сообщение от Praud

if SpinEdit2.Text='5' then SpinEdit2.Text:='Forever';

В каком месте написана эта строчка и какие обработчики у SpinEdit задействованы?

[Praud]

Все разобрался, писал в обработчике кнопки Button, поэтому не работало.
Но появилась другая идея. Сделать checkedbox, и при активации выставить Forever, хочу чтобы при активации в spinedit тоже писалось forever и она становилась неактивна.

procedure TForm1.SpinEdit2Change(Sender: TObject);
begin
if CheckBox1.Checked=true then 
begin
SpinEdit2.Text:='Forever';
SpinEdit2.Eneabled:=False;

end;

[Praud]

Может я пишу не для того события?

[Praud]

уже разобрался, не для того события писал