自己做了一个DELPHI版本控制的东东

[ccc_wh]

最近不是很忙,就尝试这用DELPHI 提供的接口自己写了个版本控制的东东,
可以直接挂在DELPHI 的IDE里边,
可以设置成保存版本信息或不保存版本信息
如果设置成保存版本信息的话则在当代码有改动的时候会记录下来每一次改动的地方,
很方便地可以恢复或者切换到以前的任何一个版本.
里边还有仿VC里边的文件比较的功能,
可以方便地比较出两个文件的不同的地方基本功能和VC里边带的那个东东查不多,
不过我这个是集成在DELPHI 的IDE中.
还有一个功能是代码的格式化功能,
也就是说自动格式化代码----缩进缩出
不知道这样的工具在DELPHI的FANS 中是否有价值,
再这里做一个小小的调查,谢谢大家捧场.

[tonylk]

只要对自己是由挑战的，对自己是实用的，我觉得就有必要做。。

[hyj122]

up,

学习

[angelface]

学习...

[Skylights]

ccc_wh(cwh) 老大，你说的是自动完成吧，
我说的是有时候在interface里加入一个函数,再implement里还有自己写函数头和begin..end，
不知道有没有这样的东西，能自动加入函数声明和实现的，

[pandengzhe]

支持!

[hongqi162]

up

[hbqinlei]

支持！

[goldhawk_2000]

athlant 那个我用起来很爽.

可以做参考,把版本控制和ide集成分开

[xiaoqiang123]

支持！

[ccc_wh]

Skylights(忧郁辰光) :
这样的功能也有的:
CTRL+ Shitf+C 类过程代码补全（只要在定义部分定义一过程或一函数头则自动帮你生成 实现部分的套架；反之也成）

[ccc_wh]

