+ Новая дискуссия Люди в теме - 8 Рулевой - slavchic
744

Вопрос про Windows_ы

В виндовсах в меню Пуск сбоку есть эмблема windowsa, рисунок одним словом. Короче как его можно иэменять(редактировать) ПАСИБА
0
кондратий10 Января 2002, 21:25
К
кондратий10 Января 2002, 21:25

var
Form1: TForm1;
StartButton: hWnd;
OldBitmap: THandle;
NewImage: TPicture;

procedure TForm1.FormCreate(Sender: TObject);
begin
NewImage := TPicture.create;
NewImage.LoadFromFile(''C:\Windows\Circles.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;

0
  • 0
  • 0
dz10 Января 2002, 23:26
D
dz10 Января 2002, 23:26

Четыретысячичетырестасорокчетвертый Суслик хватит спамить форум о дизайне вопросами не по теме .

0
  • 0
  • 0
Administrator@@_11 Января 2002, 19:02
A
Administrator@@_11 Января 2002, 19:02

пасиба Кондратий.
dizain, я исправлюсь ;)))))

0
  • 0
  • 0
Administrator@@_16 Января 2002, 00:03
A
Administrator@@_16 Января 2002, 00:03

берёшь прогу типа WinHEX или Reshacker
И лопатишь файл c:\windows\explorer.exe
Там он и нах... одится.

0
  • 0
  • 0
Administrator@@_16 Января 2002, 23:13
A
Administrator@@_16 Января 2002, 23:13

Лопату оставь снег разгребать, его у нас тут много.
Есть много разных утилит которые позволяют менять этот значок и не только его...

0
  • 0
  • 0