TButton上加图标的问题?

jackzhao 2002-11-28 02:13:37
btnNewStart:=TButton.Create;
btnNewStart.Caption := '开始';
NewImage := TPicture.create;
NewImage.LoadFromFile('C:\Windows\Circles.BMP');


OldBitmap := SendMessage(btnNewStart.Handle,
BM_SetImage, 0,
NewImage.Bitmap.Handle);
ShowWindow(btnNewStart.handle,SW_SHOW);
可总是显示不了图形,如何做,谢谢
...全文
23 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
jackzhao 2002-12-02
  • 打赏
  • 举报
回复
我是想把win98下的开始菜单换成自己的,真么做
CDSoftwareWj 2002-11-29
  • 打赏
  • 举报
回复
不说什么了
CloneCenter 2002-11-29
  • 打赏
  • 举报
回复
用 BitBtn 不是很好吗?
stanely 2002-11-28
  • 打赏
  • 举报
回复
yes
happyzsl 2002-11-28
  • 打赏
  • 举报
回复
建议使用BitBtn
wisenowa 2002-11-28
  • 打赏
  • 举报
回复
BitBlt(GetDC(Button1.Handle), 5, 5, Image1.Width, Image1.Height,
Image1.Picture.Bitmap.Canvas.Handle, 0, 0, SRCCOPY );

1,183

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