制作一个立体汉字的Bitmap图片,当鼠标移到SpeedButton上时,在按钮上显示该图片。
解决方案 »
- 如何实现两个字符串(相同长度)对应位ASCII码相加?
- 求sql语句,逐行想减的。
- 为什么我的dbgrid不能显示数据
- 如何压缩一个文件
- 怎么样提取多行文本编辑框中的内容
- 基与mci设备编写应用程序需要安装什么驱动就可以播放Asf avi mpg 等文文件,在哪有下载的?
- 文件改名的问题?!
- 关于Delphi中Indy9.0控件TIdTCPClient和TIdTCPServer的多线程使用问题,请高手指教
- Delphi6与Delphi5的区别。。。。。。。。。。。。。。。。。。。
- 给用户定制的软件是按套收费还是只收一次开发费用,用户也是卖给他的用户,纠结
- 我该怎么办!
- socket的sendbuf()和receivebuf()到底应该怎么写???
SpeedButton1.Glyph:=Tbitmap.Create;
with SpeedButton1.Glyph do
Begin
Height:=SpeedButton1.Height ;
Width:=SpeedButton1.Width;
Canvas.Brush.Style:=bsClear;
Canvas.Font.Color:=clBlack;
Canvas.TextOut(4,4,'文字');
Canvas.Font.Color:=clRed;
Canvas.TextOut(5,5,'文字');
End;