delphi socket call php socket 例子，可根据需要扩展写成聊天室、网站助理类似淘宝助理，有订单提醒。
<?php
//确保在连接客户端时不会超时
set_time_limit(0);
$port = 10081 ;
$ip = '192.168.1.102';
// create a streaming socket, of type TCP/IP
$sock = socket_create ( AF_INET , SOCK_STREAM , SOL_TCP );
// set the option to reuse the port
socket_set_option ( $sock , SOL_SOCKET , SO_REUSEADDR , 1 );
// "bind" the socket to the address to "localhost", on port $port
// so this means that all connections on this port are now our resposibility to send/recv data, disconnect, etc..
socket_bind ( $sock , $ip , $port );
// start listen for connections
socket_listen ( $sock );
// create a list of all the clients that will be connected to us..
// add the listening socket to this list
$clients = array( $sock );
while ( true ) {
// create a copy, so $clients doesn't get modified by socket_select()
$read = $clients ;
// get a list of all the clients that have data to be read from
// if there are no clients with data, go to next iteration
if ( socket_select ( $read , $write = NULL , $except = NULL , 0 ) < 1 )
continue;
// check if there is a client trying to connect
if ( in_array ( $sock , $read )) {
// accept the client, and add him to the $clients array
$clients [] = $newsock = socket_accept ( $sock );
// send the client a welcome message
socket_write ( $newsock , "这是一个delphi(客户端) socket 与 PHP_socket(服务器） 通信的例子 测试，交流QQ：410578660。 but ill make an exception :)\n" .
"There are " .( count ( $clients ) - 1 ). " client(s) connected to the server\n" );
socket_getpeername ( $newsock , $ip );
echo "New client connected: { $ip } \n" ;
// remove the listening socket from the clients-with-data array
$key = array_search ( $sock , $read );
unset( $read [ $key ]);
}
// loop through all the clients that have data to read from
foreach ( $read as $read_sock ) {
// read until newline or 1024 bytes
// socket_read while show errors when the client is disconnected, so silence the error messages
$data = @ socket_read ( $read_sock , 1024 , PHP_NORMAL_READ );
// check if the client is disconnected
if ( $data === false ) {
// remove client for $clients array
$key = array_search ( $read_sock , $clients );
unset( $clients [ $key ]);
echo "client disconnected.\n" ;
// continue to the next client to read from, if any
continue;
}
什么是 Silverlight？
Silverlight 允许您创建具有以下功能的最先进的应用程序：
它是一种跨浏览器、跨平台的技术。它在所有常见的 Web 浏览器中运行，包括 Microsoft Internet Explorer、Mozilla Firefox 和 Apple Safari，并在 Microsoft Windows 和 Apple Mac OS X 上运行。
它由可在数秒内安装的很小的下载程序支持。
它对视频和音频进行流处理。它将视频品质调整到适合各种环境：从移动设备到桌面浏览器以及 720p HDTV 视频模式。
它包括用户可以直接在浏览器中操作（拖动、旋转和缩放）的足够清晰的图形。
它读取数据并更新显示内容，但是不通过刷新整个页面来打断用户。
