Are mainfunction's parameters and variables safe to use inside a subroutine?

Question

Could main function's parameters and variables be used inside subroutines or is there something wrong in doing this?

procedure TForm1.FormCreate(Sender: TObject);
var
  Test : string;
  procedure SubFnTest();
  begin
    ShowMessage(Self.Name);
    ShowMessage(TForm1(Sender).Name);
    ShowMessage(Test);
  end;
begin
  Test := 'hello';
  SubFnTest();
end;

I'm testing this code on Delphi-2007 now and it seems there's no problem, but I have some faint memory about troubles caused by this practices (I don't really remember which was the problem at that time)

score 3 · Accepted Answer · edited May 23 '17 at 12:22

3

Your code is absolutely fine. Nested functions can refer to variables from outer scopes.

I suspect that what you are remembering is that it is not permitted to use a nested function as a procedural value. For instance, see the discussion of that topic here: Why cannot take address to a nested local function in 64 bit Delphi?

edited May 23 '17 at 12:22

Community

1
1

answered Jul 20 '16 at 13:33

David Heffernan

601,492
42
1,072
1,490

I remember now! You're right, that's exactly what I was trying to do at that time. Thanks alot for clarification. – Fabrizio Jul 20 '16 at 13:40

Are mainfunction's parameters and variables safe to use inside a subroutine?

1 Answers1