Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ICQ Status in einem Programm anzeigen... (https://www.delphipraxis.net/89319-icq-status-einem-programm-anzeigen.html)

ghost1601 29. Mär 2007 14:46


ICQ Status in einem Programm anzeigen...
 
Vor kurzem hatte ich die Idee mir ein Programm zu erstellen womit ich sehen kann ob jemand im ICQ online ist - ICQ ist ein Messenger, für die, die es nicht wissen^^ - nun weiß ich jedoch nicht, wie ich eine Statusanzeige, wie diese hier: http://status.icq.com/online.gif?icq=296441525&img=21 in einem Programm einbinden kann.
Es soll de facto mit dem Programm auf das Internet zugegriffen werden um die jeweilige online-Anzeige sehen zu können.
Hat jemand eine Idee oder eine Datenstruktur mit der man sowas realisieren kann?
Thx

Valle 29. Mär 2007 14:58

Re: ICQ Status in einem Programm anzeigen...
 
Ich hab das hier bei Google gefunden, wenn du damit nichts anfangen kannst, kannich (oder vielleicht auch jemand anderes) ja mal versuchen es für dich zu übersetzen.

Code:
<?php
$icq = "331715700";

$fp = fsockopen ("status.icq.com", 80, &$errno, &$errstr, 30) or die("[ERROR - Could not connect to server (status.icq.com)]");
fputs($fp, "GET /online.gif?icq=$icq&img=5&online= HTTP/1.0\n\n");

while(!feof($fp) && !$icq_finished) {
    $line = fgets ($fp,128);
    if (substr($line,0,9) == 'Location:') {
        if (substr($line,13,11) == 'online1.gif') { // online
            $online = "1";
            $icq_finished = true;

        } else { 

            $online = "0";
            $icq_finished = true;
   }
     }
    }
         fclose($fp);
         
if($online == "1") { 
    echo("Online");
} elseif($online=="0") { 
    echo("Offffffline");
} else { 
    echo("da stimmt was nicht");
}

?>
MfG,

Valle

ghost1601 29. Mär 2007 15:04

Re: ICQ Status in einem Programm anzeigen...
 
wie man bereits im oberen Teil deines Quelltextes sehen kann, ist dies ein PHP Script...wäre mir das Allerneuste, wenn man in einem Delphiprogramm einen PHP Code eingeben kann :roll:

Valle 29. Mär 2007 15:05

Re: ICQ Status in einem Programm anzeigen...
 
Zitat:

Zitat von Valle
ja mal versuchen es für dich zu übersetzen.

Wer lesen kann ist klar im Vorteil :roll:

MfG,

Valle

pacman1986 29. Mär 2007 15:25

Re: ICQ Status in einem Programm anzeigen...
 
guckst du

wurde schon ein paar mal besprochen ^^


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:21 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz