
流
文章平均质量分 72
seagull327
若大的世界
展开
-
文件流
function StringToFile(mString: string; mFileName: TFileName): Boolean;{ 返回字符串保存到文件是否成功 }var vFileChar: file of Char; //通常是以行为单位,将依次写入每一行,而这里是字,则将依次写入每个字 I: Integer;begin{$I-} AssignFi原创 2011-06-09 16:50:00 · 583 阅读 · 1 评论 -
swf资源文件释放.
//定义一个资源文件 .rc MySwf RC_DATA "c:/123.swf" MySwf 为资源标识符,可任意,RC_DATA 不可改 再用brcc32编译生成.res文件 包含资源文件 {$原创 2010-10-12 16:39:00 · 727 阅读 · 0 评论 -
资源文件制作及使用
<br /> <br />一、引子:<br />现在的Windows应用程序几乎都使用图标、图片、光标、声音等,我们称它们为资源(Resource)。最简单的使用资源的办法是把这些资源的源文件打入软件包,以方便程序需要的时候调用。资源是程序的一部分,程序要正常运行就离不了资源文件原创 2010-08-21 14:56:00 · 555 阅读 · 0 评论 -
Delphi编程“流”的应用
Delphi编程“流”的应用<br /><br /> 什么是流?流,简单来说就是建立在面向对象基础上的一种抽象的处理数据的工具。在流中,定义了一些处理数据的基本操作,如读取数据,写入数据等,程序员是对流进行所有操作的,而不用关心流的另一头数据的真正流向。流不但可以处理文件,还原创 2010-08-24 17:28:00 · 496 阅读 · 0 评论 -
内存比较函数 - CompareMem(文件、数组等比较)
所属单元:SysUtils函数功能:快速内存比较函数,可对两个文件比较、数组进行比较。据测试速度比一般算法要高60~110%。一、文件的比较你是否遇到过比较两个任意后缀名文件内容是否相同的问题?(TFileStream其他类可以方便的操作这些文件,但如果说原创 2011-07-30 19:33:06 · 5293 阅读 · 0 评论 -
ReadOffset
const offset = $000028A10; //$000347f8; 3.0.0 Soffset = $000347F8; //3.0zvar F: TStream; Buf: array[0..19] of Char;begin if not (edt1.Text = ) then begin try F原创 2011-06-08 17:18:00 · 698 阅读 · 0 评论 -
exe自校验
varstream: TMemoryStream;CrcValue,OldCrcValue: DWORD;exename: string;WriteBuf: array[0..3] of Byte;beginCRCValue := $FFFFFFFF;转载 2011-08-26 23:46:52 · 1480 阅读 · 0 评论 -
判断内存流中的图片格式
判断内存流中的图片格式代码如下://从内存流中判断图片格式procedure TForm1.BitBtn4Click(Sender: TObject);var MyImage:TMemoryStream; Buffer:Word; i:integer;begin if OpenDialog1.Execute then begin My转载 2012-10-10 00:46:57 · 1022 阅读 · 0 评论