Skip to content
MPGHThe Dark Arts
/
RegisterLog in
Forum
Community
What's NewLatest posts across the boardTrendingHottest threads right nowSubscribedThreads you follow
Discussion
GeneralIntroductionsEntertainmentDebate FortFlaming & Rage
Board
News & AnnouncementsMPGH TimesSuggestions & HelpGiveaways
More Sections
Art & Graphic DesignProgrammingHackingCryptocurrency
Hacks & Cheats
Games
ValorantCS2 / CS:GOCall of Duty / WarzoneFortniteApex LegendsEscape From Tarkov
+14 moreLeague of LegendsGTA VMinecraftRustROTMGBattlefieldTroveBattleOnCombat ArmsCrossFireBlackshotRuneScapeDayZDead by Daylight
Resources
Game Hacking TutorialsReverse EngineeringGeneral Game HackingAnti-CheatConsole Game Hacking
Tools
Game Hacking ToolsTrainers & CheatsHack/Release NewsNew
Submit a release →Share your cheat, tool, or config with the community.
AINEW
AI Tools
General & DiscussionPrompt EngineeringLLM JailbreaksHotAI Agents & AutomationLocal / Open Models
AI × Gaming
AI Aimbots & VisionML Anti-CheatGame Bots & Automation
Create
AI Coding / Vibe CodingAI Art & MediaAI Voice & TTS
The AI frontier →Where game hacking meets modern machine learning. Jump in.
Marketplace
Buy & Sell
SellingBuyingTradingUser Services
Trust & Safety
Middleman LoungeMarketplace TalkVouch Copy Profiles
Money
Cryptocurrency TalkCurrency ExchangeWork & Job Offers
Start selling →List accounts, services, and goods. Use the middleman to trade safe.
MPGH The Dark Arts

A community for offensive security research, reverse engineering, and AI.

Community

ForumMarketplaceSearch

Account

RegisterLog in

Legal

Privacy PolicyForum RulesHelp & FAQ
© 2026 MPGH · All rights reserved.Built by the community, for the community. For educational purposes onlyContent is shared for security research and education — we don't condone illegal use. You're responsible for complying with applicable laws. Use at your own risk.
Home › Forum › Programming › Programming Tutorials › Programming Tutorial Requests › Hacks with delphi 7..[DE]

Hacks with delphi 7..[DE]

Posts 1–2 of 2 · Page 1 of 1
ME
metin2zocker
Hacks with delphi 7..[DE]
Hello guys...
is there a way to make hacks with delphi 7??
if yes can you make a tutorial pls on howto make a button that changes a MW2 console command like : ju***eigh or whatelse From 400 to 800?
PLS be awesome and help me....

in this forum i only find c++/c#.. tutorials but i have delphhi 7 in the school and ive i start learning c++ ill forget delpgi..=(

MY DREAM: MAKE A MW2 (soon other games) Trainer
#1 · 16y ago
0rbit
0rbit
Well the easiest way I've found is to find your addresses and such as usual in Cheat Engine or whatever program you use, then use the Read/WriteProcessMemory APIs.

