[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: khramovaleks, Balman  
Изменяем внешний вид CE на свой вкус
(FROST)Дата: Четверг, 2011-05-26, 1:21 PM | Сообщение # 1


Постов:212
Изменить репутацию: 181
Замечания: ±
Дополнительные награды:1 +



[Награды за посты]
== ==

Данная статья поможет людям, которые плохо ориентируются в Delphi, подогнать свой аналог CE под себя.
Иконки, картинки, менюшки, автоматическая вставка значений и др.
1. Как перетащить или изменить размеры окон, панелей думаю и так понятно. Как вставить вместо оригинальных значков свои?

Нажимаем на значок, в свойствах Object inspector(а) находим параметр как на скрине

Появляется Picture Editor
Тут все просто, выбираем свою картинку на значок в формате bmp и все

Если нужно изменить картинку справа в верхнем углу, нажимаем на картинку, в Object Inspector ищем свойство
После чего выбираете вашу картинку в формате bitmap
. 2Как сделать окно с информацией об авторе? (старое лучше удалить, т.к. из-за него появляется ошибка при запуске CE)
Создаем новую форму

Сразу заходим в Project>>>Options>>>Forms и перемещаем созданную форму в правый столбец

Создаем кнопку, с которой мы будем запускать это окно. Это может быть пункт меню (как сделать, смотрим пункт 2) или обычный Button, далее двойной клик по кнопке, открывается редактор кода
между Begin и End пишем:
if (not Assigned(Form1)) then // проверка существования Формы (если нет, то
Form1:=TForm1.Create(Self); // создание Формы)
Form1.Show; // (или Form1.ShowModal) показ Формы
(везде где Form1 вы пишите название вашей формы)

Чтобы ввести текстовую информацию, нужно добавить на форму компонент Label

После чего в поле Caption инспектора объектов писать свой текст.

Чтобы добавить картинку , кидаем на форму компонент Timage

В инспекторе объектов у него есть свойство Picture, нажав на которое , вы можете вставить свою картинку
Можно сделать кнопку закрытия этого окна

Кинуть на форму компонент Button

Нажать на кнопку 2 раза, откроется редактор кода, где между Begin и End нужно вписать
Код:
Close;
Вот что у нас получилось

3 Сворачивание CE в трей
Кидаем на форму компонент Ttrayicon

Создаем подпункт меню (как его создать написано в разделе 2)
Или если хотите чтобы сворачивалось в трей по нажатию на кнопку, кидайте на форму TButton

Далее двойной клик по кнопке с которой будет производиться сворачивание в трей, откроется редактор кода
между Begin и End пишем
Код:
TrayIcon1.Visible:=true;
mainform.Hide;
Далее двойной клик по добавленному компоненту Ttrayicon
Между Begin и End вставляем
Код:
TrayIcon1.Visible:=false;
mainform.Show;
4. Как сделать так, чтобы СЕ не палился в реестре?
Запускаем Compile, у нас открывается Delphi..открылось, идем в Search>>>Find in files
Text to find - пишем \Software\Cheat Engine\
Запускаем поиск

Появится такое

Двойной клик на первой строчке, в редакторе кода строка выделяется красным цветом, видим в ней Cheat Engine меняем на ваше название..оно и будет отображаться в реестре
ждуплюсиков и коментариев






Сообщение отредактировал (FROST) - Четверг, 2011-05-26, 1:25 PM
4itak89Дата: Четверг, 2011-05-26, 2:52 PM | Сообщение # 2


Постов:55
Изменить репутацию: 6
Замечания: ±
Дополнительные награды:0 +



[Награды за посты]
== ==

молодец,видно что старался
(FROST)Дата: Четверг, 2011-05-26, 2:55 PM | Сообщение # 3


Постов:212
Изменить репутацию: 181
Замечания: ±
Дополнительные награды:1 +



[Награды за посты]
== ==

Quote (4itak89)
молодец,видно что старался

за старание поставь +сик




4itak89Дата: Четверг, 2011-05-26, 2:59 PM | Сообщение # 4


Постов:55
Изменить репутацию: 6
Замечания: ±
Дополнительные награды:0 +



[Награды за посты]
== ==

извини,я тебе уже ставил сегодня,теперь ток через 7 дней смогу(

Добавлено (2011-05-26, 2:59 PM)
---------------------------------------------
а кстати ты мне за вх писал помнишь? да у меня есть кнопка инсёрт

  • Страница 1 из 1
  • 1
Поиск: