Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Как показать File Properties диалог?

01.01.2007
{ This code shows the standard file properties dialog like in Windows Explorer } 
 
uses
shellapi
;
 
// Thanks to Peter Below (TeamB) for this code
procedure
PropertiesDialog(FileName: string);
var
sei
: TShellExecuteInfo;
begin
FillChar(sei, SizeOf(sei), 0);
sei
.cbSize := SizeOf(sei);
sei
.lpFile := PChar(FileName);
sei
.lpVerb := 'properties';
sei
.fMask := SEE_MASK_INVOKEIDLIST;
ShellExecuteEx(@sei);
end;
 
 
procedure TForm1
.Button1Click(Sender: TObject);
begin
if Opendialog1.Execute then
PropertiesDialog(Opendialog1.FileName);
end;

Взято с сайта https://www.swissdelphicenter.ch/en/tipsindex.php