Pointers in Delphi

[chessgod101]

This is a simple example of how one can use pointers in delphi to read variables as a different data type. In this example, we will take an array of 12 bytes and read it as 3 different integers. By using pointers, you can overcome delphi's strict data type limitations and manipulate and write data more flexibly. This example is from a keygen for Unit Converter Pro 3.1.


I have done my best to document this source code in a way that makes it easy to understand. If you have trouble understanding the code, feel free to ask a question and I will do my best to answer it.

Product Website:

hxxp://www.unitconverterpro.com/download.html

[giv]

Yep.
Thank you!
I have looked also in the program verification routine.
The serial have 16 chars.
First 8 characters generates the next 8 trough a loop of XOR/AND/SHIFT of bytes of the inverted first 8 bytes .
The resulted DWORD from the function that "translate" the first 8 chars is the second part of the serial.
Nice protection.