为什么DrawLine的结果在iOS上不可见?

时间:2013-11-25 11:47:00

标签: android ios delphi firemonkey delphi-xe5

拥有FM HD表格。 在表格上:按钮和图像(TImage)。

procedure TfrmImageEditor.Button2Click(Sender: TObject);
begin
  Image.Canvas.Stroke.Color := $ffff0000 ;  // Red
  Image.Canvas.Stroke.Kind := TBrushKind.bkSolid;
  Image.Canvas.StrokeThickness:= 10;
  Image.Canvas.BeginScene;
  Image.Canvas.DrawLine(PointF(0, 0), PointF(100, 100),1);
  Image.Canvas.EndScene;
end;

点击按钮后,我看到一条线,优秀的红线......但仅限于Win32。 当我在iOS模拟器或真实机器人中运行应用程序时,我点击按钮后什么都看不到。

如何在图片上看到一条线?

更新:Delphi XE5,Windows 7

1 个答案:

答案 0 :(得分:0)

你的begincene应该是第一个声明。