Flash von einer Website downloaden

[alanblack]

Hallo,

Also ich spiele im Internet unwahrscheinlich gerne flash spiele. Da ich aber nicht immer online sein möchte um diese Spiele zu spielen möchte ich sie mir downloaden.

Das bekomm ich auch hin nur muss ich immer im QT nachgucken. Daher möchte ich ein kleines Tool schreiben das mit Indy http.get() alle flash erkennt (*.swf) und sie automatisch downloadet. Also ohne zu wissen wie jezt die flash datei heißt. Das prog sollte auf der site einfach die *.swf auslesen und wenn vorhanden downloaden.

Wie bekomm ich das hin?

mfg alan

[Ratte]

Hi,

1. QT runterladen
2. String '.swf' suchen (matchesmask)
3. Pfad extrahieren (entwerder bis zum letzten leerzeichen oder ") (matchesmask)
4. evt. aus reativem Pfad "echten" machen
5. 'runterladen

Ratte

[alanblack]

Hi,

danke für die Antwort. Also ich lasse nun den HTML code in einem memo laden.

Aber Punkt 2 - 3 verstehe ich nicht soganz (bzw weiß nich wie ich das verwirklichen sollte)

kannst du mir da ein bisschen helfen?

mfg alan

[NicNacMan]

probier mal das:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  i, j: Integer;
  s   : String;
begin
  // alle zeilen löschen, in denen kein '.swf' vorkommt:
  for i := Pred(Memo1.Lines.Count) downto 0 do
    if (Pos('.swf', Memo1.Lines.Strings[i]) = 0) then
      Memo1.Lines.Delete(i);
  // url extrahieren:
  for i := 0 to Pred(Memo1.Lines.Count) do
    begin
      s := Memo1.Lines.Strings[i];
      // alles nach '.swf' löschen
      Delete(s, Pos('.swf', s) + 4, Length(s));
      for j := Length(s) downto 0 do
        if (s[j] = '"') then
          Break;
      // alles vor dem letzten '"' löschen (voraussetzung: url steht in '"')
      Delete(s, 1, j);
      Memo1.Lines.Strings[i] := s;
    end;
end;

[Tortus]

Lass das Spiel doch einfach einmal im Browser laden und zieh dir dann einmal alle *.swf's aus den Temporary Internet Files

[Die Muhkuh]

Ist das nicht ein bisschen illegal die Dinger downloaden? Kein Copyright oder so drauf?

[NicNacMan]

ich glaub es ist nur illegal, sie danch auf die eigene hp zu packen, oder

man kann ja den quelltext auch nach email adressen durchsuchen,
und dann automatisch ne email mit "danke für das game" an den autor senden

[MrKnogge]

Er hat ja nicht geschrieben, dass er sie auf seine HP packen möchte, aber den Author sollte man eventuell doch fragen.

Es könnt ja sein, dass er als "gegenleistung" für seine Spiele möglichst viele klicks auf seiner Hompage haben möchte. (wegen Werbung z.B.)

Wobei dies dann aber schon wieder etwas vom Thema abgeht

[Ratte]

Hi,

bei dem beispiel von NicNacMan könntest du auch nach einem '=' suchen und wenn dahinter ein '"' steht, dieses löschen.

Ratte

[alanblack]

Hi,

Danke für die vielen Antworten. Also um dies mal klarzustellen: Ich möchte die Flash Games NICHT auf meiner Homepage oder jegliche Art öffentlich weiterzuverbreiten, Nein ich möchte die Spiele einfach lokal spielen ..

mfg alan