菜鳥，怎么實現dELPHI中的label邊框顯示以及顏色，在線等

菜鳥求助，如何實現dELPHI中的label邊框顯示以及顏色，在線等
如何實現dELPHI中的label邊框顯示以及顏色

[解决办法]

Delphi(Pascal) code

  Label1.Canvas.Pen.Width := 5;  Label1.Canvas.Rectangle(Label1.ClientRect);
[解决办法]
var
canvas  :TCanvas;
hd :THandle;
begin
          canvas := Tcanvas.Create;
           hd := getdc(pnl1.Handle);
           canvas.Handle := hd;
           canvas.Pen.Style := psDot;
           canvas.Pen.Color := clred;
           canvas.MoveTo(0, 0);
           canvas.LineTo(100, 100);
end
画线 其他参照 搞就行了
[解决办法]
看错 Tlabel 有Canvas 可以直接用。。
TPanel  没有的 可以用我的方法。
或者增加 属性
[解决办法]
加上顏色 Label1.Canvas.Pen.Color := clRed;