那里错了?(0分)

  • 主题发起人 主题发起人 学习DELPHI
  • 开始时间 开始时间

学习DELPHI

Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.FormCreate(Sender: TObject);
var
dc:hdc;
bm:Tbitmap;
bc:Tcanvas;
begin
dc:=GetDC(panel1.handle);
bc:=Tcanvas.Create;
bm:=Tbitmap.Create;
bm.LoadFromFile('c:/a.bmp');
bc.Handle:=dc;
bc.Brush.Bitmap:=bm;
bc.FillRect(panel1.ClientRect);
bc.Free;
bm.Free;
releasedc(panel1.Handle,dc);
end;
 
你想干什么?
在Panel1上画图?是想给MDI主窗体加背景吧?
 
Panel1上画图啊。可以么?
 
后退
顶部