我想在Panel空间中 使用 Canvas->LineTo() 这样属性的方法调用,可panel却没有Canvas属性,请问如何在panl中画线 。
我用ScrollBox也没有这个Canvas属性,难道这样画线的方式只能在有Canvas中的环境中用么?
这分赚定了。问题解决了早点结分。
免得被强盗抢走
void __fastcall TForm1::Button1Click(TObject *Sender)
{
TControlCanvas * PanelCanvas;
PanelCanvas= new TControlCanvas;
PanelCanvas->Control=Panel1;
PanelCanvas->Brush->Color=clBlue;
PanelCanvas->FillRect(Panel1->ClientRect);
PanelCanvas->Free();
}
TControlCanvas * can = new TControlCanvas;
can->Control = Panel; //or ScrollBox
can->MoveTo();//
can->LineTo();;//
一切同Canvas
delete can;
方法二
TCanvas * can = new TCanvas;
can->Handle = GetDC(Panel->Handle);
...//use can 画图
ReleaseDC(Panel->Handle,can->Handle);
delete can;//释放资源