如何通过代码在delphi中设置Timage wrapmode？答案

【问题标题】：How to set a Timage wrapmode in delphi through code?如何通过代码在delphi中设置Timage wrapmode？
【发布时间】：2013-02-16 08:59:47
【问题描述】：

（使用 firemonkey 和 xe3）。嗨，我创建了一个 img。

  img := Timage.Create(fsbCanvas);
  with img do
    begin
      Parent:=fsbCanvas;
      position.X:=frmMainUI.CurrentMouseX;
      position.y:=frmMainUI.CurrentMouseY;
      Bitmap.LoadFromFile('1.jpg');
      Visible:=true;
    end;

现在我想将它的 wrapmode 设置为 iwStreach。所以我添加了这个： Timagewrapmode.iwStreach 但我收到一条错误消息，提示“需要声明但找到表达式”。

有人可以帮忙吗？

【问题讨论】：

许多受人尊敬的人认为陈述是邪恶的，并且有充分的理由。在这种情况下，它会使您的代码更难阅读。
@mikeSutton 注意，这只是为了询问。不会再发生了。

标签： delphi firemonkey

【解决方案1】：

您必须以这种方式设置图像WrapMode 属性：

img.WrapMode := TImageWrapMode.iwStretch;

注意，枚举必须使用其类型名称完全限定。

这是因为编译器指令"$SCOPEDENUMS" 在FireMonkey 应用程序中默认启用。

【讨论】：

这不起作用，除非您创建我的答案中描述的常量。不过还是谢谢
感谢您的解释。你觉得你可以看看我的另一个问题吗？ stackoverflow.com/questions/14875328/…
我以为你需要一个常数，但你是对的。这是我现在接受的遮阳篷。