Форум программистов
 
О проблемах, например, с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Ответ
 
Опции темы
Старый 09.03.2008, 17:05   #11
lamonana
программист
Пользователь
 
Регистрация: 08.03.2008
Сообщений: 19
Счастье

Круто провернул!
Но вернемся к теме о пожизненной замене надписи "пуск" на другое слово.

Правда, не с помощью Delphi, но тем не менее.

Надпись на пуске хранится в c:\Windows\explorer.exe. (т. е. в реестре ее нет) Я не знаю, откуда взялись сказки о том что надпись это не надпись, а картинка. Ничего подобного.

Скачиваем программку для редактирования системных библиотек, exe и т. д. Напр, PE Explorerhttp://www.izone.ru/other/programing...r-download.htm-3208kb (она Shareware, но ключи/кряки к ней в инете есть). Запускаем. Нажимаем Open File... и открываем вышеуказанный файл. Далее жмем Resourse View/Editor. В каталоге String дважды жмем на "37" стр. и в открывшемся окне смотрим на самое верхнее значение с ID=578. В нем написано "пуск". Это как раз тот самый долгожданный "пуск", который Винда заносит в Кнопу. Нажимаем на него и снизу меняем его на любое другое слово. Желательно не больше 4 символов, а то остальные не влезут и отображаться не будут.
После того как поменяли значение, сделанным остается лишь половина дела. Если вы поменяете старый Explorer.exe на новый, система просто восстановит старый файл и результата не будет. Так что сохраните результат в C:.
Едем дальше. Перезагружаем комп и во время загрузки жмем F8. В открывшемся меню BIOSа выбираем "Безопасный режим с поддрержкой командной строки". Лишь в таком режиме можно безнаказанно менять системные файлы! Ждем когда загрузится... В открывшемся cmd.exe вводим (примечание: <enter> - это клавиша!):
cd c:<enter>
xcopy explorer.exe C:\Windows /r /y<enter>
exit<enter>
Затем перезагружаемся и запускаем уже обычный режим Windows.
Наслаждаемся результатом! Теперь пуск всегда будет таким, какой вы ввели! (Пока вы его не поменяете, разумеется)))
Программист-Антиламер со стажем
lamonana вне форума Ответить с цитированием
Старый 09.03.2008, 18:17   #12
lamonana
программист
Пользователь
 
Регистрация: 08.03.2008
Сообщений: 19
По умолчанию

Цитата:
Специально для ALTERA:
1. Объявите глобальную переменную COUNTER.
2. Бросьте на форму таймер и задайте интервал, например, 200.
3. Используйте такой код:
А если еще в OnCreate написать:
Код:
ShowWindow(handle, SW_HIDE);
ShowWindow(application.handle, SW_HIDE);
(для скрытия окна и "значка" из панели задач, кто не понял)

Написать вместо ALTERA какое-нить нехорошее слово и подсунуть какому-нить ламеру или юзверю в автозапуск...
Мммм... Какой эффект будет!.. Я тащуся...

Завтра обязательно училке в лицее эту программку подсуну! Она офигеет!..
Программист-Антиламер со стажем

Последний раз редактировалось lamonana; 09.03.2008 в 18:26.
lamonana вне форума Ответить с цитированием
Старый 09.03.2008, 19:24   #13
lamonana
программист
Пользователь
 
Регистрация: 08.03.2008
Сообщений: 19
Вопрос

Цитата:
Сообщение от mihali4 Посмотреть сообщение
Кстати, вот еще один простенький фокус с кнопкой ПУСК:
MoveWindow(FindWindowEx(FindWindow( 'Shell_TrayWnd', nil), 0, 'Button', nil), 0, 0{LEFT}, 54{WIDTH}, 22, true);
Изменяя параметры LEFT и WIDTH можете установить ширину кнопки и ее расположение на панели задач.
Ага! Когда я изменил Left, Касперский запретил поему приложению выполняться и ляпнул, что это троянская прога Trojan-Downloader Win32.Banload.auf!!!
Я польщен...
Программист-Антиламер со стажем
lamonana вне форума Ответить с цитированием
Старый 15.03.2008, 01:33   #14
Dj_smart
Капсула от спама
Форумчанин
 
Аватар для Dj_smart
 
Регистрация: 04.03.2008
Сообщений: 779
По умолчанию

Вот немного размечтался...
Получилось чтото типа бегущей строки.
Вложения
Тип файла: rar PUSK.rar (162.2 Кб, 47 просмотров)
Dj_smart вне форума Ответить с цитированием
Старый 15.03.2008, 06:38   #15
Altera
Одинокий кодер
Старожил
 
Аватар для Altera
 
Регистрация: 29.01.2008
Сообщений: 2,406
По умолчанию

lamonana, а где keyGane скачать к PE Explorer-у?
Altera вне форума Ответить с цитированием
Старый 15.03.2008, 08:27   #16
Altera
Одинокий кодер
Старожил
 
Аватар для Altera
 
Регистрация: 29.01.2008
Сообщений: 2,406
По умолчанию

Спасибо! Не надо! Я Нашёл! КЛАССНАЯ ПРОГА!!!
Altera вне форума Ответить с цитированием
Старый 23.06.2011, 13:45   #17
Arsenx777
Delphi, c++, php
Форумчанин
 
Аватар для Arsenx777
 
Регистрация: 14.03.2011
Сообщений: 288
По умолчанию

Цитата:
Сообщение от andrey4623 Посмотреть сообщение
кнопка "Пуск" - это картинка, а не надпись, и изменить ее можно только поменяв картинку. А это провернуть можно только в Win9x
то что кнопка пуск является картинкой я согласен! но надпись поменять можно, и картинку пуска , не только в windows 90х, но и в xp
Мудр тот, кто знает нужное, а не многое.

Arsenx777 вне форума Ответить с цитированием
Старый 29.12.2011, 12:05   #18
font
Новичок
Джуниор
 
Регистрация: 29.12.2011
Сообщений: 1
По умолчанию

Цитата:
Сообщение от mihali4 Посмотреть сообщение
Используйте такой код
Как использовать код? Сделать из него батник?
Прошу простить за невежество.
font вне форума Ответить с цитированием
Старый 29.12.2011, 14:45   #19
psycho-coder
Участник клуба
 
Аватар для psycho-coder
 
Регистрация: 06.04.2009
Сообщений: 1,524
По умолчанию

lamonana: нам потом расскажите реакцию учителя?
psycho-coder вне форума Ответить с цитированием
Старый 29.12.2011, 14:49   #20
Lime
Форумчанин
 
Аватар для Lime
 
Регистрация: 10.02.2009
Сообщений: 815
По умолчанию

Цитата:
Сообщение от psycho-coder Посмотреть сообщение
lamonana: нам потом расскажите реакцию учителя?
09.03.2008, 19:24
Lime вне форума Ответить с цитированием
Ответ

Здесь нужно купить рекламу за 20 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru
Без учёта ботов - 20000 человек в день, 350000 в месяц.

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Кнопка пуск Черничный Общие вопросы Delphi 2 07.08.2008 07:30
Пуск Rahim1993 Общие вопросы Delphi 4 10.02.2008 20:14
Кнопка Пуск vitalik007 Win Api 9 05.09.2007 07:20
аналог меню пуск RammFan Общие вопросы Delphi 14 27.02.2007 08:49


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS