criar arquivo TXT

estou usando o seguinte código:

AssignFile(G,nomeDoArquivo);

Rewrite(G);

Writeln(G,item);

CloseFile(G);

O delphi cria o arquivo, mas no diretório que está salvo o projeto, eu quero salvar num outro diretório, como eu faço?