Location:
Search - delphi override
Search list
Description: 开发环境:Delphi
简要说明:TGABase is a abstract class. You must Derivate a sub_class from it. You must override abstract function calculateFitness. By the way, this class can only get minimum solution
-development environment : Delphi Brief Description : TGABase is a abstract class. You must Derivate a sub_class from it. You must override abstract function calculateFitness. By the way, this class can only get minimum solution
Platform: |
Size: 2522 |
Author: 刘华 |
Hits:
Description: Interface for Microsoft Audio Compression Manager. - Delphi Source
The ACM uses existing driver interface hooks to override the default mapping algorithm for waveform audio devices. This allows the ACM to intercept device-open calls. After a call has been intercepted, the ACM can perform a variety of tasks to process the audio data, such as inserting an external compressor or decompressor into the sequence.
Platform: |
Size: 32984 |
Author: steb |
Hits:
Description: 开发环境:Delphi
简要说明:TGABase is a abstract class. You must Derivate a sub_class from it. You must override abstract function calculateFitness. By the way, this class can only get minimum solution
-development environment : Delphi Brief Description : TGABase is a abstract class. You must Derivate a sub_class from it. You must override abstract function calculateFitness. By the way, this class can only get minimum solution
Platform: |
Size: 2048 |
Author: 刘华 |
Hits:
Description: 这是一个自我感觉很好的通信程序，它的特点：
1.数据包格式全部自己定义。
所有的定义和通信核心类全部在COMM文件夹中。
2.能处理大量客户端同时通信的情况，客户和服务端共用相同的通信对象，并且可以实现互传。
3.通信细节全部封装在几个通用的类中，隐藏了交互通信的所有处理细节，如断包处理，超时重发等功能。
4.数据通信和数据具体应用完全分离，扩展性良好，本例中只做一个上传文件的例子，你可以在不用改动通信核心的情况下，可以实现远程控制所需的任何功能，并且不需要考虑通信细节。具体方法可以参考：CommSrvApps 单元的TSrvApp_File类，只需写一个新类即可:
TSrvApp_File = class(TServerAppObject)
public
function ProcessData(ABuf: PChar ASize: integer): integer override
end
通过以上类配合通信核心类，实现了远程实时传送一个文件就像copy那么简单。
其它：
此程序是我自己开发的连锁超市方案中数据交换的应用实例，所以客户端和服务端的代码有点多，但多是与通信本身无关，所实现的功能是将本地Local文件夹与远程Remote文件夹的.rs文件互相进行传送。
-this a good feeling of self-communication program, which features : 1. All data packet format own definition. All the definition and communication in all core categories COMM folder. 2. Can handle a large number of client communications in the same time, customer-service and sharing the same communications targets, and can interoperate Chuan. 3. Details of all communications package in a few general categories, interactive communications hidden handle all the details, such as broken packet processing, heavy overtime, among other functions. 4. Data communications and specific application data separation, scalability good, in this case they should only upload documents example, you can not change the core of communication, remote control can be achieved for any function, and need not cons
Platform: |
Size: 214016 |
Author: sr |
Hits:
Description: unit Video
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls,
ExtCtrls, avicap, mmsystem, dsgnintf
// Types for event-procedures
type
TCapStatusProc = procedure(Sender: TObject) of object
TCapStatusCallback = procedure(Sender: TObject nID: integer status: string)
of object
TVideoStream = procedure(sender: TObject lpVhdr: PVIDEOHDR) of object
TAudioStream = procedure(sender: TObject lpWHdr: PWAVEHDR) of object
// Property Editor for driver selection
type
TDrivereditor = class(TPropertyEditor)
function GetAttributes: TPropertyAttributes override
procedure GetValues(Proc: TGetStrProc) override
function GetValue: string override
procedure SetValue(const Value: string) override
end -unit Video interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls, ExtCtrls, avicap, mmsystem, dsgnintf// Types for event-procedurestype TCapStatusProc = procedure (Sender: TObject) of object TCapStatusCallback = procedure (Sender: TObject nID: integer status: string) of object TVideoStream = procedure (sender: TObject lpVhdr: PVIDEOHDR) of object TAudioStream = procedure (sender: TObject lpWHdr: PWAVEHDR) of object// Property Editor for driver selectiontype TDrivereditor = class (TPropertyEditor) function GetAttributes: TPropertyAttributes override procedure GetValues (Proc: TGetStrProc) override function GetValue: string override procedure SetValue (const Value: string) override end
Platform: |
Size: 54272 |
Author: 123456 |
Hits:
Description: Interface for Microsoft Audio Compression Manager. - Delphi Source
The ACM uses existing driver interface hooks to override the default mapping algorithm for waveform audio devices. This allows the ACM to intercept device-open calls. After a call has been intercepted, the ACM can perform a variety of tasks to process the audio data, such as inserting an external compressor or decompressor into the sequence.-Interface for Microsoft Audio Compression Manager.- Delphi Source
The ACM uses existing driver interface hooks to override the default mapping algorithm for waveform audio devices. This allows the ACM to intercept device-open calls. After a call has been intercepted, the ACM can perform a variety of tasks to process the audio data, such as inserting an external compressor or decompressor into the sequence.
Platform: |
Size: 32768 |
Author: steb |
Hits:
Description: TELNET 对远程主机进行TELNET.- CurrResult: String
CmdInfos: TStringList
CreateTime: TDateTime
//登陆
function LoginHost(AsHostIp:string AsHostPort:integer
AsUserId: string AsPassWord: string): string
//发送命令
function SendCmd(const AsCommond: String AsExpectVal: String=
AsExpectErr: String= ): string
constructor Create(AOwner: TComponent) override
destructor Destroy override
property OnRevStr: TIdTelnetDataAvailEvent read FOnRevStr write FOnRevStr
procedure IdTelnetDataAvailable(Sender: TIdTelnet const Buffer: String)
Platform: |
Size: 220160 |
Author: 陈笛 |
Hits:
Description: delphi中类的覆盖编程实例，演示了如何进行方法的覆盖，采用delphi 7开发-delphi programming examples covered in class, demonstrates how to approach the coverage, using delphi 7 development
Platform: |
Size: 3072 |
Author: shaohua |
Hits: