Ok alles klar, er nimmt jetzt die Nummer, danke Luckie
Jetzt ist es aber das Problem das er die Datei zwar erstellt (NUMMER + .html) aber ich bekomme folgenden Error:
HTTP/1.1 301 Moved Permanently
Mein Quelltext sieht so aus:
Delphi-Quellcode:
procedure TForm1.ListBox1Click(Sender: TObject);
var
i: integer;
se:
String;
FS:Tfilestream;
URL:
String;
begin
for i := ListBox1.Items.Count - 1
downto 0
do
if ListBox1.Selected[i]
then
begin
se := Listbox1.Items[i];
URL:='
http://wowhead.com/?npc=' + se;
FS:=Tfilestream.Create(se + '
.html',fmCreate);
IdHTTP1.Get(
URL,FS);
FS.Free;
ListBox1.Items.Delete(i);
end;
end;