is VMTOFFSET not aviaible in Delphi 5 ?

Also had to make these changes to make it compile in D5:

type
PCardinal = ^Cardinal;
PPointer = ^Pointer;
IInterface = IUnknown;

Hello Mythar,

You are right, D5 doesn't support VMTOFFSET.

If you really want to use CodeHook in D5, you have to hard code the interface method VMT offset, such as 8, 12, etc.
The easiest way to do this is to print all the offset in a higher compiler, such as D6, then hard code the output in D5.

Regards

Hello Qi, don't have any other compiler then D5

However, let me see if i got this right, any Interface build on IUnknown would have the following offsets:

0 - QueryInterface
4 - Add Ref
8 - Release
12 - (first user defined method)
etc.

So if you look at AAG's sample, as an exsample, the offsets should be:
(assuming that the dinput.h header lists methods in the correct order)
IDirectInput8A::CreateDevice - offset 12 ($0C)
IDirectInputDevice8A::GetDeviceState - offset 36 ($24)

Did i get this right ?

Hello Mythar,

Yes, you are right.
You can count the offset manually. The first function offset is $0c, next if $10, etc.

Thx for clearing that up

[quote=Mythar]
Thx for clearing that up
[/i

interseting

D5 doesn't support VMTOFFSET ?