Delphi. Учимся на примерах

на главную - закладки

Жанры

Поделиться:

Delphi. Учимся на примерах

Шрифт:

Введение

В своей первой книге, "Delphi. Только практика", автор рассматривал примеры различных интересных программ. Эта книга является продолжением первой книги. Продолжением, поскольку исходные коды программ, которые рассматриваются в первой и второй книге, не повторяются. Также как и в "Delphi. Только практика", в данном издании подробно рассмотрены программы для сетей, различные шуточные программы, простые игрушки, некоторые полезные приложения, разработка приложений в стиле Windows XP. В частности, здесь можно найти такие примеры как бесплатная отправка SMS, FTP-клиент, простое шифрование, CGI-сценарии и многое другое.

Поскольку рассмотренные примеры достаточно просты, то даже начинающий программист сможет быстро освоить азы написания приложений в Delphi и перейти к разработке собственных проектов (описание синтаксиса языка программирования Object Pascal представлено в приложении Г). Само собой разумеется, что для изучения изложенного в книге материала желательно знать основы работы с Windows, поскольку Delphi — средство разработки программ именно для этой операционной системы.

Структура книги такова, что ее не обязательно читать от начала до конца, — можно просто открыть любую главу и разработать рассматриваемую программу. Все примеры подробно объясняются и содержат комментарии сложных строк кода. Книга будет интересна как опытным программистам, так и тем, кто только начал изучать язык программирования Delphi.

К книге прилагается компакт-диск, содержащий исходные и исполняемые файлы всех рассмотренных программ, а также цветные копии рисунков.

Глава 1

Интерфейс в стиле Windows XP

Как известно, интерфейс программ, написанных на Delphi и запускаемых в операционной системе (ОС) Windows XP, при любом стиле оформления будет иметь одинаковый вид. В этой главе будет показано как написать программу, которая будет отображаться в стиле XP.

С помощью любого редактора создайте текстовый файл и введите в нем следующий текст:

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>

<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">

 <assemblyIdentity name="Microsoft.Windows.ApplicationName" processorArchitecture="x86" version="1.0.0.0" type="win32"/>

 <description>ApplicationDescription</description>

 <dependency>

<dependentAssembly>

<assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" processorArchitecture="x86" publicKeyToken="6595b64144ccf1df" language="*" />

</dependentAssemblу>

 </dependency>

</assembly>

Сохраните этот файл под именем с:\xp_style.txt. Затем создайте еще один текстовый файл следующего содержания:

1 24 C:\xp_style.txt

Сохраните этот файл под именем xp_style.rc в каталоге С:\Program file\Delphi\Bin.

⊚ Файлы xp_style.txt и xp_style.rc можно найти на прилагаемом к книге компакт-диске в папке Chapter01.

Примечание

Указанный выше путь к папке Bin предполагает, что Delphi был установлен в каталог, выбранный по умолчанию. Если при установке был выбран другой каталог, то используйте именно его. Далее в книге будет везде использован путь по умолчанию.

Теперь запустим программу C: \Program File\Delphi\Bin\ brcc32.exe, передав ей в качестве параметра имя файла хрstyle.re. Для этого следует перейти в режим командной строки, выполнив команду системного меню Пуск→Выполнить, а затем в диалоговом окне Запуск программы введя команду cmd и нажав клавишу <Enter>. В режиме командной строки с помощью команды cd перейдем в каталог С:\Program file\Delphi\Bin и выполним следующую команду:

brcc32.exe xp_style.rc

В результате в каталоге C:\Program file\Delphi\Bin должен появиться ресурсный файл xpstyle.res, который следует подключать к приложению в том случае, когда его требуется оформить в стиле Windows XP.

Проверим, так ли это, создав программу в стиле XP. Откройте диалоговое окно настройки свойств Рабочего стола и выберите тему Windows XP (если она еще не выбрана).

