доступ к полю, которого нет в Memoview

Комментарии

• gpi

  June 2010 отредактировано 04:38

  Запишите в TfrxMemoView.TagStr
• andreymx

  June 2010 отредактировано 04:38

  gpi написал: »

  Запишите в TfrxMemoView.TagStr

  попробовал:
  

  procedure Memo20OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
  begin
  ShowMessage(VarToStr(Memo20.tagstr));
  bz_fastbpls_set_var('id_doc', Memo20.tagstr);
  bz_call_dll(bz_get_full_bpls_dir('DocDir') + 'DocInfo.dll', '');
        
  end;
    
  procedure Memo20OnBeforePrint(Sender: TfrxComponent);
  begin
    Memo20.tagstr := VarToStr(<Data_order."id_doc">);
  end;
  

  
  не работает - значение Memo20.tagstr - пустое
• andreymx

  June 2010 отредактировано 04:38

  записал в дизайнере
  Memo20.tagstr = [Data_order."id_doc"]
  
  Всё равно в Memo20OnPreviewClick
  вызов ShowMessage(VarToStr(Memo20.tagstr));
  возвращает не значение id_doc, а строку [Data_order."id_doc"]
• andreymx

  June 2010 отредактировано 04:38

  спасибо, всё решил
  
  Помог ответ AlexTZ:
  Проблема в том, что объекта Memo8 во время превью в скрипте не существует. Доступен только объект, вызвавший событие, и к нему надо обращаться не по имени, а как TfrxMemoView(Sender).TagStr.