Inhalt einer PHP site in eine Paradox Datenbank importieren

[Exciter]

Moin !

Ich habe eine Paradox Datenbank erstellt und möchte den Inhalt einer PHP Website http://www.napigator.com/servers.php...ient=napigator dort hin importieren. Gibt's da eine Möglichkeit ?

[theomega]

nur mal schnell ohne code:
1. Datei mit den Indy-Komops runterladen
2. In ein Memo laden / in eine Stringlist laden
3. Mit pos() und delete() die bestimmten Teile rausscheiden
4. Teile in die Paradox-Datenbank einfügen

[Exciter]

Hi,
Thx für die Antwort. Aber gibt's keine leichtere Lösung ? Ich habe Delphi erst seit 2 Wochen und beherrsche es noch nicht wirklich. Ich habe zB fürs Memo LoadFromFile versucht, aber das funzt nicht. Den Inhalt der Site hab ich vorher schon mit IdHTTP runtergeladen.

[MrSpock]

Hallo Exciter,

du kannst in Paradox ein Memo oder FormatiertesMemo als Feldtyp definieren. Dort kannst du dann noch ohne Pos() und Delete() den ganzen Text reinpacken. Wo ist das Problem mit LoadFromFile? Welche Fehlermeldung kommt?
Ein Memo Feld ist ein TBlobField, welches direkt die Methode LoadFromFile kennt. Wenn du also den Text in einer Datei hast, kannst du ihn direkt in das Feld der Datenbank laden, vorausgesetzt, du hast mit Insert oder Append einen neuen Datensatz erzeugt.

[Exciter]

Moin !

Ok, ich hab es nun geschafft, die Textzeilen einzeln als String zu laden und diese dann in einem Memo anzeigen zu lassen.

Delphi-Quellcode:

Var
  Serverliste: textfile;
  Line: string;
  Zielstream: TMemorystream;
begin
  Zielstream := TMemorystream.Create;
  IdHttp1.Get('http://www.napigator.com/servers.php?version=208&client=napigator',Zielstream);
  Zielstream.SaveToFile('C:\Test\Napigatorlist');
  Assignfile(Serverliste,'C:\Test\Napigatorlist');         
  Reset(Serverliste);                                        
Repeat
  Readln(Serverliste,Line);                                
  Memo1.Lines.Append(Line);                     
Until EOF(Serverliste);                                    
  CloseFile(Serverliste);
end;

Nun sind mir 2 Dinge aber noch nicht klar:
1. Wie kann ich die Strings in TBlobFields darstellen ?
2. Wie kann ich die einzelnen Strings (die ja aus Servername, IP Adresse, Port, usw bestehen) auseinandernehmen und dann getrennt in TBlobFields darstellen ?