unit uFrmSplash;interfaceuses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, ComCtrls, jpeg, ExtCtrls, StdCtrls, IdBaseComponent,  IdComponent, IdTCPConnecti

<br />标准的Socket的应用程序框架如下：<br />Server方： Socket()[ 新建一个Socket]－－Bind()[ 同服务器地址邦定 ]－－Listen() －－Accept()－－block wait－－read()[接受消息，在windows平台中，方法为send(TCP),或者是sendto(UDP)]－－处理服务请求－－Write()[发送消息，在windows平台中，方法为send(TCP), 或者为sendto(UDP)。<br />Client方相对简单：Socket

<br />//先贴几个实用函数<br /><br />//16 进制 转 整形，这个在消息解码的时候经常要用到<br /><br />Function HexToInt(sTemp : String) : Integer ;<br />Var<br />V, i : Integer ;<br />Begin<br />HexToInt := 0 ;<br />If sTemp = '' Then Exit ;<br />If (sTemp[1]='0') And ((sTemp[2]='x') Or (s

<br />Delphi中Socket的操作方式<br />Delphi分別使用TClientSocket元件和TServerSocket元件來操縱用戶端 Socket和伺服器段Socket的連接和通信。根據連接發起的方式以及本地 Socket要連接的目標，Socket之間的連接可以分為：用戶端連接、監聽連接以及伺服器端連接。<br />(1)所謂用戶端連接，是指由用戶端的 Socket提出連接請求，要連接的目標是伺服器端的Socket。為此，用戶端的Socket首先要描述它要連接的伺服器端Socket，主

<br />发送结构体：<br />TMyData = record<br />      id:Integer;<br />      Name:Array[0..20] of Char;<br />      Sex:Array[0..10] of Char;<br />      Age:Byte;<br />      Address:Array[0..256] of Char;<br />      UpdateTime:double;<br />  end;<br />//发送结构体：<br /

 SOCKET：Socket接口介于应用程序与硬件之间。对Socket的理解可以简化为：它是封装了数据流（Stream）的从机器到机器的一条软接线，通过这条软接线，并借助于线两端的收发程序，网络上的机器间实现了信息的交流与互通。分离在软线两端的应用程序（服务器端程序和客户端程序）可以通过调用Socket接口来开发具有TCP/IP网络功能的程序应用。作为客户端，即要知道服务程序所在房间的

針對INDY9版本// 使用完的線程歸還線程池procedure TIdThreadMgrPool.ReleaseThread(AThread: TIdThread);var  LThreadPool: TList;begin  ActiveThreads.Remove(AThread);  LThreadPool := FThreadPool.LockList; 

1、创建工程，在窗体中加入IdSMTP1、IdMessage1和IdPOP31（Indy控件标签组）控件各一个。       2、设置    IdSMTP1.Host := SMTP.163.com;(我用的是163检试，具体也可选择其它服务器)    IdSMTP1.Username := caoyan528;(此处即表示邮箱的帐号名，例如邮箱为：aaaaaa@163.com,则

  源码：unit ServiceMainU;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,  IdBaseComponent, IdComponent, IdTCPServer, IdFTPServer, Registry, forms,  IdUserAcco

program FTPServer_console;(*Sample of the usage of the TIdFtpServer component.Also shows how to use Indy in console appsCreated by: Bas Gooijen (bas_gooijen@yahoo.com)Disclaimer:  Use it at your own

<br />Delphi6中的TServerSocket在线程阻塞模式(TThreadBlocking)下，OnRead/OnWrite事件的是在主线程中执行的，虽为多线程，实际效率不高。<br />故我们若需要利用TServerSocket来开发真正多线程的服务器，则需要写TServerClientThread的子类，在这个子类中，自行处理数据的接收与发送，而重写的的重点在ClientExecute方法。下面为代码描述了这种编程思路。<br /><br /><br />type<br />  TServe