看来大家对DELPHI还不是很熟悉,
在这里转发一个贴子吧
1。代码模板 ： CTRL+J
2。代码整块移动 ： CTRL+SHIFT+I（右移） CTRL+SHIFT+U（左移）
3。选中窗体 ： 先选中任一控件，SHIFT+鼠标左键
4。将鼠标指向变量名、单元名、类名，再用 CTRL+鼠标左键 可找到相应的说明
5。在过程、函数、事件内部， SHIFT+CTRL+向上的方向键 可跳跃到相应的过程、函数、事件的定义 相反，在过程、函数、事件的定义处，SHIFT+CTRL+向下的方向键 可跳跃到具体过程、函数、事件内部 CTRL+ SHIFT + C:编写申明或者补上函数. 用esc选择上层对象 SHIFT+CTRL+E 显示 EXPLORER ，我觉的这个比较好
2。代码整块移动 ：
CTRL+SHIFT+I（右移）
CTRL+SHIFT+U（左移） 这个本身就有插件， 安装好之后对某个或者整个文件/工程文件 用crtl+d就可以做到代码排列，比这个要方便多了，当然里面还有其它的功能
shift +f12 快速查找窗体并打开 f11 属性 f9运行 crtl+f9 编译 crtl + shift + n (n=1,2,3,4......) 定义书签 crtl + n (n=1,2,3,4......) 跳到书签n ALT+鼠标左键可以块选代码，删除对齐的重复代码非常有用。 Ctrl+PageUp 将光标移至本屏的第一行，屏幕不滚动。
Ctrl+PageDown 将光标移至本屏的最后一行，屏幕不滚动。
Ctrl+↓ 向下滚动屏幕，光标跟随滚动不出本屏。
Ctrl+↑ 向上滚动屏幕，光标跟随滚动不出本屏。
Ctrl+Shift+NUM 在光标行设置最多九个临时标志号，对临时切换非常有用。 行的左边将出现一本书，封面有NUM，再按一次取消设置。
Ctrl+NUM 直接将光标跳到NUM处，NUM是用Ctrl+Shift+NUM设置的标号。 NUM不能用小键盘。
Ctrl+Home 将光标移至文件头。 Ctrl+End 将光标移至文件尾。
Ctrl+B Buffer List窗口。 Ctrl+I 同Tab键。 Ctrl+M 同Enter键。
Ctrl+N 同Enter键，但光标位置保持不变。 Ctrl+T 删除光标右边的一个单词。
Ctrl+Y 删除光标所在行。 Ctrl+Shift+↑ 光标在函数体内时，将光标快速移至当前函数声明处。
Ctrl+Shift+↓ 光标在函数声明行时，将光标快速移至函数定义处。
Ctrl+Shift+C 声明一个过程或函数后，直接生成过程或函数的名称、begin、end;
Ctrl+Shift+E 光标在Edit窗口和Explorer窗口间切换。 Ctrl+Shift+G 插入GUID。
Ctrl+Shift+J 弹出Delphi语句提示窗口，选择所需语句将自动完成一条语句。
Ctrl+Shift+T 在光标行加入To-Do注释。 Ctrl+Shift+Y 删除光标之后至本行末尾之间的文本。
Ctrl+F3 Call Stack窗口。 Ctrl+F4 等于File菜单中的Close项。 Ctrl+鼠标转轮 加速滚屏。
Shift+F8 调试时弹出CPU窗口。 Shift+F10 等于鼠标右键（Windows快捷键）。
Alt+F4 关闭所有编辑框中打开的源程序文件，但不关闭项目。
CTRL+C 复制 CTRL+V 粘贴 CTRL+X 剪切 CTRL+Z 还原(Undo) CTRL+S 保存 CTRL+ENTER 定位到单元文件
Shitf+箭头 选择 如果同时按住Alt +Shitf+箭头, 再进行选择, 则是一种区域选择, 而不是行选择, 粘贴的 时候也就是插入粘贴了. F9 运行 CTRL+ F9编译 F8 STEP OVER （步进式调试不进入子过程）
F7 TRACE INTO （步进式调试同时追踪进入子过程） F11,F12 切换EDITOR,INSPECTOR,FORM DESIGNER. CTRL+ALT+F11 弹出工程管理器 CTRL+F弹出查找对话框 CTRL+R弹出替换对话框
CTRL+ Shitf+C 类过程代码补全（只要在定义部分定义一过程或一函数头则自动帮你生成 实现部分的套架；反之也成） 象这些都是菜单中有的快捷方式, 其它的您可以自己去找, 就不无聊了, 下面是一些不是 PB的SHITF+TAB好象很酷, 其实DELPHI也有. DELPHI中怎样跳格就是CTRL+K,I向后,
CTRL+K,U向前. 如果你是在接口函数的实现部分, 那么 CTRL+SHIFT+上箭头 就可以到声明部分. 同样再CTRL+SHIFT+下箭头 又回到实现部分 是不是觉得DELPHI好象没有标签功能, CTRL+SHIFT+数字 定义标签(当然因为数据键只有10 个, 所以您也只能定义从0~9的10个标签), CTRL+数字 就是定位到相应的标签的位置. 有时候反复输入什么东西是不是很繁? CTRL+SHIFT+R
录制键盘宏, 比如我经常做的就是: 下箭头-下箭头-HOME-回车-CTRL+V, 再键入一次CTRL+SHIFT+R录制完成, 之后您可以使用 CTRL+SHIFT+P, 重复宏,还是省了一些事的. 这就是CTRL+J；
列如：在一过程中你输入ifb后再按CTRL+J你回去看看效果吧，可能你会大吃一惊。这就是Code Insight ctrl+shift+u //块缩进/反缩进 ctrl+shift+i 取消书签： 在书签N处，再按一次 SHIFT + CTRL + N Ctrl ＋Shift ＋ S :Save All 按住Ctrl再点对象、过程、函数，转到其定义原型，即便是Delphi VCL源代码中的Unit。 ALT+F4 关闭DELPHI Ctrl+space 代码补全
Ctrl+K+O,Ctrl+K+N 将选中的整块代码都转为小写或大写
Ctrl+F 查找 Ctrl+L 继续查找
ctrl+r 在Inspector，可以用Ctrl+Tab切换Properties页和Events页
Ctrl+Enter可进入相应的设置，如在Preperties页的Font按Ctrl+Enter 在Events中按Ctrl+Enter可进入相应代码编辑 选中一段程序 Ctrl+Shift+i ： 同时推进2格 Ctrl+Shift+u ： 同时退后2格 按住ALT用鼠标选择文本 或者按住ALT加SHIFT，用方向键选择文本 来自：dlnew, 时间：2001-10-24 11:57:00, ID：688849 在form上放一个tedit控件，然后在代码中写入“edit1.”，稍等一下，会出现提示。 在“edit1.”未写入前，要想使用这个提示功能，可以按住windows键，然后按空白键。 （只有windows键盘可以用此功能！） 其实所有ShortKey都可以在Classic keystroke mapping找到的。 然后在UNIT中，比如输入fo这是按下CTRL+SPACE就会出现一系列以fo开头的变量，函数。。 Ctrl+Backspace 后退删除一个词。好像是到 . 为止。 按着Ctrl+Alt 之后，可用鼠标选择一个矩形块中的代码， 并可比它进行复制，粘帖， 这是Delphi独有的，而且非常有用的。 如象还有一个：Ctrl+鼠标左键，指向代码时…… 如果你的手在键盘上,我想你不太会愿意再去伸手拿鼠标来移动组件吧,再说鼠标也不太精确 (下面提到的均针对键盘操作,能用鼠标操作完成的不在此列), 那好,以下快捷键及一些技巧请各位看官"收好". 一、以下快捷键指的是对窗体表格上组件的操作：

