Отправляет email-рассылки с помощью сервиса Sendsay

Программирование на Delphi

  Все выпуски  

Программирование на DELPHI v3-7NEW!


Информационный Канал Subscribe.Ru

Программирование на DELPHI

Программирование на DELPHI


Привет ВСЕМ. С наступающим вас Новым гАдом:))) Надеюсь, что в новом году вас станет больше.
А у меня к вам есть два предложения:

1)Конечно у каждого из вас появляются вопросы(в отношении программирования)
и иногда самостоятельно найти ответ очччень сложно. Но вы можете задать свой вопрос в эту рассылку и он будет опубликован в конце ближайшего выпуска рассылки. Так на ваш вопрос смогут ответить читатели рассылки.
Задать вопрос можно от сюда-fordelphi@narod.ru

2)Если кто-то из вас нашел(или написал) интересную статью и хочет поделиться с народом,то он может написать мне.
Мне очень нужнен новый материал!!! Писать сюда- fordelphi@narod.ru

Если у вас есть предложения или замечания, прошу писать мне ForDelphi@Narod.ru


В этом выпуске

1)10 Вещей которые Дельфер должен знать.-->
2)Работа с реестром в Delphi-->


10 Вещей которые Дельфер должен знать.

1)Используйте в приложениях Runtime Packages - пакеты времени выполнения. Выберите Project(проект)>Options(Опции), перейдите в появившемся окне на страницу Packages(Пакеты) и установите флажок Build with Runtime Packages(Построить с пакетами). Размер исполняемого файла вашего проекта сократится в 10-15 раз, поскольку с ним не будут соединяться динамические библиотеки Delphi. Однако программа будет исполнятся только в том случае, если обнаружит на компьютере коллекции Borland - *.bpl

2)Одним из недостатков Delphi является медленная загрузка, особенно на старых компьютерах. Чтобы исправить это, уменьшите количество пакетов разработки (Design time Packages). Вкладки Indy, COM, ActiveX, WebSnap и т.д. почти наверняка не понадобятся вам, если только вы не профессиональный разработчик. Откройте страницу Packages(Пакеты) в опциях проекта и удалите ненужные пакеты, а чтобы не ошибиться, просматривайте компоненты, содержащиеся в них, с помощью кнопки Components. Delphi будет загружаться и работать значительно быстрее.

3)Забыли, на какой вкладке компонент? Найдите его с помощью View>Components List, а потом выберите Component>Configure Palette и отредактируйте вкладки по своему вкусу. В списке будет содержаться много пустых страниц, без всяких компонентов. Удалите их.

4)Поставьте курсор в какую-нибудь строку исходного кода и нажмите F5. Строка подсветится красным. Затем нажмите F9 и запустите проект. Когда код, содержащийся в помеченной строке, будет исполнятся, Delphi укажет на это. Очень полезно, если у вас есть подозрение, что некоторые строки кода не исполняются при работе приложения.

5)Пользуйтесь "короткими" переменными: ShortString вместо String, Smallint вместо Integer. Иногда (особенно в консольном приложении) это может уменьшить размер EXE на несколько килобайт.

6)Следите за секцией Uses. Там постоянно "оседают" модули, которыми, может, вы уже не пользуетесь. К примеру, если вы осчастливили свою форму компонентом TBitBtn, поставили на него какой-то код, а потом отказались и удалили, то модуль Buttons.pas останется в Uses, засоряя исполняемый файл. Избавляйтесь от модулей вместе с компонентами и не бойтесь удалить что-нибудь нужное: при компиляции Delphi автоматически добавляет в Uses модули присутствующих объектов. Изредка (если вы работаете с нестандартными компонентами) такого рода чистка может дать эффект в сотни(!) килобайт.

7)Пользуйтесь компрессорами исполняемых файлов. AsPack, UPX и другие в 3-4 раза уменьшают размер EXE, и запакованное ими приложение нельзя просмотреть шпионом ресурсов.

8)Достаньте себе шпион ресурсов. (Как найти софт в Сети - не мне вам рассказывать ;)). Restorator, ResHacker и т.д. позволяют вскрывать и редактировать EXE-файлы, если только они не запакованы (см. выше). Дело в том, что Delphi по собственному почину добавляет к приложению курсоры, рисунки (галочки/палочки/крестики), которые содержатся в BitButton'ах, даже если BitButton'ов в вашем проекте нет. С помощью шпиона ресурсов можно удалить этот мусор. Далее, шпионы почти всегда могут показать форму вашего приложения, как она записана в файле *.DFM (т.е. не в графическом, а в текстовом виде) и строковые ресурсы (различные сообщения, обычно на английском), которые можно (и нужно) редактировать.

9)Русифицируйте свои консольные приложения. Если в команде Writeln вы укажите какой-нибудь текст на русском, консоль выдаст всякую тарабарщину. Значит, нужно перекодировать текст Win в Dos. Существует уйма перекодировщиков, лучший из которых - Блокнот. Введите нужный вам текст и поставьте шрифт Terminal. Результат отобразиться в OEM/DOS.

10)10 программ, которые вы должны собрать за свою сознательную жизнь, не используя нестандартных компонентов:

Текстовый редактор. С этого начинают все. Отработка приемов работы с текстом и первичные навыки сохранения документов.

Калькулятор. Навыки дельфийских математических операций.

Графический редактор. Работа с канвой и уяснение разницы между компонентом Image и PaintBox.

Информация о системе. ОС, ОЗУ, винчестер, процессор, имя пользователя etc.

Будильник. Работа с датой и временем.

Программа, Сворачивающаяся В Трей.

Чистильщик реестра. Удаление "мертвых" ключей из секции Uninstall и т.п. Навыки работы с реестром.

Чистильщик диска. Удаляет *.tmp, *.gid и прочий мусор. Поиск файлов и работа с ними.

Медиаплейер.

Клавиатурный шпион.


Работа с реестром в Delphi

Для начала в раздел uses необходимо подключить модуть Registry

Как писать.

Вот пример процедуры которая читает данные из одного параметра реестра и записывает их в другой.

Procedure ButtonClick(sender:tobject)

Var Registry:TRegistry;

Key:string;

begin

Registry:=Registry.Create//создаём обект

Registry.RootRey:=HKEY_CURRENT_USER;

Registry.OpenKey('software/microsoft/windows/CurrentVersion/Explorer',true);//открываем ключ

Key:=Registry.ReadString('Logon User Name');//Читаем данные из Logon User Name в Key:String

Registry.RootKey:=HKEY_LOCAL_MACHINE;

Registry.openKey('SowtWare/My Key',true);//открываем и создаём ключ

Registry.WriteString('MyName',Key);//Записываем данные в параметр MyName

end;


С уважением, Angel(http://www.fordelphi.narod.ru)



http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное