Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Вниз

проблемка с процедурой   Найти похожие ветки 

← →
delphi_ ©   (2007-04-09 19:17) [0]

procedure DownloadFile();
const
URL = "http://127.0.0.1/ini.ini";
var
path:string;
Stream: TMemoryStream;
idHTTP1:tidhttp;
begin
path:=ExtractFilePath(Application.exename)+"/tmp/"+"ini.ini";;
 Stream:= TMemoryStream.Create;
  idHTTP1.Get(URL,Stream);
    Stream.SaveToFile(path);
   Stream.Free;
end;
при этом Warning -Variable "idHTTP1" might not be initialized-не понимаю почему,в var оно есть
далее
если сию процедуру вставить в любую другую например

procedure TForm1.Button1Click(Sender: TObject);
begin
DownloadFile();
end;

то вылетает ошибка Access Violation.Если же первую процедуру обозвать например TForm1.Button1Click и далее сам код с idhttp -то все ОК.Почему?

---

← →
delphi_ ©   (2007-04-09 19:38) [1]

вопрос закрыт.create забыль

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.06 c