| View previous topic :: View next topic |
| Author |
Message |
sisiw
How do I cheat?
![]() Reputation: 0
Joined: 10 Jun 2010
Posts: 2
|
 Posted: Thu Jun 10, 2010 5:17 pm Post subject: need help delphi Tedit |
 |
|
hi anyone can help me with the Tedit let say i run the solitaire and want to change time to whatever i want..
what i got in in my form is tedit and 1 button
findwindow...
getwindowthreadid..
openprocess...
i dont have problem with those
now in writeprocessmemory (process, ptr (address), @Edit1,4,Cardinal);
when i type 10 in Tedit then click the button the time in solitaire change to high value like 888897 everytime i click the button it turn back to 888897 instead of 10... got my point anyone can help me on it
so when i type some digit in tedit it will show what i want inteads of high value
|
|
| Back to top |
|
 |
TROLOLOLOLOLOLOLOLOLOLOLO
Expert Cheater
 Reputation: -1
Joined: 27 Dec 2009
Posts: 100
|
| Posted: Thu Jun 10, 2010 5:57 pm Post subject: |
|
|
| Maybe try @Edit1.Text
|
|
| Back to top |
|
|
Dark Byte
Site Admin
 Reputation: 470
Joined: 09 May 2003
Posts: 25796
Location: The netherlands
|
| Posted: Thu Jun 10, 2010 6:08 pm Post subject: |
|
|
try strtoint first
_________________
Do not ask me about online cheats. I don't know any and wont help finding them.
Like my help? Join me on Patreon so i can keep helping |
|
| Back to top |
|
|
sisiw
How do I cheat?
![]() Reputation: 0
Joined: 10 Jun 2010
Posts: 2
|
| Posted: Fri Jun 11, 2010 1:58 pm Post subject: |
|
|
heres the code anyone can correct it
| Code: | unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
test: integer;
card: cardinal;
ps: integer;
add: integer;
Edit1: byte;
mini: cardinal;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
add := $06359F20;
test := FindWindow(NIL,'Solitaire');
GetWindowThreadProcessId(test,card);
ps := OpenProcess(PROCESS_ALL_ACCESS,false,card);
WriteProcessMemory(ps,ptr (add), @Edit1, SizeOf(Edit1), card);
end;
end. |
|
|
| Back to top |
|
|
Dark Byte
Site Admin
Reputation: 470
Joined: 09 May 2003
Posts: 25796
Location: The netherlands
|
| Posted: Fri Jun 11, 2010 5:36 pm Post subject: |
|
|
use a variable that is capable of holding a the size of the type you want to change, and then write the bytes from the start of that variable till the end to the wanted address
_________________
Do not ask me about online cheats. I don't know any and wont help finding them.
Like my help? Join me on Patreon so i can keep helping |
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
