2014年01月_云中雁012345

12月 11月 08月 05月 04月 03月 02月 01月

原创误删手机桌面，USB调试又打不开，开机黑屏解决方案

1.用USB连接线连上电脑，此时会出现让你选择USB用途的方式，其中有一个USB无线热点，点击后；通知栏上会显示一个蓝色的图标，意思是让你配置无线热点；点击这个图标，然后会出现配置的界面，在此界面上有一个帮助选项，点击；此时会连接到一个网址；但是又没有联网；此时会弹出网络配置的界面，配置好网络。连接上网络，下载桌面，安卓，OK；

2014-01-24 09:50:34 5742

原创 Win7 64位系统下 Retional rose 2003 安装及破解

Win7 64位系统下 Retional rose 2003 安装及破解博客分类： UML 网上关于Retional rose 2003安装和破解的文章比较多，这里，我结合自己的亲身体验，和大家分享一下win7 旗舰版 64位系统下Retional rose 2003（下面简称rose2003）的安装和破解过程。本文中rose2003的安装路径为C:\Pro

2014-01-20 11:14:56 1013 1

原创 delphi7中的局部变量和全局变量

局部变量时声明在function或procedure里面的，不可以初始化全局变量是声明在implemention后面的。可以初始化，但前提条件是不能同时声明多个变量；全局变量默认的出师值为0；局部变量默认的初始值根据类型的不同而不同；

2014-01-15 15:02:53 2412

原创 delphi中的ActionList使用方法

DelphiActionList详解一个友好的用户界面,必须具有下拉菜单，弹出菜单，工具条和快捷键。同样一个功能，程序员可能要提供几种操作方式，如文本拷贝，菜单命令 &Copy,快捷键Ctrl+C,工具条上的拷贝按钮，都是程序员提供给用户的操作，可以大大方便了不同层次的用户。但是，多增加一种操作方式，就意味着增加响应事件的代码，还有，实现统一功能的多个操作必须一致，如剪切板上不为空的时候，菜

2014-01-14 11:19:10 3205

原创 delphi中常用属性

名称类型说明 A Abort 函数引起放弃的意外处理 Abs 函数绝对值函数 AddExitProc 函数将一过程添加到运行时库的结束过程表中 Addr 函数返回指定对象的地址 AdjustLineBreaks 函数将给定字符串的行分隔符调整为CR/LF序列 Align 属性使控件位于窗口某部分 Alignment 属性控件标签的文字位置 Al

2014-01-10 13:58:09 783

转载 delphi学习 -----FormCreate,FormActivate,FormShow的顺序

procedure TForm1.FormCreate(Sender: TObject);begin form1.Caption:=form1.Caption +'+Create';end;procedure TForm1.FormActivate(Sender: TObject);begin form1.Caption:=form1.Caption +'+Ac

2014-01-10 13:40:35 4899

原创 Delphi中的Free和Nil和freeandnil函数

Delphi中的Free和Nil在Delphi中释放对象资源时一般用Obj.Free(Obj为一个实例名),不过程Delphi中还有一个FreeAndNil(对象名)函数，那么用哪个好呢？Free和Nil的本质又都是什么呢？在Delphi中一个对象名只是一个指向该对象的指针，可以有多个指针指向同一个对象地址。Nil是将指针置空，而Free则将指针指向的对象销毁掉。如下所示：

2014-01-10 13:19:28 3520

原创简单的键盘监听测试程序

用delphi时间键盘监听时间；当按下一个键时，在Edit组件中显示按键的名称；测试中遇到的问题，就是按键没反应，解决方法是在窗体的属性中找到 KeyPriview 的属性改为 ture;具体的说明树下：Specifies whether the form should receive keyboard events before the active control.Delphi s

2014-01-10 12:47:45 1158

原创 delphi下的动态数据交换技术DDE

DDE是一种动态数据交换机制（Dynamic Data Exchange，DDE）。使用DDE通讯需要两个Windows应用程序，其中一个作为服务器处理信息，另外一个作为客户机从服务器获得信息。客户机应用程序向当前所激活的服务器应用程序发送一条消息请求信息，服务器应用程序根据该信息作出应答，从而实现两个程序之间的数据交换。DDE（Dynamic data exchange）的工作原理是：

2014-01-10 10:56:52 1689

原创 delphi中如何给工程文件重新命名

如果想改exe可执行文件的名字，直接打开文件夹进行修改；如果想修改工程文件的名字，直接打开dpr文件，打开如下：program pxb;uses System;{$APPTYPE CONSOLE}var s:string = '2^20100230210'; str: string;begin str:=Copy(s,Pos('^',s)+1 ,Le

2014-01-10 09:20:17 4237

转载 delphi 中locate函数的使用方法

TDataSet控件以及它的继承控件，例如TSimpleDataSet/TClientDataSet等都可以使用Locate方法在结果数据集中查寻数据。程序首先必须使用SQL命令从后端数据库中取得数据并且形成结果数据集，然后才使用Locate方法查寻数据。当使用Locate方法查寻数据时，开发人员可以使用任何的字段条件来查寻，而无须理会这个字段是不是索引字段。当然，当开发人员使用索引字段来

2014-01-09 17:13:37 3040

原创 delphi中记录数组的使用练习

program Project2;{$APPTYPE CONSOLE}uses SysUtils;type dll_IniForm = function (): Boolean; stdcall; { 在Uni_FUnction.TDllFileRec中引用 } dll_ActiveForm = function (): Boolean; stdca

2014-01-08 14:24:24 1096

原创动态库的函数调用

type xx = function(): string; stdcall;是什么意思解决方案type xx = function(): string; stdcall;是什么意思function xx(): string;type xx= function(): string; stdcall;var func: xx;begin Result := '0'; @

2014-01-08 13:29:43 871

原创 delphi7中的动态窗体创建

TModalResult代表模式窗口的返回值Constant ValueMeaningmrNone 0 None. Used as a default value before the user exits.mrOk idOK The user exited with OK button.mrCancel idCancelThe user exit

2014-01-08 09:35:06 1561

原创加密狗

现在所说的加密狗，一般都是硬件加密狗。是一种类似于u盘一样的东西，是一种防盗版的方式。一般是把程序的一小部分或解密部分集合到加密狗的硬件中，防止软件的盗版。加密狗就是一种插在计算机并行口上的软硬件结合的软件加密产品，为多数软件开发商所采用。加密狗一般都有几十或几百字节的非易失性存储空间可供读写，现在较新的加密狗内部还包含了单片机。软件开发者可以通过接口函数和加密狗进行数据交

2014-01-07 14:01:23 980

转载屏蔽系统热键

在编写程序的过程中，我们有时需要实现屏蔽操作系统一些热键的功能，如（ctrl+delete+alt，ctrl+shift+esc等）。网络上有很多关于这方面的资料，总结了一下，一般有如下两个方法： 1. 通过加载低级键盘钩子（WH_KEYBOARD_LL）截获大部分的系统热键，并屏蔽它。这个方法比较简单，但有个缺陷，那就是对ctrl+alt+delete没有办法。 2.

2014-01-06 10:42:28 943