Как открыть в Delphi фаил из интернета

Тема в разделе "Delphi - Сети", создана пользователем buts, 20 авг 2004.

Статус темы:
Закрыта.
  1. buts

    buts Гость

    Товарищи програмисты, как открыть фаил из интернета:?:
    Если я пишу memo1.lines.loadfromfile('http:\\www.mail.ru)
    то он пишет что немогу найти фаил "C:\....\projects\http:\\www.mail.ru"

    Как открыть фаил из интернета?
    Mail.ru я взял для примера
     
  2. zubr

    zubr Гость

    buts

    Для того, чтобы у тебя получилось memo1.lines.loadfromfile('http:\\www.mail.ru), надо чтобы твой компьютер был в сетевом окружении сервера с которого ты хочешь открыть файл. Если тебе надо только просмотр файла можешь взять компонент TWebBrowser:
    Код (Text):
    procedure TForm1.Button1Click(Sender: TObject);
    begin
    WebBrowser1.Navigate('http:\\www.mail.ru');
    end;
    Другой вариант - использовать компонент FTP, скачивать файл на локальный компьютер.
     
  3. Barmutik

    Barmutik Гость

    Да и "http://www.mail.ru".. это не файл а УРЛ ...

    Код (Text):
    var
     FileStrm: TFileStream;
    begin
     DeleteFile('X:\XXX.txt');
     FileStrm := TFileStream.Create('X:\XXX.txt', fmCreate);
     try
       IdHTTP1.Get('http://www.somesite.com/XXX.txt', FileStrm);
     finally;
      FileStrm.Free;
     end;
     memo1.lines.loadfromfile('X:\XXX.txt')
    end;
    Ну в первом приближении можно использовать чего-нибудь типа такое ...
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей