代码搜索:TCustomWinSocket
找到约 412 项符合「TCustomWinSocket」的源代码
代码结果 412
www.eeworm.com/read/212165/15165217
pas httpproxy.pas
{
Http proxy
Created By LLJ 2003-05-07
代理服务器工作:
1、客户机 Socket 连接上: 在连接链中增加一个连接纪录(TSessionRec)节点。
2、客户端发送连接请求数据: 根据请求数据取得客户端要连接的目标主机的地址
和端口,并连接目标主
www.eeworm.com/read/207469/15270700
~pas mainfrm.~pas
unit MainFrm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ScktComp, ComCtrls;
type
TfrmMain = class(TForm)
www.eeworm.com/read/207469/15270704
pas mainfrm.pas
unit MainFrm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ScktComp, ComCtrls;
type
TfrmMain = class(TForm)
www.eeworm.com/read/207469/15270710
~pas mainfrm.~pas
unit MainFrm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ScktComp, StdCtrls;
type
TfrmMain = class(TForm)
Label1: TL
www.eeworm.com/read/207469/15270715
pas mainfrm.pas
unit MainFrm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ScktComp, StdCtrls;
type
TfrmMain = class(TForm)
Label1: TL
www.eeworm.com/read/167265/5461794
pas unit2.pas
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
JPEG,Dialogs, StdCtrls, ExtCtrls, ComCtrls, Buttons, ScktComp;
type
TForm2 = cla
www.eeworm.com/read/475606/6774196
txt 综合实例——使用socket的“网上对话”程序.txt
Unit Uclient_Chat;
{该程序采用异步非阻塞方式工作,使用1024端口,在客户程序与服务程序之间实现信息交换。它既可独立在同一台机器上运行,也可在两台机器上运行,即一台作为服务器,另一台作为客户机。}
interface
uses
//定义使用系统的单元文件
Windows, Messages, SysUtils, Variants, Cl
www.eeworm.com/read/394242/8240791
pas unit1.pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ScktComp;
type
TForm1 = class(TForm)
ServerSocket1: TSer
www.eeworm.com/read/394242/8240811
~pas unit1.~pas
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ScktComp;
type
TForm1 = class(TForm)
ServerSocket1: TSer
www.eeworm.com/read/336165/12468567
pas clientform.pas
unit ClientForm;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ScktComp, ExtCtrls;
type
TCliStatus = (csIdle, csList, csBitmap, c