Hex SpinEdit

← →
VEZ (2005-10-25 15:36) [0]

Как можно сделать чтоб спинэдит работал с хексами.

← →
clickmaker © (2005-10-25 15:44) [1]

procedure TForm1.UpDown1ChangingEx(Sender: TObject;
var AllowChange: Boolean; NewValue: Smallint;
Direction: TUpDownDirection);
begin
Edit1.Text := IntToHex(NewValue, 2);
end;

← →
TStas © (2005-10-25 19:22) [2]

>Edit1.Text := IntToHex(NewValue, 2);
Так может, проще, у самого SpinEdita процедуру перекрыть? Она ведь какая-то такая и есть

← →
VEZ (2005-10-26 13:54) [3]

А если ещё ручьками разрешить вводить хексы.

> VEZ (26.10.05 13:54) [3]
> А если ещё ручьками разрешить вводить хексы.

Edit позволяет вводить и цифры и буквы.
А StrToInt понимает и "$ABCDEF".

--
Regards, LVT.

Hex SpinEdit Найти похожие ветки