移植するには？ (ID:37387)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 見比べる意味でそのまま書いていますが、実用を考えるなら プロパティを使われたほうが良いかもしれません。 それと、Set関数ですが、自身のX,Yへの代入ですよね？ この部分は変更しました。 unit Unit1; interface type TTest = class public X: Integer; Y: Integer; procedure SetData(SetX, SetY: Integer); end; implementation { TTest } procedure TTest.SetData(SetX, SetY: Integer); begin X := SetX; Y := SetY; end; end.