OpenFile(ExtractFilePath(ParamStr(0)) + '\test.zip');
Я не понял Вашего вопроса, но всё же Вам на него отвечу!