Einzelnen Beitrag anzeigen

Premaider

Registriert seit: 31. Mär 2012
160 Beiträge
 
#13

AW: Indy idHTTP - Downloadprozess - Wert für IOHandler ist ungültig

  Alt 9. Mai 2012, 20:15
Ich habe es geahnt und habe das ganze Projekt schon mal gepackt.
Danke dafür. Aber wenn ich mit deinem Programm etwas herunterlade kommt der selbe Fehler wie bei mir Oo

Also bei mir sieht es inzwischen so aus:
Delphi-Quellcode:
procedure TForm1.Download(Url, Filename: AnsiString);
var
  FileStream: TFileStream;
begin
  try
      IdHTTP1.Get(Url, FileStream);
    except
      on E: Exception do
        Exception.Create('Fehler beim Runterladen!' + #13#10 + E.Message);
    end;
FileStream.Free;
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  Pfad: String;
  Name1: String;
  Name2: String;
  Ziel1: String;
  Ziel2: String;
begin
Button1.Caption:='Installing...';
Pfad := IncludeTrailingPathDelimiter(UserAppData) + '\.minecraft\texturepacks\';
Name1 :='Premaidercraft '+Memo3.Lines[0]+'.zip';
Name2 :='mcpatcher-'+Memo3.Lines[1]+'.exe';
Ziel1 := Pfad + Name1;
Ziel2 := Pfad + Name2;
try
     Download(Memo2.Lines[0], Ziel1);
     Download(Memo2.Lines[1], Ziel2);
    except
     on E: Exception do
       Button1.Caption:='Error while downloading';
    end;
If CheckBox1.checked=true Then ShellExecute(Application.Handle,'open',PChar(Pfad + Memo3.Lines[0] + '.exe'),nil,PChar(Pfad),sw_ShowNormal);
Memo1.Lines[17]:='skin:Premaidercraft '+Memo3.lines[0]+'.zip';
Memo1.Lines.SaveToFile(UserAppData + '\.minecraft\options.txt');

end;
Ich bekomme bei idHTTP.get eine "Zugriffsverletzung"

Geändert von Premaider ( 9. Mai 2012 um 20:22 Uhr)
  Mit Zitat antworten Zitat