●快捷键1:
【Ctrl+UP】～向上移动当前组件(精确);
【Ctrl+Left】～向左移动当前组件(精确);
【Ctrl+Down】～向下移动当前组件(精确);
【Ctrl+Right】～向右移动当前组件(精确); 注: 以上快接键中再加Shift进行组合(比如【Ctrl+Shift+Right】)即可实现粗略调整;

●快捷键2:
【Shift+UP】～减小当前组件的高度;
【Shift+Left】～减小当前组件的宽度;
【Shift+Down】～增加当前组件的高度;
【Shift+Right】～增加当前组件的宽度; 二、以下快捷键指的是在对象观察器上的操作：

●快捷键3:
【F11】～切换到对象观察器(注:如果连续按F11则将实现在对象观察器、窗体表格、代码编辑器之间切换);
【Ctrl+Down】～下拉当前窗体的组件列表;
【Ctrl+Enter】～编辑带...的属性值(如组件的字体TFont);
【Alt+Down】～下拉组件当前属性选单队列(如Align->alNone,alLeft,alRight等);
【Ctrl+Tab】～在属性列表及事件列表中切换; 三、菜单快捷键：

●快捷键4:
【F12】,【Shift+F12】,【Ctrl+F12】等在Delphi的菜单中已有定义的在此不必罗嗦. 技巧: 如何选择被组件覆盖了的窗体(比如某组件的Align属性为alClient)?
方法一、按ESC键,一层一层的往后选,直到窗体被选为当前组件为止;
方法二、按Shift的同时单击鼠标左键,一步即可选定（推荐）;
方法三、按F11选定对象观察器,然后切换到属性列表,再用上面快捷键3中的【Ctrl+Down】.

[tonylk]

听上去不错，你是已经有了这么个工具，还是准备开发一个，如果是后者，我想加入一起开发。。

[ccc_wh]

tonylk(=www.tonixsoft.com=) :
呵呵,初具规模而已啦,大体框架已经成形了,突然想到自己的劳动会不会是白费工夫,
所以在这里做一个小小的调查.

[Skylights]

谢谢老大，呵呵

[jabmoon]

代码的锁定是如何解决的？就是说，当你CheckOut出来的时候，代码是不是由你进行锁定？除非到你CheckIn或者锁定超时的时候，别人才可以CheckIn自己的代码

[hyj122]

up
add

[zdcnow]

good

[koma2003]

羡慕

[101monster]

呵呵，不错，羡慕！

[eliphe]

非常支持.....