paintbox

0热度

2回答

在tpanel上创建tpaintbox的问题

我有一个小问题。我试图在TPanel这样创建TPaintBox： procedure TForm1.mkPaint(S: string); var PB: TPaintBox; begin PB := TPaintBox.Create(Self); with PB do begin Parent := Panel1; Visible := Tr

delphi delphi-7 panel paintbox 2010-11-14

---

0热度

2回答

如何画一条线在Delphi的FMX帆布

这是用Delphi柏林10.1更新2 下工作（我得到的连线）： brush := TStrokeBrush.Create(TBrushKind.Solid, TAlphaColors.Lightgray); brush.Thickness := 2; with Canvas do begin BeginUpdate; DrawLine(PointF(10, 10), Po

delphi canvas firemonkey delphi-10.1-berlin paintbox 2016-11-18

---

0热度

1回答

德尔福 - TPaintBox - 调整

我有问题，调整大小TPaintBox并在其上绘制： 在我的表格（命名FMain）我放弃了TPaintBox（名为DisplayImage），其中我试图调整为表被调整大小。 要做到这一点，我写了FMain的onResize受到（）方法（我证实，它被称为正确），其中我尝试调整DisplayImage： procedure TFMain.FormResize(Sender: TObject); beg

delphi resize onresize paintbox 2010-07-13

---