Script.Items Help

uouo

Hi all

i've this script

procedure MyProc;
var MyProcSub: integer;
begin
  //...
end;

var MyGlobal: integer;
begin
	MyProc;
end.

and i list items in the script by this function:

procedure ListItems;
var i: integer;
begin
  ListBox1.Items.Clear;
  for i := 0 to fsScript1.Count - 1 do
    ListBox1.Items.Add(fsScript1.Items[i].Name + ': '+fsScript1.Items[i].TypeName);
end;

but i can see only global items like
-MyProc
-MyGlobal

is there any way to read "MyProcSub"?

uouo

anyone?