it works on 32-bit platform.but not 64-bit here is the exzample TVerbInfo = packed record Verb: Smallint; Flags: Word; end; var VerbInfo: TVerbInfo; strList : TStringList; verb : Smallint;...

I can't seem to find out the answer to this through searching, so here goes.... I know that I can pass Class objects generically to other classes by utilising this type of code: public class ClsG...

Today, one very simple question came to my mind when I had to override TObject's BeforeConstruction method: Why do TObject methods AfterConstruction and BeforeConstruction have public visibility? ...

I currently have this, and it sucks: type TpointArray = array [0..3] of Tpoint; class function rotationTable.offsets(pType, rotState, dir: integer): TpointArray; begin Result[0] := point(1, 1);...

TObject.InstanceSize returns 8, yet TObject doesn't declare any data members. According to the implementation of TObject.ClassType, the first 4 bytes can be explained as a pointer to the object's T...