مشكلة في فتح برامج خارجية.... ما الحل؟

[Agmcz]

وعليكم السلام
أضف له مسار البرنامج وحل الأمر هكذا

كود :

 ShellExecute(Handle, 'open', PChar(ExtractFilePath(ParamStr(0)) + 'Books/3.cbr'), nil, nil, SW_SHOWNORMAL);