Как получить список всех переменых и функций?

WaReZ_MEN

Здравствуйте!
Необходимо получить имена всех переменных и имена всех функций для паскалевского скрипта подскажите как это сделать?
P.S. Естественно стандартных а не моих.

WaReZ_MEN

Не ужели это сложно????
Мне в Delphi нужен список.

gpi

uses fs_iinterpreter;
var i: integer;
    v: TfsCustomVariable;
begin
     for i:=0 to frxReport1.Variables.Count-1 do
       if frxReport1.Variables.Items[i].Name[1]<>' ' then
         ShowMessage(frxReport1.Variables.Items[i].Name);
     for i := 0 to frxReport1.Script.Count - 1 do
       begin
         v := frxReport1.Script.Items[i];
         if v is TfsMethodHelper then
           ShowMessage(v.Name+' '+TfsMethodHelper(v).Syntax+' '+TfsMethodHelper(v).Description);
       end;
end;

WaReZ_MEN

За
for i := 0 to frxReport1.Script.Count - 1 do
begin
v := frxReport1.Script.Items;
if v is TfsMethodHelper then
ShowMessage(v.Name+' '+TfsMethodHelper(v).Syntax+' '+TfsMethodHelper(v).Description);
end;
спасибо а первая не подходит так как я имел виду стандартные переменные типа как Line count а не те что мой.

gpi

Имена системных переменных строго определены, поэтому просто добавляйте их имена в список так, как это делается в исходниках FR:

with FSysVariables do
  begin
    Clear;
    Add('Date');
    Add('Time');
    Add('Page');
    Add('Page#');
    Add('TotalPages');
    Add('TotalPages#');
    Add('Line');
    Add('Line#');
    Add('CopyName#');
  end;

WaReZ_MEN

Огромное спасибо!