摘要:
var C:TControlCanvas; begin C := TControlCanvas.Create; C.Pen.Color := clRed; C.Pen.Width := 3; C.Control := Memo1; C.MoveTo( 20,20 ); C.LineTo( 20, 120 ); C.Free; end; 阅读全文
posted @ 2017-01-26 17:01
del88
阅读(418)
评论(0)
推荐(0)
浙公网安备 33010602011771号