摘要: var Form2: TForm2; fcheck,fnocheck:tbitmap; implementation {$R *.DFM} procedure TForm2.FormCreate(Sender: TObject); var bmp:TBitmap; begin FCheck:= TBitmap.Create; FNoCheck:= TBitmap.Create... 阅读全文
posted @ 2005-04-08 16:54 JustLive 阅读(905) 评论(0) 推荐(0) 编辑