SysUtils, Classes; {$R *.RES} exports ShowAbout index 10; begin end.

Я добавил только одну строку exports ShowAbout index 10;. У нас будет только одна процедура ShowAbout с индексом 10. Эта процедура будет показывать окно «О программе».

Теперь щёлкаем File->New Form , чтобы создать новую форму. Нарисуй на ней что-нибудь, можно даже то, что сделал я (рисунок 18.4.1).

Переходи в текст модуля. В разделе var, после объявления формы опиши процедуру ShowAbout: