String to Hex

← →
Denni (2007-07-31 13:59) [0]

Ребята я мало сказать ньюби в этом деле...
окажите плиз помощь в след вопросе:

значит есть некая строка edit1.text и в неё
вносятся значения типа
1246546456СВ232С3А

Дак вот эти значения уже и есть байты
12 46 54 и т.д. которые я поочередно хочу внести в файл.
Вносить константу в файл у меня получилось а вот чтоб взять
байтик из строчки и объяснить компу что ето бай и его надо
писать в определнный оффсет - не выходит...

← →
tesseract © (2007-07-31 14:01) [1]

> внести в файл.Вносить константу в файл у меня получилось
> а вот чтоб взятьбайтик из строчки и объяснить компу что
> ето бай и его надописать в определнный оффсет - не выходит.
> ..

StrToInt("$"+value);

← →
savyhinst © (2007-07-31 14:01) [2]

var s:string; f:TextFile; begin Assign(f,"filename.ext"); Rewrite(f); s:=edit1.text; Write(f,s); close(f); end;

← →
savyhinst © (2007-07-31 14:03) [3]

поправочки:
var s:string; f:TextFile; begin AssignFile(f,"filename.ext"); Rewrite(f); s:=edit1.text; Write(f,s); closeFile(f); end;

Только перед StrToInt("$"+value) нужно проверить введенные данные на принадлежность к допустимым символам шестнадцатиричной системы счисления. Иначе на ошибочных значениях будет 0 или лабуда.

> Иначе на ошибочных значениях будет 0 или лабуда.

Exeption вроде должен вылелеть - strtoint вроде сама проверяет значения.

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