Скачать: CL | DM;

Как получить доступ к своему же файлу?   Найти похожие ветки 

← →
lock95 ©   (2004-04-21 17:52) [0]

Подскажите уважаемые мастера. Нужно сделать программу которая запускается и проверяет свой файл на контрольную сумму, если сумма не совпадает программа прекращает свою работу (это для отслеживания изменений в своей программе от всяких умников). Проблема в том что получить доступ на чтения самой себя проги не предоставляется возможным… Копирование и последующее чтение не предлагать т.к. очень просто обмануть этот метод…

---

← →
Anatoly Podgoretsky ©   (2004-04-21 17:55) [1]

Неправда, получение доступа на чтение возможно и это единственно возможный режим, если ты не принял конечно мер препятсвующих этому.

---

← →
lock95 ©   (2004-04-21 18:06) [2]

Если бы так, я бы не спрашивал
Спасибо…

---

← →
clickmaker ©   (2004-04-21 18:12) [3]

А как файл открываешь? код приведи

---

← →
Алхимик ©   (2004-04-21 18:13) [4]

> lock95 ©


Дык умники и проверку контрольной суммы вырежут нафиг.

---

← →
lock95 ©   (2004-04-21 18:21) [5]

открываю через
assignFile(f,"c:\dump.dmp");
reset(f,1);
BlockRead(f, Buf, SizeOf(Buf), NumRead);

и т.п.

Умники пускай отдыхают после AspPACа

---

← →
clickmaker ©   (2004-04-21 18:35) [6]

> lock95 ©   (21.04.04 18:21) [5]

hFile := CreateFile("c:\dump.dmp", GENERIC_READ, 0, nil, OPEN_EXISTING, 0, 0);
ReadFile(hFile, Buf, SizeOf(Buf), NumRead, nil);

---

← →
lock95 ©   (2004-04-21 18:38) [7]

Попробую...

---

← →
lock95 ©   (2004-04-21 18:40) [8]

Пардон ошибочка

assignFile(f,"c:\MyProge.exe");< она стартует и читает себя
reset(f,1);
BlockRead(f, Buf, SizeOf(Buf), NumRead);

Я просто не тот исходник взял

---

← →
VMcL ©   (2004-04-21 20:28) [9]

>>lock95 ©  (21.04.04 18:40) [8]

assignFile(f,"c:\MyProge.exe");< она стартует и читает себя
FileMode := fmOpenRead or fmShareDenyNone;
reset(f,1);
BlockRead(f, Buf, SizeOf(Buf), NumRead);

---

← →
lock95 ©   (2004-04-22 16:33) [10]

Вопрос снят все заработало
Отдельное спасибо VMcL

---

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

Скачать: CL | DM;



Память: 0.47 MB
Время: -0.98 c