Ungültige Typumwandlung mit Pointer

[Bjoerk]

Das ganze kann man ja auch mit typisierten Pointern machen und auch nicht nur casten.

Delphi-Quellcode:

function RunExternalFunc(aFuncName: string): Variant;
type
  TConvertArray2: array [0..3] of char;
  PConvertArray2: ^TConvertArray2:
var
  T: TConvertArray2;
  P: PConvertArray2;
begin
  New(P);
  ..
  P^:= T;
  ..
  Dispose(P);
end;