-1

这是帕斯卡；

我有许多矩形，它们由它们的右上角和左下角坐标定义，例如（x1，y1，x2，y2）。我必须通过变量 a 和 b (x1+a,y1+b,x2+a,y2+b) 移动这些坐标。

有没有一种简单的方法来定义这些常量然后移动它们？我一个接一个地做这个，需要很长时间。如果可能，请不要告诉我使用“一些概念或命令”给出示例代码

4

1 回答 1

1

你没有提到你的编译器，但在 Pascal 的活动版本（Delphi 或 FPC）中，如果你在名为rect的 TRect 中有矩形，你可以简单地做

OffsetRect(rect,a,b);

您可能需要在您的使用条款中添加单位“类型”

于 2013-01-13T13:03:53.397 回答