TClientSocket
-
hi,
wie kann ich mittels der TClientSocket komponente die beim builder standardmässig dabei ist, einen inhalt einer URL bzw. datei anfordern? also "Get" von z.B. http://www.domain.com/datei.txt
-
Entweder implementierst du das HTT-Protokoll ( http://www.rfc.net/rfc2068.html ) (würd ich für das Abrufen von kleinen Textfiles oder so empfehlen) oder du nimmst eine HTTP-Komponente z.B. aus dem Indy-Package (such mal im Forum zu Indy da kommt bestimmt der download-Link dazu raus)
-junix
-
die indy komponente ist zu empfehlen *anmerk*
-
danke für den tipp..
habe nun also TidHTTP genommen und da taucht auch schon das erste problem auf. ich sehe kein passendes event um an den empfangenen source zu kommen. also wie "OnRead" meine ich
also ich hole mir mit Get den inhalt, blos, wo ist er jetzt?
-
Vielleicht solltest du dir die Indy-Dokumentation auch mal anschauen... Es gibt da so ne nette Funktion die nennt sich DoRequest...
-junix
-
da werd ich nicht schlau draus...
das ist mir jetzt zu stressig, TIdHTTPMethod
.. naja gibts ne andere freeware kompnente wo ich Get verwenden kann?
-
Hast du überhaupt angeschaut was hinter diesem Typ steht? Nichts weiter als ein typedef mit einem enum.
du solltest also nix weiter als z.B. hmHead oder so angeben können. (Klick doch auch auf die links in der Hilfe wenn sie dir schon angeboten werden)
-junix
-
ach..
ok thx.
blos ich erhalte da nun nur eine "0" hm.void __fastcall TForm1::Button1Click(TObject *Sender) { http->Get("http://www.url.com/sw.htm"); } //--------------------------------------------------------------------------- void __fastcall TForm1::httpWorkEnd(TObject *Sender, TWorkMode AWorkMode) { Memo1->Text = hmHead; }
-
mal so nebenbei ...
-> IdHTTP1->Get(AnsiString Url); gibt eigentlich alles zurück also bitte keine probleme machen wo keine sind
-
Original erstellt von ACID:
**ach.. ok thx.
blos ich erhalte da nun nur eine "0" hm.void __fastcall TForm1::Button1Click(TObject *Sender) { http->Get("http://www.url.com/sw.htm"); } //--------------------------------------------------------------------------- void __fastcall TForm1::httpWorkEnd(TObject *Sender, TWorkMode AWorkMode) { Memo1->Text = hmHead; }**
wenn du daraus das machst :
void __fastcall TForm1::Button1Click(TObject *Sender) { Memo1->Text = http->Get("http://www.url.com/sw.htm"); }[/QB][/QUOTE]
-
Danke