Import and export registry key (Delphi)

First of all add unit ShellApi

For import use:

ShellExecute(0,nil,'regedit.exe',PChar('/s "keyfile.reg"'),nil,0);

1	ShellExecute(0,nil,'regedit.exe',PChar('/s "keyfile.reg"'),nil,0);

and for export:

ShellExecute(0,nil,'regedit.exe',PChar('/e "keyfile.reg" "registrykey"'),nil,0);

1	ShellExecute(0,nil,'regedit.exe',PChar('/e "keyfile.reg" "registrykey"'),nil,0);