System Delphi

Title: Windows Default About Box
Question: The ShellApi unit contains some good functions. Among the more exotic are this one, ShellAbout. With this function you can open the default Windows About Box with your own text:
Answer:
uses
ShellApi;
begin
ShellAbout( self.Handle, pChar('This is my header'),
pChar('This is my copyright'), HICON(nil)
);
end;
If you wish to include your own icon, let HICON(nil) point to a icon handle. When pointing to nil the default Windows icon is used.