Delphi的快捷键
//**************需要强调的两个快捷键**********************
51.CTRL+SHIFT+U 代码整块左移2个空格位置
52.CTRL+SHIFT+I 代码整块右移2个空格位置
60.Ctrl+Alt+c 注释块
61.Ctrl+Alt+u 取消注释块
48.CTRL+SHIFT+C 编写申明或者补上函数，绝好!!!
53.CTRL+SHIFT+↑ 在过程、函数、事件内部, 可跳跃到相应的过程、函数、事件的定义（在interface和implementation之间来回切换）
54.CTRL+SHIFT+↓ 在过程、函数、事件的定义处， 可跳跃到具体过程、函数、事件内部(同上)
//********************************************************
1.SHIFT+鼠标左键 先选中任一控件,按键后可选中窗体(选中控件后按Esc效果一样)
2.Shift+F8 调试时弹出CPU窗口。
3.Shift+F10 等于鼠标右键（Windows快捷键）。
4.Shitf+箭头 选择
5.shift +F12 快速查找窗体并打开
6.F7 （步进式调试同时追踪进入子过程）
7.F8 （步进式调试不进入子过程）
8.F9 运行
9.F12 切换EDITOR,FORM
10.Alt+F4 关闭所有编辑框中打开的源程序文件，但不关闭项目
11.ALT+鼠标左键 可以块选代码，用来删除对齐的重复代码非常有用
12.Ctrl+F9 编译
13.Ctrl+shift+N(n=1,2,3,4......) 定义书签
14.Ctrl+n(n=1,2,3,4......)跳到书签n
15.CTRL +SHIFT+N 在书签N�
相关文档：
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB,comobj, OleServer,
ExcelXP;
type
TForm1 = class(TForm)
ADOConn: TADOConnection;
& ......
今天在大理剑川做监控联网工程，遇到2台DIY的PC-DVR，联网很不顺利。机器的软件是盗版破解的，只破解了服务器端，客户端未破解，还有就是版本也不对。最后发现软件下有一ActiveX控件可以做联网使用，于是想把这个OCX引入项目软件工程。在引入的时候delphi提示coreide70.bpl报错，错误代码:00000019 ......
unit DvsLinkingClass;
interface
uses
Windows, Messages, SysUtils, Classes, Controls, Forms, Dialogs;
type
PRecLinkNode = ^RecLinkNode;
RecLinkNode = record
NodeMsg: String;
Counter: Integer;
Previous: PRecLinkNode;
Next: PRecLinkNode;
end;
TLinkingClass = class
......
unit unitMain;
interface
uses
Registry, shlobj,
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls;
type
TExtForm = class(TForm)
ledExtension: TLabeledEdit;
ledAssocApp: TLabeledEdit;
GetAssocApp: TButton;
AssocTh ......
1、当然是先要卸载以前安装的Ehlib组件了，在菜单的“Component”的“install Packeges”里，选择ehlib XX，选择“Remove”。
2、接下来在库里加入这个控件的引用路径，先新建一个文件夹，比如“D:\Component\Ehlib”（最好把要安装的控件都拷贝到这个Component目录下），然后把 ......
