URL veraendern?

[Cyberbob]

Ich hab es so verstanden!

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
   i : Integer;
begin
  for i := 0 to Memo1.Lines.Count-1 do
  begin
    XMLDocument1.FileName:=('http://url.com/datei.php?text=' + memo1.Lines.Strings[i]);
    XMLDocument1.Active:=true;
    Memo1.Lines.Add(XMLDocument1.DocumentElement.ChildNodes['result'].Text);
    XMLDocument1.Active:=false;
  end;
end;