A MW2 trainer would be easy enough as the addresses tend to be static (so you won't need to deal with them changing every time). Anyway, here's a few easy examples to get you started:


Code:
// This code will disable the timer on Just Cause 2's demo
// allowing you to play for however long you want.

procedure TfrmMain.btnDisableClick(Sender: TObject);
var
  hProcess,HandleWindow: THandle;
  ProcessID,temp:cardinal;
  i:integer;
const
  addresses:array [0..2] of dword=($00538748,$00538749,$0053874A);
  patches:array [0..2] of byte=($90,$90,$90);
begin
  HandleWindow :=FindWindow(nil,'Just Cause 2 Demo');
  GetWindowThreadProcessId(HandleWindow,@ProcessID);
  hProcess := OpenProcess(PROCESS_ALL_ACCESS,FALSE,ProcessID);

  for i:=0 to 2 do WriteProcessMemory(hProcess,ptr(addresses[i]),@patches[i],1,temp);

  if hProcess <> 0 then
    CloseHandle(hProcess);
  end;
The above code is what you'd use if you were patching the program's code, ie. Cancelling an effect out.

So step-by-step through that code, we define two arrays, which are constant. The "addresses" array contains the addresses we wish to write to, and the "patches" array contains the bytes we'll be inserting.
Next, we find the Just Cause 2 Demo window, and hook the process.
After this, we run a loop, using "i" as our counter. This will loop 3 times (0,1,2), and for each run of the loop, a different byte is written to a different address (these are read from the arrays we already defined).
Lastly, we run a check to release the handle on the process.


=


Code:
// This code will set the Drift Multiplier in (Race Driver) GRID v1.00 to x99

procedure TfrmMain.Drift99Click(Sender: TObject);
var
  hProcess,HandleWindow: THandle;
  DriftMul:integer;
  ProcessID,temp:cardinal;
  address:dword;
begin
  DriftMul:=99;
  HandleWindow :=FindWindow(nil,'GRID');
  GetWindowThreadProcessId(HandleWindow,@ProcessID);
  hProcess := OpenProcess(PROCESS_ALL_ACCESS,FALSE,ProcessID);

  ReadProcessMemory(hProcess,ptr($343F77DC),@address,sizeOf(address),temp);
  address:=address+$18;
  
WriteProcessMemory(hProcess,ptr(address),@DriftMul,sizeOf(DriftMul),temp);
  if hProcess <> 0 then
    CloseHandle(hProcess);
end;
Now this code is a small bit more complicated, as it deals with some DMA, but it is an example of writing a variable.

With this kind of editing, you won't be patching addresses with hex bytes as before, but writing "normal" data to addresses. In this example we are setting an integer value to 99. As such, there is only one bit of data to write, and only one address, so we no longer need loops or arrays.

As with the first snippet of code, we start out by finding and hooking the process, and setting up the data we'll need.
We want to write our data (myInt) to a particular address in the game's memory, however this address changes each time the game is run due to DMA so we must first find the address.
Its base is always stored at the address 343F77DC, so we use ReadProcessMemory to find the data it stores, and we put that data in the "address" variable. This is only the base to a larger structure however, and the value we want is stored at [address+18h], so we preform this calculation before we continue.

Now that we have our address we can do as before and use WriteProcessMemory to write our value (myInt) to the address.
Finally as before, we run a check to release the handle on the process.


=


Code:
// This code will set the Prestige of the user according to their own choice in CoD:MW2 v1.0.184

procedure TfrmMain.btnApplyPrestigeClick(Sender: TObject);
var
  hProcess,HandleWindow: THandle;
  ProcessID,temp:cardinal;
  prestige:integer;
const
  address:dword=$01B2B89C;
begin
  prestige:=0;
  if StrToInt(editPrestige.Text)<=10 then prestige:=StrToInt(editPrestige.Text);

  HandleWindow :=FindWindow(nil,'Modern Warfare 2');
  GetWindowThreadProcessId(HandleWindow,@ProcessID);
  hProcess := OpenProcess(PROCESS_ALL_ACCESS,FALSE,ProcessID);

  WriteProcessMemory(hProcess,ptr(address),@prestige,sizeOf(Prestige),temp);

  if hProcess <> 0 then
    CloseHandle(hProcess);
  end;
Okay, in our final example, we'll work with Call of Duty: Modern Warfare 2. In this game, the addresses are static and so we don't need to do much work like we did in the GRID example. This is once again setting the value of a variable.

We set out by setting the prestige variable to 0. Then we check a TEdit and read its value, convert it to an integer, and use that instead. If the text entered is not a valid integer, we still have prestige set to 0, rather than a crazy value that could be automatically set. If it is a valid integer, we make sure it's a valid prestige by making sure it's less than or equal to 10.

We then find the window as before, and write our value to the address containing the prestige, and do our final check and unhook.

Now at a guess what I'd do for ju***eigh is to set that to a value (such as 100), open cheatengine, search the value, change again (to for example 150), search for the new value, and repeat until you've found it. Do note however that that is bannable by VAC so do be careful.

I hope this helps! If you have any other questions or anything feel free to ask/pm me, I'd be glad to help.

- 0rbit
#2 · 16y ago
Posts 1–2 of 2 · Page 1 of 1

Post a Reply

Similar Threads

  • Can u use the gain experience hack with 1 playerBy mjt20mik in WarRock - International Hacks
    7Last post 20y ago
  • HL2 Hack With Aimbot|ESP| And much, Much more.By quin123 in CounterStrike (CS) 1.6 Hacks / Counter Strike: Source (CSS) Hacks
    10Last post 17y ago
  • Godmode Hack with Ollydbg TutorialBy emisand in Gunz Hacks
    46Last post 20y ago
  • How To Get Hacks With Cheat Engine 5.3?By naomelembro14 in WarRock - International Hacks
    1Last post 19y ago
  • Hack with rapid fire mp7k and wall hackBy traggone in WarRock - International Hacks
    4Last post 19y ago

Tags for this Thread

None