firemonkey - 在 TImageViewer 中重新定位图像

Question

我正在为 iOS 构建一个 FMX 应用程序，它有一个TImageViewer与TPanel内容TImageViewer对齐的。我将文件中的位图加载到TImageViewer图像中，然后可以平移和放大/缩小图像。工作正常。

我现在想要的是一个按钮单击事件，以将图像的左边缘重新定位在图像的左边缘，TPanel使其看起来像下面的顶部图像。

以下是首次加载时的示例：

这是在我平移它之后：

我已经搜索和实验了一整天，但我就是无法得到它。我尝试重新加载位图文件，但什么也没做。有什么建议么？

谢谢，拉斯

Answer 1

根据这个 delphi question找到了一种方法。请注意，ImageMap 是我 TImageViewer在 Form1 上的名称。

TPointF myOffset;
myOffset = Form1->ImageMap->ViewportPosition; // this is (0,0) before the image is panned around, non-zero otherwise
Form1->ImageMap->ScrollBy(myOffset.X, myOffset.Y) ;