var s:string; pc:pchar; pb:pbyte; ac:array[1..100] of char; ab:array[1..100] of byte; i:integer; begin s:='this is a test'; pc:=pchar(s);//string->pchar pb:=pbyte(p

1、文件流 TStreamMemoery 读写内存   TMemoryStream的继承关系如下  TObject  |  TStream  |  TCustomMemoryStream  |  TMemoryStream  如何使用TMemoryStream?  其实TmemoryStream使用就跟TStream 一样  具体的属性，方法可看帮助。  下举一例：  如我想在内存中直接读写一个B

var    s:string;    ps:Pchar;    b:pbyte;    len:integer; begin    s:=edit1.Text; //字符串    ps:=pchar(s); //转成pchar类型,    len:=length(s);//取字符串长度,占用多少字节    getmem(b,len);//申请内存,pchar,pbyte在使用前都必须要申请内存,

TMemoryStream对象 TMemoryStream对象是一个管理动态内存中的数据的Stream对象,它是从TCustomMemoryStream中继承下来的,除了从TCustomMemoryStream中继承的属性和方法外,它还增加和覆盖了一些用于从磁盘文件和其它注台读数据的方法。它还提供了写入、消除内存内容的动态内存管理方法。下面介绍它的这些属性和方法。 20.1.5.1 TMemory

本文主要讲解了如何判断一个图片文件的真实类型，并不是从后缀名来判断类型的方法： 以下是引用片段： unit Unit55; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TImageTy

TMemoryStream的继承关系如下 TObject | TStream | TCustomMemoryStream | TMemoryStream 如何使用TMemoryStream? 其实TmemoryStream使用就跟TStream 一样 具体的属性，方法可看帮助。 下举一例： 如我想在内存中直接读写一个Bitmap,怎么办？ TmemoryStream帮了你大忙 var Bitmap

图片的格式很多，一个图片文件的后缀名并不能说明这个图片的真正格式什么，那么如何获取图片的格式呢？我想到了几个简单但有效的方法，那就是读取图片文件的文件头标识。我们知道各种格式的图片的文件头标识识不同的，因此我们可以通过判断文件头的标识来识别图片格式。      我对各种格式的图片文件头标识进行了分析，不仅查找资料，也用十六进制编辑器察看过图片的文件头，以下是我收集、分析的结果，供大家参考。1.JP

procedure ScreenCap(); const WW=256; HH=256; var BmpBits:Pointer; FDeskHWnd:Hwnd; SourceDC,DestDC,originHandel:integer; i:Integer; ABitmap:HBitmap; s:TBitmap; BmpInfHead:TBitmapInfoHeader;

在Windows7环境下，安装Turbo Delphi（D2006）后发现，IDE第二次启动时会出现错误提示： “Cannot create file C:\Users\Admin\AppData\Local\Temp\EditorLineEnds.ttr” 然后退出，启动失败。 搜索网络后发现，这个问题普遍发生在Delphi2006-2010几个版本。 Stack Overflow上给出三个解决

