Question: Как получить список всех переменных отчёта?

Answer:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
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;