用Delphi实现WinSocket高级应用 默认分类   2009-12-19 16:48   阅读6   评论0   字号: 大大  中中  小小 Socket通信在Windows 中是排队的形式由操作系统处理,而且接收方和发送方相互协同工作,否则就会造成数据丢失.因此,不能用类似于for 语句的循环来实现对多组数据的发送,更不能用循环语句来接收数据.比如,你可以用for 语句来实型若干文件的复制,这很普遍也很正常,但在 Socket编程以及大多数网络应用编程中都是行不通的,因为网络通信的基…

delphi编写winsocket的流程 1.在窗体创建的时候启用动态连接库(引用winsock)    var  aWSAData:TWSAData;    if WSAStartup($0101,aWSAData)<>0 then  begin    MessageBox(Handle,'不能启动winsock动态链接库!','错误',MB_OK);    Exit;  end; 2.然后启动监听线程  Lthread:=TListenthread.CreateIt(9002); 3.线程…

用法一 Type TProc=procedure() of object; procedure Callback(proc:TProc); begin ... end; procedure myproc() begin ... end; Callback(myproc); 用法二 type TProc= reference to Procedure(); procedure Callback(proc:TProc); begin .... end; Callback( procedure()be…

Delphi TFindDialog TReplaceDialog对话框的使用 下载地址1: http://download.csdn.net/detail/teststudio/6408383   下面这段代码已经完全的解决Memo的查找对话框 和 替换对话框 功能 的所有功能   查找对话框部件 查找对话框部件为应用程序提供查找对话框,用户可使用查找对话框在文本文件中查找字符串. 可用Execult方法显示查找对话框,如图4.8.应用程序要查找的字符放到FindText属性中.Options…

在之前的博文中,我提到新的存根生成器框架具有生成Delphi客户端存根所需的功能,使得开发Delphi智能客户端非常容易,完全支持编译时的类型检查和IDE类/属性帮助. 我没想到会把它包含在即将发布的kbmMW版本中,但我无法自控.... 必须添加它才能生成相当完整的初始存根生成器. 存根生成器将生成普通的Delphi代码,需要kbmMW智能客户端功能进行编译.但代码已完成,并包含所需的所有单元引用.如果您使用的是包含对象的自定义单元,则必须将这些单元与生成的存根代码一起提供给Delphi客户端…

一.什么是RAW文件?RAW文件主要是一种记录了数码相机传感器的原始信息,同时伴随着一些由相机所产生的一些元数据(metadata,诸如IS0的设置.快门速度.光圈值.白平衡等)的文件.不同的相机制造商会采用各种不同的编码方式来记录raw数据,进行不同方式的压缩,个别还甚至对raw数据进行加密.所以,不同的制造商对各自的raw文件采用不同的文件扩展名,如Canon的.CRW.Minolta的.MRW,Nikon的.NEF,Olympus的.ORF等,不过其原理和所提供的作用功能都是大同小异的.…

ADO是Microsoft存取通用数据源的标准引擎.ADO通过封装OLE DB而能够存取不同类型的数据,让应用程序能很方便地通过统一的接口处理各种数据库.ADO由一组COM对象组成,每一个不同的原生ADO对象负责不同的工作.下面,向大家介绍如何使用原生ADO对象的动态属性来实现ADO的高级功能. ADO原生对象关系图: Connection Errors→Error Command→Parameters→Parameter RecordSet→Fields→Field 一.存取原生ADO对象 D…

原文:Delphi 基本数据类型列表 高级数据类型列表 字符类型查询列表清单 长长的列表文字类型文件 分类 范围 字节 备注 简单类型 序数 整数 Integer -2147483648 .. 2147483647 4 有符号32位 Cardinal 0 .. 4294967295 4 无符号32位 Shortint -128 .. 127 1 有符号8位 Smallint -32768 .. 32767 2 有符号16位 Longint -2147483648 .. 2147483647 4…

转帖于https://lfzhs.iteye.com/blog/980200 按名字调用方法似乎一直以来都是大家比较关注的技术,在论坛上有一个经典的答复: type TProcedure = procedure(Test: string) of object; procedure ExecuteRoutine(Obj: TObject; Name, Param: string); var PMethod: TMethod; AProcedure: TProcedure; begin PMetho…

unit InsertRichEditUnit;interfaceuses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  StdCtrls, RichEdit, UHISRichEd;type  TEditStreamCallBack = function(dwCookie: Longint; pbBuff: PByte; cb: Longint;    var pcb: Longint):…