1,183
社区成员
发帖
与我相关
我的任务
分享TButton上加图标的问题？
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);
可总是显示不了图形，如何做，谢谢
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);
可总是显示不了图形，如何做，谢谢
...全文
请发表友善的回复…
发表回复
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 );
Image1.Picture.Bitmap.Canvas.Handle, 0, 0, SRCCOPY );
