| eXeL@B —› Основной форум —› Создание патча на Delphi | 
| Посл.ответ | Сообщение | 
| 
 | 
Создано: 21 сентября 2005 08:37  · Личное сообщение · #1  | 
| 
 | 
Создано: 21 сентября 2005 08:42  · Личное сообщение · #2  | 
| 
 | 
Создано: 21 сентября 2005 08:56  · Личное сообщение · #3  | 
| 
 | 
Создано: 21 сентября 2005 09:02  · Личное сообщение · #4  | 
| 
 | 
Создано: 21 сентября 2005 09:12  · Личное сообщение · #5  | 
| 
 | 
Создано: 21 сентября 2005 10:20 · Поправил: SLayer  · Личное сообщение · #6  | 
| 
 | 
Создано: 21 сентября 2005 10:50 · Поправил: NEOPEX  · Личное сообщение · #7 Лично я использую файловая переменная.Read(Seek,Readbuf,Write,Writebuf); Чтобы открыть используй файловая переменная := TFile.Stream.Open(имяфайла,fmReadWrite); Так очень удобно создавать именно патчи(в том числе универсальные) P.S. Я это по памяти написал - так что извиняй если не работает 2 Av0id Писать патчи на асме лучше но на дельфи - прикольней Сложно поверить в долгожданную месть - Армагедон уже здесь... ----- Люблю повеселиться, особенно пожрать ![]()  | 
| 
 | 
Создано: 21 сентября 2005 10:53 · Поправил: read_me  · Личное сообщение · #8  | 
| 
 | 
Создано: 21 сентября 2005 11:30  · Личное сообщение · #9  | 
| 
 | 
Создано: 21 сентября 2005 11:41  · Личное сообщение · #10  | 
| 
 | 
Создано: 21 сентября 2005 12:34  · Личное сообщение · #11  | 
| 
 | 
Создано: 21 сентября 2005 13:06  · Личное сообщение · #12  | 
| 
 | 
Создано: 21 сентября 2005 13:27  · Личное сообщение · #13  | 
| 
 | 
Создано: 21 сентября 2005 13:58  · Личное сообщение · #14  | 
| 
 | 
Создано: 21 сентября 2005 21:51  · Личное сообщение · #15 Av0id AG Hellspawn Гнете пальцы? вы сразу програмьте в 0101 и будете настоящие гуру вместо того что бы помочь, флеймите тут... Devil_guy вот примерный пример на дельфе: const cPatch=$EB; var fEXE : file; bPatch: byte; begin AssignFile(fEXE,'c:\crackProgram\crackme.exe'); // сфязваем переменную fEXE с файлом Reset(fEXE,1); // открываем файл Seek(fEXE,$18FF); // смещаемся в файле BlockRead(fEXE,bPatch,1); if bPatch=$EB then MessageBoxA(0,'patch','Уже пропатчен',64); else BlockWrite(fEXE,cPatch,1); CloseFile(fEXE); // закрываем файл end; Синтаксис не препомню, писал на память, так что если будут ошибки посмотри хелп ----- Подписи - ЗЛО! Нужно убирать! ![]()  | 
| 
 | 
Создано: 22 сентября 2005 00:12  · Личное сообщение · #16  | 
| 
 | 
Создано: 22 сентября 2005 00:49  · Личное сообщение · #17  | 
| 
 | 
Создано: 22 сентября 2005 02:20  · Личное сообщение · #18 Av0id пишет: пишу патчи и прочую муть всегда на асме или накрайний случай на сях, всё остальное чуждо для меня, особенно дельфи Хм... не факт! патчи можно писать на чем угодно - хоть на перле или шелл-скриптах. мне приходилось... вопрос тольлко в удобстве применения. nice, каюсь, надо было сразу отослать его не дельфи.ру (или куда-то туда), ибо, согласись, вопрос не по крякингу, а по программированию на дельфи... а это, как говорят в Одессе - две большие разницы! ![]()  | 
| 
 | 
Создано: 22 сентября 2005 02:25  · Личное сообщение · #19  | 
| eXeL@B —› Основной форум —› Создание патча на Delphi | 
| Эта тема закрыта. Ответы больше не принимаются. | 



 



 

 





 Для печати