delphi 一些初级用法

1、像vs中的转定义

按Ctrl，鼠标点击 需要转定义的字符串，或者右键find declaration（声明）

2、撤销

Ctrl+Z 可以撤销，但是撤销 只有在保存过以后才可以执行，没有保存，谈不上撤销；另 edit---undo也可以撤销

3、视图与代码 切换（F12即可）

4、查找（Ctrl+F），继续查找（Ctrl+L ）

5、注释

DELPHI支持的注释有{}、(**)、//三种：

如果需要把一行、或者少数几行加成注释，可以在行首输入符号//

如果需要把一段加成注释，可以把这一段用一对{}括起来，但是{}不能嵌套，如果这一段程序里面已经有了一些{}括起来的注释，那么我们可以用一对(*、*)套在这一段的前后。

引用：http://zhidao.baidu.com/question/30315397.html

6、缩进与减少缩进

Ctrl+Shift+U 减少缩进

Ctrl+Shift+I 缩进

快捷键大全：/article/11520313.html

6、获取程序跟目录

Application.ExeName获取当前执行程序的名字，如当前程序的名字为Yt.exe，若Yt.exe的绝对路径为F:\project\test\Yt.exe

ExtractFileDir(Application.ExeName) F:\project\test

ExtractFileDrive(Application.ExeName) F:

ExtractFileExt(Application.ExeName) .exe

ExtractFileName(Application.ExeName) Yt.exe

ExtractFilePath (Application.ExeName) F:\project\test\ //注意和Dir的区别，仅仅是差一个‘\’

引用：http://blog.sina.com.cn/s/blog_6327065701010idv.html

7、弹出对话框

需要uses Dialogs;

ShowMessage('提示语句');

8、if else用法

if a='' then
begin
c:='';
end//注意这里不能有封号“；”
else
begin
c:=a;
end;

9、try catch用法

try
begin
//要检测的代码
end;
finally
begin
//最后执行的代码，多是释放资源的
end;
end;

try
begin
///
end;
except
on err:Exception do //捕捉错误
begin
ShowMessage(err.Message);//ShowMessage需uses dialogs
end;
end;

Try…except语句块一般和On…Do子句连用

try...except（着重于捕捉异常） 与 try...finally（侧重于释放资源）不能同时使用

更多try..except..finally，参考：/article/5794693.html

10、label设置背景色透明

label1.transparent:=true; （原先本身就是true，不起作用；后来改为false后又改为true 竟正常了！）

11、代码折叠（delphi2009）

{$region}
//要折叠的代码片段
{$endregion}

12、安装控件：



注：在上传gif后，发现动态图成了jpg的静态图，网上搜索无果，后来用编辑器下方的上传图片工具栏，选择无水印，gif正常（话说回来，上传的图片在哪里管理？）