怎样修改windows里的开始按钮的位图?
2008-04-30 17:36
369 查看
/修改
var
Form1: TForm1;
StartButton: hWnd;
OldBitmap: THandle;
NewImage: TPicture;
/ 将代码放入FormCreate事件
procedure TForm1.FormCreate(Sender: TObject);
begin
NewImage := TPicture.create;
NewImage.LoadFromFile('C:windowsCircles.BMP');
StartButton := FindWindowEx
(FindWindow(
'Shell_TrayWnd', nil),
0,'Button', nil);
OldBitmap := SendMessage(StartButton,
BM_SetImage, 0,
NewImage.Bitmap.Handle);
end;
/还原
procedure TForm1.FormDestroy(Sender: TObject);
begin
SendMessage(StartButton,BM_SetImage,0,OldBitmap);
NewImage.Free;
end;
for win98se/delphi 5.0通过。
var
Form1: TForm1;
StartButton: hWnd;
OldBitmap: THandle;
NewImage: TPicture;
/ 将代码放入FormCreate事件
procedure TForm1.FormCreate(Sender: TObject);
begin
NewImage := TPicture.create;
NewImage.LoadFromFile('C:windowsCircles.BMP');
StartButton := FindWindowEx
(FindWindow(
'Shell_TrayWnd', nil),
0,'Button', nil);
OldBitmap := SendMessage(StartButton,
BM_SetImage, 0,
NewImage.Bitmap.Handle);
end;
/还原
procedure TForm1.FormDestroy(Sender: TObject);
begin
SendMessage(StartButton,BM_SetImage,0,OldBitmap);
NewImage.Free;
end;
for win98se/delphi 5.0通过。
相关文章推荐
- 怎样修改windows里的开始按钮的位图?
- 图说:Windows 8的缩略图开始按钮
- [2月6日的脚本] 修改Windows 8开始屏幕上的磁贴行数 (PowerShell)
- 怎样修改Windows的网卡顺序(多网卡出口顺序)
- Windows 系统怎样修改主机解析器最大缓存时间 以及否定回答缓存超时时间
- 使用自绘的按钮,怎样给他添加位图
- MFC/VC++中怎样设置位图按钮并且位图不会覆盖文字--------位图按钮
- Classic Shell:找回 Windows 8 / Windows Server 2012 的经典的开始按钮和开始菜单
- 微软为什么在Windows 8中去除“开始”按钮
- Windows7双系统的启动顺序怎样修改?
- 怎样体验Windows 7的“开始”菜单的搜索功能
- 微软为什么在Windows 8中去除“开始”按钮
- 由虚变实 Windows 8开始按钮成为物理按键
- sqlserver2008sa密码忘记并且windows没有sytemadmain权限怎样修改sa密码?
- Windows 8.1开始按钮如何使用?
- 怎样修改Windows 7登录界面默认输入法
- Windows 9 将于明年11月发布 无开始按钮
- 怎样找回Windows里的“显示桌面”按钮?
- [2月7日的脚本] 在Windows 8开始屏幕上修改背景颜色
- sqlserver2008sa密码忘记并且windows没有sytemadmain权限怎样修改sa密码?