Читать книгу Delphi. Трюки и эффекты - Александр Чиртик - Страница 29

Глава 2
Уменьшение размера ЕХЕ-файла. Использование Windows API
2.4. Стандартные диалоговые окна Windows
Системное окно «О программе»

Оглавление

Этот последний и довольно экзотичный пример приведен на случай, если возникнет желание или необходимость использовать красивое окно О программе, которое выводится для самой операционной системы Windows и ее компонентов. Процедура выведения этого окна приведена в листинге 2.32.

Листинг 2.32. Окно «О программе»

procedure ShowAbout(strAppName: string; strInfo: string);

begin

ShellAbout(hParentWnd, PAnsiChar(strAppName),

PAnsiChar(strInfo),LoadIcon(0, IDI_ASTERISK));

end;

Правда, в окне О программе Windows ХР на информацию о приложении отведено всего две строки (и место для значка слева от окна). Все остальное место занимают информация о регистрации операционной системы и фирменная эмблема Microsoft Windows ХР.

Delphi. Трюки и эффекты

Подняться наверх