Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.08.26;
Скачать: [xml.tar.bz2];

Вниз

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;


 
Dimaxx ©   (2007-07-31 14:07) [4]

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


 
tesseract ©   (2007-07-31 14:26) [5]


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


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



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.08.26;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.039 c
15-1183204733
turbouser
2007-06-30 15:58
2007.08.26
Советские фильмы


2-1185858542
tytus
2007-07-31 09:09
2007.08.26
Скорость выполнения запроса


2-1186316550
hahol
2007-08-05 16:22
2007.08.26
id3teg


2-1185638832
Юра
2007-07-28 20:07
2007.08.26
Современные игры


9-1149643604
Galiaf
2006-06-07 05:26
2007.08.26
Сетевые игры сеть для игры.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский