Código Delphi [-] ShellAbout(Handle, A, B, Application.Icon.Handle);
ShellAbout(Handle, A, B, Application.Icon.Handle);