Cheat Engine Forum Index Cheat Engine
The Official Site of Cheat Engine
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 


Delphi 7 Hacks

 
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming
View previous topic :: View next topic  
Author Message
torpin005
Master Cheater
Reputation: 0

Joined: 19 Nov 2007
Posts: 255

PostPosted: Sun Nov 02, 2008 9:13 am    Post subject: Delphi 7 Hacks Reply with quote

Hey I've been learning Delphi 7 lately and i learned how to change a value of an address, but only on one button per program, i cant like change the value back, can someone add [email protected] and ill explain in detail with my problem, thanks
Back to top
View user's profile Send private message AIM Address
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579

PostPosted: Sun Nov 02, 2008 9:50 am    Post subject: Reply with quote

Just explain it here, I doubt any wants to add you just to answer this.
Back to top
View user's profile Send private message
samuri25404
Grandmaster Cheater
Reputation: 7

Joined: 04 May 2007
Posts: 955
Location: Why do you care?

PostPosted: Sun Nov 02, 2008 10:15 am    Post subject: Reply with quote

Declare a global boolean variable, named On, or something of the sort, and do this in your button code:

Code:

if On = true then
    WriteProcessMemory( ... );
else
    WriteProcessMemory( ... );

On = not On;


Or whatever the operator for ! is, in Delphi.

_________________
Wiccaan wrote:

Oh jeez, watchout I'm a bias person! Locked.


Auto Assembly Tuts:
In Depth Tutorial on AA
Extended
Back to top
View user's profile Send private message
Anden100
Grandmaster Cheater
Reputation: 0

Joined: 20 Apr 2007
Posts: 668

PostPosted: Sun Nov 02, 2008 10:16 am    Post subject: Reply with quote

samuri25404 wrote:
Declare a global boolean variable, named On, or something of the sort, and do this in your button code:

Code:

if On = true then
    WriteProcessMemory( ... );
else
    WriteProcessMemory( ... );

On = not On;


Or whatever the operator for ! is, in Delphi.


Its right, the operator for ! is "not"
Back to top
View user's profile Send private message
torpin005
Master Cheater
Reputation: 0

Joined: 19 Nov 2007
Posts: 255

PostPosted: Sun Nov 02, 2008 10:20 am    Post subject: Reply with quote

This is too confusing for me, ill just learn other stuff in it first and come back
Back to top
View user's profile Send private message AIM Address
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579

PostPosted: Sun Nov 02, 2008 10:24 am    Post subject: Reply with quote

torpin005 wrote:
This is too confusing for me, ill just learn other stuff in it first and come back

If and Else shouldn't be hard if you've just got a bit experience with Delphi.
Back to top
View user's profile Send private message
torpin005
Master Cheater
Reputation: 0

Joined: 19 Nov 2007
Posts: 255

PostPosted: Sun Nov 02, 2008 10:35 am    Post subject: Reply with quote

i dont have too much experience but the if and else doesnt seem to work with this
Back to top
View user's profile Send private message AIM Address
Anden100
Grandmaster Cheater
Reputation: 0

Joined: 20 Apr 2007
Posts: 668

PostPosted: Sun Nov 02, 2008 11:42 am    Post subject: Reply with quote

torpin005 wrote:
i dont have too much experience but the if and else doesnt seem to work with this


Post the part of your code, where the if/else doesent seem to work
Back to top
View user's profile Send private message
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579

PostPosted: Sun Nov 02, 2008 11:51 am    Post subject: Reply with quote

The code should be something like this

Code:
var
 hackOn: boolean = false; //Declare this somewhere. It's false as default.

...

if hackOn = true then //If the hack is on, then...
begin
 WriteProcessMemory(...); //The hack was already one, so you're setting the value back to default.
 hackOn := false;
end
else //If the hack isn't on, then...
begin
 WriteProcessMemory(...); //Modify the value to your needs
 hackOn := true;
end;
Back to top
View user's profile Send private message
Anden100
Grandmaster Cheater
Reputation: 0

Joined: 20 Apr 2007
Posts: 668

PostPosted: Sun Nov 02, 2008 12:21 pm    Post subject: Reply with quote

Moller wrote:
The code should be something like this

Code:
var
 hackOn: boolean = false; //Declare this somewhere. It's false as default.

...

if hackOn = true then //If the hack is on, then...
begin
 WriteProcessMemory(...); //The hack was already one, so you're setting the value back to default.
 hackOn := false;
end
else //If the hack isn't on, then...
begin
 WriteProcessMemory(...); //Modify the value to your needs
 hackOn := true;
end;


or, you could rezise it...

Code:
var
hackOn: boolean
begin
if hackOn then //If the hack is on, then...
 WriteProcessMemory(...); //The hack was already one, so you're setting the value back to default.
else //If the hack isn't on, then...
 WriteProcessMemory(...); //Modify the value to your needs
hackOn:= not hackOn
end;
Back to top
View user's profile Send private message
NothingToShow
Grandmaster Cheater Supreme
Reputation: 0

Joined: 11 Jul 2007
Posts: 1579

PostPosted: Sun Nov 02, 2008 12:24 pm    Post subject: Reply with quote

As the code is most likely being used in a button, I don't think the variable hackOn will be saved, so next time he clicks the button, it's going to be true again.
Back to top
View user's profile Send private message
DeletedUser14087
I post too much
Reputation: 2

Joined: 21 Jun 2006
Posts: 3069

PostPosted: Sun Nov 02, 2008 12:25 pm    Post subject: Reply with quote

Already told you on msn, just edit the buffer:

Code:
const lpBuffer: Array[0..9]Of Byte = ($01 ,$00 ,$00 ,$00 ,$00 ,$68 ,$11 ,$F1 ,$63, $46);
var pID: Cardinal;
    hProcess: Cardinal;
    lpNumOfByWrit: Cardinal;
begin
try
GetWindowThreadProcessId(FindWindow(nil, 'MapleStoryClass'), pID);
hProcess := OpenProcess(PROCESS_VM_OPERATION or PROCESS_VM_WRITE, FALSE{!!}, pID{!!});
WriteProcessMemory(hProcess, Ptr($008E3A63), @lpBuffer, sizeof(lpBuffer), lpNumOfByWrit);
finally
CloseHandle(hProcess);
end;


Instructions: Insert this code to a button or w.e.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    Cheat Engine Forum Index -> General programming All times are GMT - 6 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot attach files in this forum
You can download files in this forum


Powered by phpBB © 2001, 2005 phpBB Group

CE Wiki   IRC (#CEF)   Twitter
Third party websites