Вызов стандартного системного окна О программе

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Вызов стандартного системного окна О программе

Автор: Алексей

Hовый русский в компьютерном магазине:
- У вас операционные системы есть?
- Есть.
- Многозадачные есть?
- Есть.
- Мне 600-задачную!

uses ShellAPI;

procedure ShowAbout;
begin
  ShellAbout(Form1.Handle, 'Напиши здесь название программы',
  'Заяви здесь о своих авторских правах на программу' + #13#10 +
  'можно в две строки', Application.Icon.Handle);
end;