又是菜鸟问题？

Question

1. 如何显示出自制的一个新窗口？？
2. 还是搞不明白try...final。。那几句是干什么的？？？具体解释一下好吗？
3. 生成安装程序后，用户一安装后我们程序运行时的当前目录是在用户所安装的那个目录里吧？那如何得到当前目录路径啊？
4. 如何让label控件的文本显示于中央？（指的是上下的中）

Answer 1

1. 如何显示出自制的一个新窗口？？with TForm2.Create(Application) do
try
  ShowModal;
finally
  Free;
end;2. 还是搞不明白try...final。。那几句是干什么的？？？具体解释一下好吗？
try
  代码1；
finally
  代码2；
end;
的意思是：执行代码1的过程中，无论有没有异常触发，都一定会执行代码2，一般代码2是
释放资源，解除锁定等。

Answer 2

3. 生成安装程序后，用户一安装后我们程序运行时的当前目录是在用户所安装的那个目录里吧？那如何得到当前目录路径啊？
ShowMessage(ExtractFilePath(Applicataion.ExeName));4. 如何让label控件的文本显示于中央？（指的是上下的中）
AutoSize为TRUE行不行？

Answer 3

1.说的不明太明白，请说详细点。
解答2:try...finally语句的作用是保护程防止出现不可预见的错误，例如
try
  query.open;
finally
  query.close;//该行无论是程序出错还是不出错都将被执行。
解答3：得到当前可执行程序的路径:extractdir(application.exename)+'\'
解答4：没有现成的属性，你得自已写代码实现。

Answer 4

2 答：
try 
finally 
  //不管程序是否出现异常,finally后的语句肯定执行
end ; 
3：答
var s:string ;
begin
  s:= GetCurrentDir;
  ShowMessage(s);//s就是当前路径了，你自己看吧
end;

Answer 5

在第一个问题，显示窗口中老是出现
[Fatal Error] Unit3.pas(9): File not found: 'aboutbox.dcu'
明明已经保存了aboutbox窗口了啊！！！？？

Answer 6

第一个问题：出现错误，你有没有在UNIT3里面的USES句子后面加入ABOUTBOX单元？
最后一个问题：不明白你的说的位于中央，是窗体的中央还是什么中央。
其他的问题其他的 高手已经说了，我同意

Answer 7

窗口就保存在工程的同一个目录下面啊！！！？？
最后一个问题的意思是比如label在toolbar里的高度是一定要和toolbar一样高的，那文字就老是居于label的上部，想让文字可居于中间，怎么做？

Answer 8

比如label在toolbar里的高度是一定要和toolbar一样高的，那文字就老是居于label的上部，想让文字可居于中间，怎么做？//不行你把文字的字体加大啊，我经常在toolbar中放toolbutton还真没有放过label，