Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

String to Hex


Denni ©   (2007-07-31 13:59:00) 

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

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

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


tesseract   (2007-07-31 14:26:00) [1]


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


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


Dimaxx   (2007-07-31 14:07:00) [2]

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


savyhinst   (2007-07-31 14:03:00) [3]

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


tesseract   (2007-07-31 14:01:00) [4]


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


StrToInt('$'+value);


savyhinst   (2007-07-31 14:01:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо