это едиты на форме:
Код:
type
TForm1 = class(TForm)
EditHex: TEdit;
EditDec: TEdit;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
они нужны только для этого примера, чтобы было куда результат увидеть.