基于阻塞Socket(Indy)的远程控制类库-TNetComman…

2008-04-09 04:24:53来源:互联网 阅读 ()

新老客户大回馈,云服务器低至5折

TNetImage

源代码

// uNetImge .pas 屏幕图像相关操作

{{

作者:蛐蛐

时间:2004.5.26

}

unit uNetImage;

interface

uses

Classes, Windows, Graphics, Forms, Jpeg, SysUtils,

IdTCPServer, IdTCPClient,uNetCommand;

type

TNetImage = class (TNetCommand)

public

Compress: Integer;

ImageStream: TMemoryStream;

ImageTime: string;

JpegImage: TJpegImage;

RemoteImageStream: TMemoryStream;

RemoteJpegImage: TJpegImage;

constructor Create;

destructor Destroy; override;

function ReadData(Client: TIdTCPClient): Boolean; override;

function ReadImage(Client: TIdTCPClient): Boolean;

// : 截取屏幕到Bitmap

{{

function SnapScreen.

BmpScreen 返回值

标签:

版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有

上一篇:大自然的BUG、人的BUG、软件的疑难杂症

下一篇:delphi部分学习笔记