asked on

Array of Byte ERROR in My Aplicattion

const
sempre1_Address = $00443000;
Wind_Address = $00AA69D2;
BufVento0: Array[0..49] Of Byte = ($00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00, $00, $00,
$00, $00);
BufSempre: Array[0..9] of Byte = ($10, $00, $99, $00, $99, $00, $99, $00,
$99, $00);

procedure Ttf4rmLandia.tmL4nd1aTimer(Sender: TObject);
begin
try
if ckVento.checked = True then begin
PDWORD(Wind_Address)^:=;
end;
if ckSempre1.checked = True then begin
PDWORD(sempre1_Address)^:=;

I'm making an application to facilitate a game that I play here at my computer, only for their own use.
Should I have got to address is the second freezer adress these values ..
BufVento0:
BufSempre

Array of Byte values in, so I made up as follows.
In case the application and a DLL that will be injected in this game ...

I did so
if ckVento.checked = True then begin
PDWORD (Wind_Address )^:=;
end;

I inserted a timer and did the following way, but giving this error because I can not insert the value of byte array in the code above.

PDWORD (sempre1_Address) ^: = BufSempre1;

Unit1.pas (93): Incompatible types: 'Cardinal' and 'Array'

ASKER CERTIFIED SOLUTION

ThievingSix

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

nkilla

ASKER

I will test and give it u a awnser

Thanks For This help...

And other question...

How can I get the name of the doll that I'm playing within the game ...
And capture via a Label
It is possible without the adress?

ThievingSix

If you don't have the address you'd have to search for it. Do you have a little more information about what you're trying to do?

nkilla

ASKER

Yes.
I could already do, it would be here

One my doubts, sorry for asking so much:)
It would be the next ...
How do I activate my cheat in the game?

For example, I'm in the game and it has a chat.
So if I want to turn it inside without having to activate the cheat in Checkbox
Just write for example

/Activate

Oh, and if the checkbox marked on the trainer and I disable active and in-game, just writing ..
I figured something using myCommand ...

Thanks for the help ThievingSix:

begin;
      lblUsername.Caption: ='';
      Memory: = $ 0092A8F5;
      for j: = 0 to 11
      begin;
        number: = (PBYTE (Memory) ^);
        IF number = 0 then break;
        character: = chr (number);
        lblUsername.Caption: lblUsername.Caption + = character;
        Memory: Memory = +1;
      end;

Open in new window

ThievingSix

Having a chatbox in game leads me to believe this is a multiplayer game?

nkilla

ASKER

Mirrors Edge
Not MultyPlayer

Is Game Normal , i want to activate by chat this Game

ThievingSix

You'd have to find the address of the function that handles chat input, then hook the function.

Honestly, you'd be better off using GetAsyncKeyState and using hotkeys.

nkilla

ASKER

am
Ok
Thanks Thieving

I will contact with u , if your awnser solved my problem , and accept solution

nkilla

ASKER

This code solved my problem thanks ThivingSiX

I used and work 100%