shellexecute avec espace dans le path sujet

Bonjour,
J'utilise le code suivant qui marche bien temps que le path ne contient pas d'espace:

Code:

---

1 2 3

var cmd: string; cmd := '+h +r ' + extractFilePath(application.exename)+ proj +'.phl'; ShellExecute(handle, nil, 'attrib',PChar(cmd),nil,sw_shownormal);

---

J'ai tenté des variations en suivant les info sur le net mais sans résultat :calim2:
(du style double quote...)
Comment m'en sortir???
Merci pour vos idées:merci: