从实作标题栏按钮开始浅谈组件的制作 StretchBlt(Handle, Left, Top, Right-Left, Bottom-Top, FGlyph.Canvas.Handle, 0, 0, FGlyph.Width, FGlyph.Height, srcCopy); end; finally ReleaseDC(FForm.Handle,Handle); Free; end; end; end; procedure TTitleBarButton.Repaint; begin Paint; end; end. 上一篇:“98五笔字型输入法”大批量造词 下一篇:如何把数据库的内容写入到Word文档中? 更多相关文章
|
推荐文章
精彩文章
|