增加了对ini文件设置的功能，一个安装包常用的功能都具备了。 [Setup] ; 注: AppId的值为单独标识该应用程序。 ; 不要为其他安装程序使用相同的AppId值。 ; (生成新的GUID，点击 工具|在IDE中生成GUID。) AppId={{A9861883-31C5-4324-BD9A-DC3271EEB675} ;程序名 AppName=ISsample ;版本号 AppVerNa

  fMem := TMemoryStream.Create;   mdShangpin.savetoStream(fMem);   fMem.Position := 0;   dxMemData1.CreateFieldsFromStream(fMem);   fMem.Position := 0;   dxMemData1.LoadFromStream(fMem);   fMem.Free;

http://blog.csdn.net/ruifangcui7758/article/details/6662646 前段时间关注了VC6.0自带的Installshield打包的使用方法，感觉繁琐，现在找到一个比较简单实用的打包小工具Inno setup,使用方法如下。 （1）将编写好的程序生成Release版本，打开Inno setup 5小软件，弹出如下界面： 点击菜单栏“文件”——“新建

用innoSetup做应用程序安装包的示例脚本（.iss文件），具体要看innoSetup附带的文档，好象是pascal语言写的脚本。 示例1（应用程序.exe，客户端安装）： ;{089D6802-6CD3-4E45-B8D5-AC9ED99CE371}; 脚本由 Inno Setup 脚本向导生成！ ; 有关创建 Inno Setup 脚本文件的详细资料请查阅帮助文档！ [Setup] ; 注

        传统的编译型语言对多线程访问同一公共变量都会先锁定,旧版的Delphi亦如是,如果不先锁定,多半会有地址操作错误之类的运行时提示． 　　但XE的出现让一切都免了,固定内存占用的数据类型(integer,double,long之类)同时读写没事, 即使变长的String类型亦没事!! 除了公共变量, 连对象的属性都一样，下面是测试代码： type TForm1 = class(T

本文供给Delphi一个基于原子操纵的无锁队列，简略单纯高效。实用于多线程大吞吐量操纵的队列。 科学是使人精力变得大胆的最好路子。可用于Android体系和32，64位Windows体系。   感激歼10和qsl供给了批改建议！ 有如下题目： 1.必须实现开辟内存 2.队列大小必须是2的幂 3.不克不及压入空指针   unit utAtomFIFO; interface Uses SysU

前段时间关注了VC6.0自带的Installshield打包的使用方法，感觉繁琐，现在找到一个比较简单实用的打包小工具Inno setup,使用方法如下。 （1）将编写好的程序生成Release版本，打开Inno setup 5小软件，弹出如下界面： 点击菜单栏“文件”——“新建”，出现如下界面 点击下一步，出现如下界面 这里要填写程序的名字，如“My App”，用用版本“1.00”，应用程序的发

只有乐于此道的人，才能乐在其中；上天总是给不安分者更多的痛苦。 但是 Delphi 也的确有众多出类拔萃的优势，我最看重的是以下几点： （1）编译速度非常快。 （2）IDE 反应速度很快。 （3）完全开放的 VCL 源代码和规范简练的帮助系统。 选择开发工具，和选择恋人是一样的道理。你的选择对于你可能是最适合的，你认为他/她是全世 界最好的，但是其他人或许就不这么看。 1，为什么说他快，因为有很多

Ctrl＋Shift＋方向键：将所选组件的位置移动一个栅格。  Shift＋TAB：选择当前组件的上一个组件。 Esc：选择当前组件的容器（通常是 TPanel、TGroupBox、TForm等）。 Ctrl＋J：插入标准语法代码。 Ctrl＋Y：删除光标所在行。 Ctrl＋BackSpace：向前删除一个单词。 Ctrl＋Shift＋G：插入 GUID 号。  Ctrl＋Shift＋C：完成已声

函数 Assigned 测试一个指针或者过程类型变量是否为 nil。  （1）Variant 可以存储绝大部分不同类型的数据（但是指针类型数据只能用 PVariant 来存储）。  （2）Variant 变量在某时刻有三个可能的状态：Unassigned（表示没有值，可以用函数 VarIsEmpty 来测试）、Null（值为 NULL，可用函数 VarIsNull 测试）和非NULL值。声明一个

delphi中move函数的正确理解 收藏  我们能看到以下代码 var pSource,pDest:PChar;      len: integer; .......................//一些代码 Move(pSource,pDest,len); //错误 Move(pSource^,pDest^,len); //正确 看起来确实好像是传值，而不是传地址，但是各位别忘了，这不是C，

NT 服务程序在系统启用后就开始工作了，即使没有用户登录。 用delphi做nt程序也很简单了，new-> other -> new页签 --> service Application. 便会生成一个NT服务框架，TserviceApplice . 默认生成1个 Tservice . 一个NT服务框架可以生成很多service ,一个service 代表一个服务。 设置 Tservice 实例的d

TThread 详解  我们常有工作线程和主线程之分，工作线程负责作一些后台操作，比如接收邮件；主线程负责界面上的一些显示。工作线程的好处在某些时候是不言而喻的，你的主界面可以响应任何操作，而背后的线程却在默默地工作。 VCL中，工作线程执行在Execute方法中，你必须从TThread继承一个类并覆盖Execute方法，在这个方法中，所有代码都是在另一个 线程中执行的，除此之外，你的线程类的其他

其实要了解这些东西，适当的学些反汇编，WINDOWS内存管理机制，PE结构，看下李维的VCL架构剖析可以很好理解 type   TMyEvent = procedure of object; 这是一种数据类型的定义，他定义了一个可以在类中使用的函数类型 区别于 type   TMyProc = procedure; TMyEvent 和 TMyProc 都定义了一个函数类型，他们的差别是，TMyP

用迅雷下载的文件总是有问题，还是用浏览器的内置下载吧！！！ 精简版：http://www.voidcn.com/article/p-ckhqsvml-er.html 官方下载地址: http://altd.embarcadero.com/download/radstudio/xe8/delphicbuilder_xe8_upd1_subscription.iso 官方移动应用开发教程： http:

函数的学习 inttoHex; val; str; // inttostr strtoint 都是对 val 与 str  的封装。 stringtointdef ,   // stringtointdef; 如果转换有错，将用后面的默认值代替。   showmessage(inttostr(strtointdef('1234F',0)));   // 显示的是10；   ShowMessage(

如果自己从头做的话，需要定义一个TNotifyIconData类型变量，这个变量定义在 ShellAPI 单元中。 需要设置这个变量的这几个值。    _NOTIFYICONDATAA = record     cbSize: DWORD;     Wnd: HWND;     uID: UINT;     uFlags: UINT;     uCallbackMessage: UINT;    

library Project2; { Important note about DLL memory management: ShareMem must be the   first unit in your library's USES clause AND your project's (select   Project-View Source) USES clause if your DL

adoconnection1.begintrans;         // 开始事务 try   adoconnection1.execute(sqlstr1);   adoconnection1.execute(sqlstr2);   ...   adoconnection1.execute(sqlstrN);   adoconnection1.commitrans;       // 提交事务

如果是编辑office文档，推荐一个ocx控件，axFramerControl DataSnap+FirDac (接口化) 三层移动开发 1、采用Frame框架设计，一个主Form的其它窗体全部由Frame，减少了APK的大小 2、解决了Frame之间的Menu按钮的使用。切换到那个Frame就是那个Key的Menu事件 3、解决了Frame使用编辑框在最底下的键盘拦住的问题 4、采用数据控件Fi

Delphi 5开发人员指南 Delphi 6 的帮助文件 Delphi 算法与数据结构 Delphi2010语法手册 Delphi4代码规范 Delphi4核心编程技术 Delphi5编程指南 Delphi7资料库与网络应用手册 Delphi函数介绍 Delphi参考手册 Delphi程序调试参考手册(修正) Delphi面向对象编程思想 Object Pascal 编程指南