Создайте в Delphi новый проект и разместите на форме компонент Edit категории Standard. Присвойте его свойству Text следующее значение: Все компоненты и сама форма в стиле Windows ХР. Ниже разместите кнопку (компонент Button категории Standard), при нажатии которой будет появляться информационное окно (оно тоже должно быть в стиле XP). Обработчик события OnClick для кнопки:

procedure TForm1.Button1Click(Sender: TObject);

begin

 ShowMessage(Edit1.Text);

end;

Теперь при нажатии кнопки будет появляться окно, содержащее текст, извлеченный из поля для ввода. Запустим программу на выполнение. Как видим, внешний вид интерфейса никак не изменился, не смотря на то, что выбрана тема Windows XP.

Для того чтобы решить эту проблему найдите в программном модуле раздел implementation (сейчас в нем указано только подключение файла формы *.dfm при помощи директивы {$R *.dfm}). Для того чтобы подключить наш файл ресурсов, следует в разделе implementation добавить строку

{$R xp_style.res}

Теперь можно запустить программу и насладиться интерфейсом ХР (рис. 1.1).

Рис. 1.1. Элементы формы отображаются в стиле Windows XP

Введите в поле какой-либо текст и нажмите кнопку — должно появиться информационное окно, которое также будет отображаться в стиле Windows XP (рис. 1.2). При этом, размер exe-файла увеличился всего лишь на несколько сотен байт.

Рис. 1.2. Информационное окно также отображается в стиле Windows XP

Комментарии:
Популярные книги

Последний Паладин. Том 9

Саваровский Роман
9. Путь Паладина
Фантастика:
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Последний Паладин. Том 9

Корсаков

Кощеев Владимир
1. Корсаков
Фантастика:
альтернативная история
аниме
попаданцы
5.00
рейтинг книги
Корсаков

Газлайтер. Том 18

Володин Григорий Григорьевич
18. История Телепата
Фантастика:
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Газлайтер. Том 18

Черный Маг Императора 18

Герда Александр
18. Черный маг императора
Фантастика:
юмористическое фэнтези
аниме
сказочная фантастика
фэнтези
фантастика: прочее
попаданцы
5.00
рейтинг книги
Черный Маг Императора 18

Эволюция мага

Лисина Александра
2. Гибрид
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Эволюция мага

Черный Маг Императора 11

Герда Александр
11. Черный маг императора
Фантастика:
юмористическое фэнтези
попаданцы
аниме
фэнтези
5.00
рейтинг книги
Черный Маг Императора 11

Избранное

Хоакин Ник
Мастера современной прозы
Проза:
современная проза
5.00
рейтинг книги
Избранное

Простолюдин

Рокотов Алексей
1. Путь князя
Фантастика:
боевая фантастика
рпг
5.00
рейтинг книги
Простолюдин

Закрытые Миры

Муравьёв Константин Николаевич
Вселенная EVE Online
Фантастика:
фэнтези
5.86
рейтинг книги
Закрытые Миры

Тринадцатый

Северский Андрей
Фантастика:
фэнтези
рпг
7.12
рейтинг книги
Тринадцатый

Кодекс Охотника. Книга XXIV

Винокуров Юрий
24. Кодекс Охотника
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Кодекс Охотника. Книга XXIV

Дневники 1928-1929

Пришвин Михаил Михайлович
Документальная литература:
биографии и мемуары
5.00
рейтинг книги
Дневники 1928-1929

Кодекс Охотника XXVIII

Винокуров Юрий
28. Кодекс Охотника
Фантастика:
фэнтези
боевая фантастика
попаданцы
5.00
рейтинг книги
Кодекс Охотника XXVIII

Газлайтер. Том 28

Володин Григорий Григорьевич
28. История Телепата
Фантастика:
боевая фантастика
аниме
попаданцы
5.60
рейтинг книги
Газлайтер. Том 28
Спасибо за голос.