>>56
ありがとう。参考にはなったけどまだ解決はできていません。

procedure Move(const Source; var Dest; Count: Integer);
begin

end;

procedure SetZero(var X; Count: Integer);
begin

end;

それで、いまだに begin endの中のコードを試行錯誤中。
つーか、D8でなくなった関数などの移植方法、ヘルプに全然載ってないからわからん。
せめて互換のためのユニットだけでも提供してくれると楽なのに。
というか、俺に互換ユニット作れということなのか?