[Alegun]

Интересная ситуация, это что ж, выходит обман пользователя - он думает что скачивает из сети, а в результате файл локальный оказывается, оригинально

Как вариант

Код:

var
i: integer;
begin
 for i := Length(Edit1.Text) downto 1 do
  if Edit1.Text[i] = '/' then
   begin
    ShellExecute(Handle, 'open',
    'C:\' + Copy(Edit1.Text, i+1, Length(Edit1.Text)),
     nil, nil, SW_SHOWNORMAL);
   Exit;
  end;
end;