Запазване на данни на двоичен файл
Здравейте скъпи,
Ние олимпиада по информатика заплашва училище, аз съм все още просто се уча Delphi, но се сблъскват с такива пъзели примерни, които могат да бъдат в търсене на Олимпийските игри. За вас, то вероятно ще бъде много прост, но за мен това все още е обикновено неразбираемо.
Пример текстови задачи:
stringovaya даден ул променлива тип: = "ffd8ffe000104a4649460001", което съдържа данни в шестнадесетичен. Тези данни трябва да бъдат записани в двоичен файл, така че всеки записан байт до шестнадесетичната стойност в условие stringovoy променлива.
Ето една задача ми беше даден poreshat. Помогнете моля. Ще бъда много благодарен, ако ли да си представите на източника и обясни, че аз знаех как да го направя. Благодаря Ви много.
1. Ако дължината на низа - странно, да го добавите в ляво до символа "0"
2. Минете низ от знаци, линия, докато двойки. Всяка двойка се приема като подниз, подплатени на левия символ "$" се превръща в броя на обажданията StrToInt и след това брой се вписва по партидата на байт.
Това е всичко. Код - това е за себе си, както и че ще бъде интересно.
Благодаря, аз го разбрах, но аз никога не съм работил с рекорд в текстовия файл, но има и двоичен. може поне покаже на запис във файла? благодаря предварително
maximka # XA0; (10/22/04 20:52) [2]
Push F1, индексът печат запис, получават помощ с пример процедура запис ([Var F: Текст] [. P2 Рп.] Р1);
> [2] maximka # XA0; (22.10.04 20:52)
Var
# XA0; F: файл на Byte;
# XA0; стойност: Байт;
започвам
# XA0; AssignFile (F, "C: \ MyFile.bin");
# XA0; Reset (F);
# XA0; // в стойността на запишете номера на
# XA0; Write (F, стойност);
# XA0; CloseFile (F)
край.
Аз delfi7, и сякаш не съществува Например, аз имам малко по-тъжно с англичаните, затова исках с бележките към Руската го разбера. Съжалявам, разбира се, че задавам глупави въпроси, но аз съм ученик vsegolish.
Vooo, spasibochki голям започне. край
Свързани статии