Fórum Como posicionar em uma parta do Windows Explorer para salvar #265524

Gostaria de uma ajuda.

Uso a seguinte rotina para salvar em determinado local quando aperto o botão save report do QuickReport.
WLocal := ExtractFilePath(ParamStr(0));
WLocal := WLocal[1] + ´:\PETB\´+ FDM.TBPRCPRC_PASTANR.AsString;
if DirectoryExists(WLocal) = TRUE then
DirectoryListBox1.Directory := WLocal;
DirectoryListBox1.Update;
FileListBox1.Update;

A minha duvida é quando abrir o Microsoft Word, como especificar que o local padrão para salvar é o mesmo descriminado na rotina acima?
Obs: para chamar o Word uso a seguinte rotina:
WinExec(PChar(FDM.TBUSRUSR_LOCALWORD.AsString),sw_Show);
o problema é que o local padrão quando aperto o botão salvar do Word não é o mesmo já posicionado no DirectoryListBox1 do Delphi.

Agadeço pela ajuda desde já.