Форум: "Потрепаться";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];
ВнизPHP + Delphi Найти похожие ветки
← →
swordent (2003-05-27 10:04) [0]Интересно, есть ли в этом форуме люди, которые бы занимались программированием как на Delphi, так и на php. вот. Хотел бы с такими пообщаться....
← →
savva (2003-05-27 10:05) [1]что конкретно интересует?
← →
Style (2003-05-27 10:11) [2]На Delphi уже пишу лет 5-6 c перерывом на Армию.
Недавно начал осваивать PHP, в принципе ничего сложного так как я начинал с невизуального Borland Cpp 4.5 версии и позже C-Buildera..
← →
McSimm (2003-05-27 10:18) [3]Давай пообщаемся. О чем?
← →
Dimka Maslov (2003-05-27 11:34) [4]Их есть тут
← →
savva (2003-05-27 11:42) [5]такое впечатление что затевается очередная перепИсь..
Он нас считает (© какой-то мультик про зверушек:))
← →
pasha_golub (2003-05-27 11:42) [6]И я, вот, тоже...
← →
Style (2003-05-27 11:44) [7]Можеть на Ветку даже свою дадут :)
← →
swordent (2003-05-28 15:35) [8]Хе, дав просто писал я уже про это... есть у меня один скрипт на PHP, вот хотелось бы сделать его на Delphi. Может-быть кто-то поможет с этим?
Скрипт:
<?PHP
$qw=chr(32);
$fp = fsockopen ("udp://".$rip,$rp, $errno, $errstr, 30);
if (!$fp) {
echo "Ошибочка вышла: $errno - $errstr<br>\n";
} else {
fwrite($fp,"\377\377\377\377details".chr(10));
$st=fread($fp,1);
$r=socket_get_status($fp);
$r=$r["unread_bytes"];
$st.=fread($fp,$r);
fclose($fp);
$st=substr($st,5);
$address=SubStr($st,0,StrPos($st,chr(0)));
$address=str_replace(chr(0),"|",$address);
$st=SubStr($st,StrPos($st,chr(0))+1);
$name=SubStr($st,0,StrPos($st,chr(0)));
$st=SubStr($st,StrPos($st,chr(0))+1);
$map=SubStr($st,0,StrPos($st,chr(0)));
$st=SubStr($st,StrPos($st,chr(0))+1);
$st=SubStr($st,StrPos($st,chr(0))+1);
$st=SubStr($st,StrPos($st,chr(0))+1);
$current=ord(SubStr($st,0,1));
$max=ord(SubStr($st,1,1));
}
print "карта: $map";
print "Имя сервера: $name";
print "IP: $adress";
print "Игроков: $current/$max";
?>
← →
swordent (2003-05-28 15:38) [9]вот... ну соответственно вместо $rip адрес сервера (например 213.248.7.195), а вместо $rp порт (например 27015) вот. Буду надеяться на вашу помощь...
← →
swordent (2003-05-30 10:35) [10]НУ что, все сразу разбежались? :)
← →
McSimm (2003-05-30 10:49) [11]Дело в том, что PHP тут, собственно, не при чем.
А решить этот вопрос можно, например, с помощью TUDPClient из библиотеки INDY (входит в D6), см. пример в Demos\IndyDemos\UDPClientServer\UDPClient.dpr
(путь может отличатся, зависит от версии Indy)
← →
ДедушкаКо (2003-05-30 13:48) [12]все "пообщаться" свелось к "дай" :)
← →
swordent (2003-06-05 16:34) [13]ну дык, мою тему в вопросах постоянно перекидывали в просто общение, вот и создал я её тут....
З.Ы. А где взять Indy? :)
← →
Дремучий (2003-06-05 18:53) [14]ну, я вот немного програмлю...
http://deep.webm.ru/forum
А где взять Indy?
для пятого Делфи -- через поисковики можно глянуть
для шестого -- включено в стандартные пакеты
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.06.26;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.026 c