procedure THIShellAbout._work_doShow;
begin
  ShellAbout(ReadHandle, PChar(_prop_ApplicationName), PChar(_prop_Caption), Applet.Icon);
end;