ClassesRoot: IRegistryKey;
Свойство ClassesRoot возвращает раздел реестра, содержащий сведения, обеспечивающие открытие необходимой программы при открытии файла.
Sub Main;
Var
RegKey: IRegistryKey;
Begin
RegKey := RegistryClass.ClassesRoot;
Debug.WriteLine(RegKey.Name);
End Sub Main;
После выполнения примера, в консоль будет выведено наименование раздела, содержащего сведения, обеспечивающие открытие необходимой программы при открытии файла.
См.также: