Создание гиперссылки в Delphi

[RombosGT]

Народ, нужна ваша помощь!

Мне нужно создать приложение на котором будут находится несколько элементов (Button, Label). Нужно сделать чтобы при нажатии на эти элементы открывались определенные файлы (архивы). Проблема в том, что это приложение вместе с файлами должно быть записано на диск. Но я не знаю как правильно вводить код пути для файлов так как съемный диск в разных компьютерах будет обозначатся разными буквами (I:\, F:\, N:\ и т.д.)
Заранее спасибо

[_SERGEYX_]

var path: string;
begin
  //со слешем в конце
  path:= ExtractFilePath(Application.ExeName);
  path:= ExtractFilePath(ParamStr(0));
  //без слеша в конце
  path:= ExtractFileDir(Application.ExeName);
  path:= ExtractFileDir(ParamStr(0));
end;

При чем здесь гиперссылки?