那位大侠看看delphi 6的线程demo的一段代码，不明白，看不懂。

Question

Delphi允许在一个函数或过程里嵌入函数和过程，但是只能由上级函数或过程调用。

Answer 1

能详细点么？诸如
procedure procedurename(参数……）
var ……
begin
  ………………
end;

Answer 2

procedure procedurename(参数……）
  //function  funcname(params): returnvalue;
  //procedure procname(params);
  begin
    ...........
    ...........
  end;
var ……
begin
  ………………
  //funcname();    //procname(); //只能在这个函数中调用end;
procedure otherproc()
begin
  //funcname()      //procname() //Errorend;

Answer 3

确实
delphi允许函数里定义函数
borland的大多辕马都这样的，看多了的话就不觉得奇怪了
至于好处，一个是使代码简洁，另外也许性能较好——有时函数内的函数要被调用多次，多看borland的辕马

Answer 4

borland的辕马可以看看
规范的话（我按照borland的模仿），如果你有书面的
那么也给我一份

Answer 5

Delphi和传统Pascal一样，支持过程的嵌套定义,这也是Pascal的一大特点。