variables - パスカルを使用した座標の定義と更新

Question

これはPASCALです。

（x1、y1、x2、y2）のような右上隅と左下隅の座標によって定義されるnumeorus長方形があります。これらの座標を変数aとb（x1 + a、y1 + b、x2 + a、y2 + b）だけシフトする必要があります。

これらの定数を定義してからシフトする簡単な方法はありますか？私はこれを一つずつやっていて、時間がかかります。plsは「いくつかの概念またはコマンド」を使用するように私に言わないでください可能であればサンプルコードを与えてください

Answer 1

コンパイラについては言及していませんが、アクティブなバージョンの Pascal (Delphi または FPC) では、rectという名前の TRect に四角形がある場合、単純に実行できます。

OffsetRect(rect,a,b);

ただし、 uses 句にユニットの「タイプ」を追加する必要がある場合があります