You can do something like this:

Code:
type
  PInt32 = ^integer;
var
  Data : array[0..10] of TMyRecord;
begin
  PInt32(@Data)^ := 42;
end;