Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.01.2009, 20:35   #11
пукарь
Пользователь
 
Регистрация: 15.10.2008
Сообщений: 24
По умолчанию

ух-ты. Спасибки pomoshnic. Правда я так не представлял. Получается ты указываешь раскрыть фаил в байтах. Тоесть в двоичном коде, а потом позволяешь изменить чета там? надо будет поэксперементировать с этим.
А там нет функции для шестнадцаиричного кода?
А что за значение такое mod и div?

Последний раз редактировалось пукарь; 06.01.2009 в 20:37.
пукарь вне форума Ответить с цитированием
Старый 06.01.2009, 21:03   #12
pomoshnic
Форумчанин
 
Аватар для pomoshnic
 
Регистрация: 16.11.2008
Сообщений: 192
По умолчанию

mod - возвращает остаток от деления и div - возвращает целую часть от деления. А с шестнадцатиричным кодом напишу через 15 минут.
pomoshnic вне форума Ответить с цитированием
Старый 06.01.2009, 21:33   #13
pomoshnic
Форумчанин
 
Аватар для pomoshnic
 
Регистрация: 16.11.2008
Сообщений: 192
Вопрос

Вот с шестнадцатеричной системой, А ЧТО ТАМ С ОТЗЫВОМ???
Код:
const 
hexa:array [0..15] of char=('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F');
var t:text;
f:file of byte;
ch:char;
n:byte;
s:string;
name:string;
begin
readln(name);
assign(f,name);
reset (f);
assign(t,'res.txt');
rewrite(t);
repeat
s:='';
read(f,n);
repeat
s:=s+hexa[n mod 16];
n:=n div 16
until n<= 15;
s:=s+hexa[n];
write(s,' ');
write(t,s,' ');
until eof(f);
close(f);
close(t);
readln;
end.
pomoshnic вне форума Ответить с цитированием
Старый 06.01.2009, 22:05   #14
пукарь
Пользователь
 
Регистрация: 15.10.2008
Сообщений: 24
По умолчанию

Это что-то новенькое. Как, я то думал. Ты крут. Выходит, при прочитывании файла, он читается как он есть. А ты сам указываешь что именно и как тебе нужно?
А можно указать чтоб програмка могла спросить какой адрес хотелось бы исправить?
Что значит t?

Последний раз редактировалось пукарь; 06.01.2009 в 22:28.
пукарь вне форума Ответить с цитированием
Старый 06.01.2009, 22:09   #15
пукарь
Пользователь
 
Регистрация: 15.10.2008
Сообщений: 24
По умолчанию

я вот не понимаю до конца. А трудно сделать прогу которая будет читать фаил и сбрасывать его содержимое в 16тиричном коде, как в Hex Editor. С лева нумерация колонок, вверху нумерация солбцов?

Последний раз редактировалось пукарь; 06.01.2009 в 22:18.
пукарь вне форума Ответить с цитированием
Старый 07.01.2009, 00:00   #16
pomoshnic
Форумчанин
 
Аватар для pomoshnic
 
Регистрация: 16.11.2008
Сообщений: 192
По умолчанию

Цитата:
Сообщение от пукарь Посмотреть сообщение
Это что-то новенькое. Как, я то думал. Ты крут. Выходит, при прочитывании файла, он читается как он есть. А ты сам указываешь что именно и как тебе нужно?
А можно указать чтоб програмка могла спросить какой адрес хотелось бы исправить?
Что значит t?
T это текстовая переменная, и файл в шестнадцатеричном (двоичном) виде сохраняется в файле 'res.txt'. А с адресами я не знаю как сделать.
pomoshnic вне форума Ответить с цитированием
Старый 07.01.2009, 01:02   #17
пукарь
Пользователь
 
Регистрация: 15.10.2008
Сообщений: 24
По умолчанию

Вот оно как. А я думал на прямую.
пукарь вне форума Ответить с цитированием
Старый 07.01.2009, 03:05   #18
pomoshnic
Форумчанин
 
Аватар для pomoshnic
 
Регистрация: 16.11.2008
Сообщений: 192
Восклицание

Цитата:
Сообщение от пукарь Посмотреть сообщение
Вот оно как. А я думал на прямую.
Нет, файл res.txt тут непричем. Сначала с файла, имя которого ты вводишь, читается число в формате byte, а затем оно переводится в нужную систему исчисления. А в файл res.txt пишется точно то, что и на монитор, но на экран влазит только 25 строчек, а в файл, сколько хочешь (если места хватит ).
pomoshnic вне форума Ответить с цитированием
Старый 07.01.2009, 04:22   #19
пукарь
Пользователь
 
Регистрация: 15.10.2008
Сообщений: 24
По умолчанию

Круто, надо будет поэксперементировать с графическими файлами.
пукарь вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помощь xakkkkker Помощь студентам 1 01.11.2008 19:37
Помощь F1 Stanislav Общие вопросы Delphi 6 26.11.2007 00:29
Помощь!!!!!! Танюшка!!!!!!! Фриланс 7 25.10.2007 12:02