Проблема после обновления

[Fahman]

Всем доброго времени суток, тут проблема не могу понять почему, короче сделал я авто обновление программы своей, вроде все качает и сохраняет но почему мой .exe не открывается? выдает ошибку!!

вот кусочек кода который я использую....

procedure TForm3.IdHTTP2Work(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCount: Integer);
begin
ProgressBar1.Position := AWorkCount;
end;

procedure TForm3.IdHTTP2WorkBegin(Sender: TObject; AWorkMode: TWorkMode;
  const AWorkCountMax: Integer);
begin
ProgressBar1.Position := 0;
ProgressBar1.Max := AWorkcountMax;
end;

procedure TForm3.IdHTTP2WorkEnd(Sender: TObject; AWorkMode: TWorkMode);
begin
ShowMessage('Загрузка окончена.');
form3.Close;
form1.close;
end;

procedure TForm3.Button1Click(Sender: TObject);
var FileStream :TFileStream;
begin
 FileStream := TFileStream.Create('Чат.exe', fmCreate);   //Имя файла под которым он будет сохранен.
 IdHTTP2.Get(edit1.Text);     //Ссылка для загрузки.
 FileStream.Free;
  end;
end.

ссылка для загрузки, она может быть разной чтоб скачать я делаю запрос который записан в txt файле на FTP

И вопрос не в тему конечно но, как можно удалить старую версию программы? ну например после того как юзер скачает новую версию надо чтоб новая версия заменила старую...

[Человек_Борща]

что-то не вижу что ты куда-то этот поток сохраняешь.

[Fahman]

Сообщение от Человек_Борща

что-то не вижу что ты куда-то этот поток сохраняешь.

не пойму

Я нашел в сети интенет этот исходник))

[alextrof94]

Проверь способ передачи. Если тебе кажется, что все верно передает еще раз просмотри в каком режиме передаешь/получаешь.

[phomm]

В индюках не шарю, но http://docwiki.embarcadero.com/Libra...CustomHTTP.Get
следовательно

IdHTTP2.Get(edit1.Text, FileStream);

А без параметра потока, гет - это функция, которая возвращает текст, а Вы этот текст даже никуда не запоминаете.

[Fahman]

Сообщение от phomm

В индюках не шарю, но http://docwiki.embarcadero.com/Libra...CustomHTTP.Get
следовательно

IdHTTP2.Get(edit1.Text, FileStream);

А без параметра потока, гет - это функция, которая возвращает текст, а Вы этот текст даже никуда не запоминаете.

Спасиб, помогли...

[phomm]

Просто пользуйтесь справкой и контекстной подсказкой по Ctrl+Пробел и подсказкой по параметрам подпрограмм по Ctrl+Shift+Пробел - много вопросов отпадёт.