Маленькую ошибку допустил.
(Путь к папке не указал):
Код:
ShellExecute(handle, 'open','cmd.exe','"C:\Program Files\Kaspersky Lab\Kaspersky Internet Security 2011\avp.exe"+ " addkey"+ " " +openDialog.FileName', nil, SW_SHOW);
В примере вместо папки указал nil, но думаю надо написать реальную директорию...