拥有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
答案 0 :(得分:0)
你的begincene应该是第一个声明。