Delphi的Socket编程要分几步？
Delphi的Socket编程要分几步？
2008-12-20 02:03:24
标签：Delphi Socket 编程 [推送到技术圈]
ClientSocket 和ServerSocket
几个重要的属性:
1.client和server都有port属性，需要一致才能互相通信
2.client有Address属性,使用时填写对方(server)的IP地址
几个重要的事件:
client: OnRead事件，当client受到冲击消息时在OnRead事件中可以获得server发送过来消息。
Server: OnClientRead事件，与上述client的作用相同
发送信息：
clien使用SocketClient1.Socket.SendBuf(char类型的数组,信息长度);
server使用SocketServer1.Socket.Connection[0].SendBuf(char类型的数组,信息长度);
接收信息
clien使用SocketClient1.Socket.ReceiveBuf(char类型的数组,信息长度);
server使用SocketServer1.Socket.Connection[0].ReceiveBuf(char类型的数组,信息长度);
使用sockets
Socket 控件让你建立一个利用TCP/IP和有关的协议与其他系统进行通信的应用。使用Sockets，你能够读和写通过它连接的其他机器，而不用担心实际的网络软件的相关细节。Sockets提供基于TCP/IP协议的连接。除此以外还能很好的工作，在其他相关的协议。
Delphi 提供你写网络服务器或客户应用程序去读和写其他的系统。一个服务或客户程序通常专注于一个单一的服务如超文本传送协议（HTTP)或文件传输协议 (FTP)。使用server sockets,一个应用程序可以提供这些服务中的一个去连接一个希望使用服务的客户程序。Client sockets允许一个应用使用这些服务中的一个去连接提供这个服务的服务应�
相关文档：
如今RealPlayer的流式媒体文件以其强大的视频压缩比正逐步悄然兴起。RealPlayer Plus播放器也理所当然地成为大家播放RealPlayer格式文件的首选软件。不过RealPlayer Plus也不是十全十美的，比如启动时间慢，占用空间大，留有历史记录等等。其实我们可以利用Delphi打造一个完全符合自己要求的RealPlayer� ......
unit MyADO;
interface
uses
SysUtils, Classes,ADODB,DB,Variants,StdCtrls,Dialogs;
type
TMyADO = class(TComponent)
private
Connection: TADOConnection;
Query: TADOQuery;
Table: TADOTable;
FConnectio ......
delphi调用选择目录对话框
经常见网上有人问选择目录对话框的控件，其实只用一个函数就可以实现。
注意引用 Filectrl 单元
use Filectrl;
procedure TForm1.Button1Click(Sender: TObject);
var
Dir: String;
begin
SelectDirectory('Select a directory', '', Dir);
ShowMessage(Dir);
end; ......
1>向指定的区域或形状添加超链接。
语法
表达式.Add(Anchor, Address, SubAddress, ScreenTip, TextToDisplay)
表达式 一个代表 Hyperlinks 对象的变量。
参数
名称必选/可选数据类型描述
Anchor
必选
Object
超链接的位置。可为 Range 或 Shape 对象。
Address
必选
String
超链接的地� ......
var
ExcelFile:string;
SourceRange,DesRange:Variant;
Row,Column,i:integer;
begin
if OpenDialog1.Execute then
begin
ExcelFile:=OpenDialog1.Files[0];
if not FileExists(ExcelFile) then Exit;
end
else
Exit;
try
ExcelApp:=CreateOleObject('Excel.Application');
......
