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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме 15-35 тыс рублей в месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 19.11.2010, 07:45   #1
Наталья111
Пользователь
 
Регистрация: 22.12.2008
Сообщений: 59
Вопрос Контрольное суммирование

Здравствуйте!
Как написать программу на языке Делфи: Защита программ с помощью контрольного суммирования.

С чего начать? И как это выглядит визуально?
Наталья111 вне форума
Старый 19.11.2010, 08:57   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,803
По умолчанию

Вот так можно узнать контрольную сумму файла:
Код:
uses
  windows,
  imagehlp,
  SysUtils;

var s:string;f:file of byte; h,cs:DWORD;
begin
 AssignFile(f,'project2.exe');reset(f);
 SetLength(s,Filesize(f));
 BlockRead(f,s[1],length(s));close(f);
 CheckSumMappedFile(@s[1],length(s),@h,@cs);
 Write(h:10,cs:10);readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.
cs - контрольная сумма.
Если время от времени проверят ее то можно узнать что файл кем-то был изменен, ибо контрольная сумма будет другая.
I'm learning to live...
Stilet вне форума
Старый 19.11.2010, 08:59   #3
Наталья111
Пользователь
 
Регистрация: 22.12.2008
Сообщений: 59
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Вот так можно узнать контрольную сумму файла:
А еще чего можно узнать контрольную сумму, кроме файла?
Наталья111 вне форума
Закрытая тема
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Суммирование Mike02 Microsoft Office Excel 2 24.06.2010 19:49
Суммирование Slavik Microsoft Office Excel 4 08.04.2010 14:45
Суммирование Артур Иваныч Microsoft Office Excel 4 02.12.2009 20:20
Суммирование SlavaSH БД в Delphi 15 22.01.2009 12:29
суммирование от и до.... snakezx Microsoft Office Excel 1 28.11.2008 15:38