SetLength(FileName, GetModuleFileName(hp, pchar(FileName), 128);
Я не понял Вашего вопроса, но всё же Вам на него отвечу!