Как получить список всех переменных отчёта?
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; |