Содержимое TFrMemoView до вывода отчета

Комментарии

• AlexTZ

  April 2004 отредактировано 03:13

  В скриптовом событии TfrxMemoView.OnAfterData это значение доступно через системную переменную Value.
• Masha

  April 2004 отредактировано 03:13

  AlexTZ,подскажите пожалуйста,как получить значение frxMemoView.Memo.Text в версии FastReport 2.46.?
  
  если в скрипте frxMemoView вызвать функцию MYFUNC(memo1.text) или MYFUNC([MyQuery."MyField"]) или MYFUNC(v),где v:=[MyQuery."MyField"],то showmessage показывает соответственно:
  'memo1.text'
  '[MyQuery."MyField"]'
  'v'
  

  function TPrintForm.MyFunc(s:string):boolean;
  begin
    showmessage(s);
  end;
  
  procedure TPrintForm.MyfrReportUserFunction(const Name: String; p1, p2,
    p3: Variant; var Val: Variant);
  begin
  if Name = 'MYFUNC' then
     MyFunc(p1)
  end;
  
• AlexTZ

  April 2004 отредактировано 03:13

  В 2.х надо вычислять параметры вручную:
  frParser.Calc(p1)
• Masha

  April 2004 отредактировано 03:13

  спасибо огромное,все получилось