Замена DLL

Сейчас на форуме: Slinger, Rio (+4 невидимых)

Посл.ответ	Сообщение
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 15 июля 2006 12:23 · Поправил: goletsa · Личное сообщение · #1 Есть такая хорошая вещ как Рускаясправка для delphi так вот там все привязано к dll надо написать вместо нее аналог но не получается(не знаю какие параметры у функций) и какие значения возвращаются 108a_15.07.2006_CRACKLAB.rU.tgz - DLLD71.DLL Добавленог: Какие числа передаются я знаю для f2 это 2(или 4, зависит от справки) для f1 это 1

Ara Ранг: 1288.1 (!!!!), 273thx Активность: 1.29↘0 Статус: Участник	Создано: 15 июля 2006 13:04 · Личное сообщение · #2 А смысл в аналоге, если эту можно юзать?
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 15 июля 2006 14:24 · Личное сообщение · #3 здесь привязка к машине он требует ключевой файл так вот хочу сделать "улучшенный" аналог(без проверки на лицензионность вот файл для моей машины 85ee_15.07.2006_CRACKLAB.rU.tgz - DSet.dat
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 16 июля 2006 16:22 · Личное сообщение · #4 вот урезаная версия(токо один hlp файл) 7d39_16.07.2006_CRACKLAB.rU.tgz - amd.part1.rar
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 16 июля 2006 16:23 · Личное сообщение · #5 часть2 7304_16.07.2006_CRACKLAB.rU.tgz - amd.part2.rar
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 16 июля 2006 16:24 · Личное сообщение · #6 часть 3 7df4_16.07.2006_CRACKLAB.rU.tgz - amd.part3.rar
Tim Ранг: 253.9 (наставник) Активность: 0.13↘0 Статус: Участник	Создано: 16 июля 2006 16:48 · Личное сообщение · #7 ничего не напоминает? Thursday, February 12, 2004 09:17:21 ♦ % CB("History","&История","History()") ♦ ► BrowseButtons() ♦ ▼ RR("user","MessageBox","USSU") ♦ w IE(FE(`DLLD71.dll'),` ',`MessageBox(hwndContext, "Не найден файл DLLD71.dll", "Справка не будет работ ать", 0) :Exit()') ♦ ← RR("DLLD71.dll","f1","U=") ♦ → RR("DLLD71.dll","f2","U") ♦ ♠ f2(1) ♦ _ IF(f1(),`MessageBox(hwndContext, "Вы работаете с неустановленной копией справки", "Справка не будет работать", 0):JI(`',`нет')') ♦ _ IF(f1(),`M essageBox(hwndContext, "Вы работаете с неустановленной копией справки", "Справк а не будет работать", 0):JI(`',`нет')') ♦ _ IF(f1(),`MessageBox(hwndContext, "В ы работаете с неустановленной копией справки", "Справка не будет работать", 0): JI(`',`нет')') ♦ " IE(f1(),`',`MessageBox(hwndContext, "Вы работаете с неустано вленной копией справки", "Справка не будет работать", 0):JI(`',`нет')') ♠ Z ⌂◘ ----- MicroSoft? Is it some kind of a toilet paper?
Tim Ранг: 253.9 (наставник) Активность: 0.13↘0 Статус: Участник	Создано: 16 июля 2006 17:24 · Личное сообщение · #8 Держи! `#include <windows.h> int counter; extern "C" bool __export f1() { counter++; if(counter <= 3) return false; else return true; } extern "C" bool __export f2() { return true; } #pragma argsused int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved) { if(reason == DLL_PROCESS_ATTACH) counter = 0; return 1; }` a20c_16.07.2006_CRACKLAB.rU.tgz - dlld71.zip ----- MicroSoft? Is it some kind of a toilet paper?
goletsa Ранг: 14.2 (новичок) Активность: 0.01↘0 Статус: Участник	Создано: 16 июля 2006 17:26 · Личное сообщение · #9 я плохо зняю hlp формат
Tim Ранг: 253.9 (наставник) Активность: 0.13↘0 Статус: Участник	Создано: 16 июля 2006 22:09 · Личное сообщение · #10 goletsa Если ты не понял, DLL в аттаче. ----- MicroSoft? Is it some kind of a toilet paper?
Tim Ранг: 253.9 (наставник) Активность: 0.13↘0 Статус: Участник	Создано: 17 июля 2006 15:25 · Личное сообщение · #11 goletsa Посмотри на мой первый пост, там ясно видно, что сначала вызывается f2 с типом справки, потом четыре раза вызывается f1, причем первые три вызова дают FALSE, а последний TRUE. Все это было видно из куска кода справки, который я выделил. Делай по этому примеру свою ДЛЛ. ----- MicroSoft? Is it some kind of a toilet paper?

Для печати