проблемка с процедурой
delphi_ © (2007-04-09 19:17:00)
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:00) [1]
вопрос закрыт.create забыль
Наверх 
ЧАТ |
Орешник |
|
