procedure TForm1.first;
function second(i:byte):string;
begin
//code
end;
begin
//code
end;
这是我在一个软件的源代码中看到的,请问这样写有什么不同的意义吗?
function second(i:byte):string;
begin
//code
end;
begin
//code
end;
这是我在一个软件的源代码中看到的,请问这样写有什么不同的意义吗?
second过程可以使用first中的变量,常量
second相当于first过程的一个子过程,他的作用域仅仅能够在first中使用。
这样做的目的简化first过程的逻辑,使整个过程看起来更清晰,也更容易
理解。
procedure TForm1.First;
procedure Second;
begin
//这里能访问B?,应该不可以吧!end;
var
B:Integer;
begin
//这里能访问B
end;
procedure TForm1.First;
var
B:Integer;
procedure Second;
begin
//这样就能能访问B end;
begin
//这里能访问B
end;