<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="38006,6684253472" ReportOptions.Description.Text="Demonstrates how to use OnPreviewClick event." ReportOptions.LastChange="38344,718786412" ScriptLanguage="PascalScript" ScriptText.Text="procedure Memo2OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);&#13;&#10;var&#13;&#10;  s: String;&#13;&#10;begin&#13;&#10;  s := TfrxMemoView(Sender).Text;&#13;&#10;  SetLength(s, Length(s) - 2); // cut off #13#10&#13;&#10;  TfrxMemoView(Sender).Text := InputBox('Edit', 'Edit Memo2 text:', s);&#13;&#10;  Modified := True;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo1OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);&#13;&#10;begin&#13;&#10;  ShowMessage('Memo1 contents:' + #13#10 + TfrxMemoView(Sender).Text);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C65730100055374796C650100">
  <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
    <TfrxMemoView Name="Memo1" Cursor="-21" Left="37,7953" Top="37,7953" Width="94,48825" Height="37,7953" OnPreviewClick="Memo1OnPreviewClick" Frame.Typ="15" HAlign="haCenter" Memo.Text="Memo1" VAlign="vaCenter"/>
    <TfrxMemoView Name="Memo2" Cursor="-4" Left="181,41744" Top="102,04731" Width="113,3859" Height="37,7953" OnPreviewClick="Memo2OnPreviewClick" Frame.Typ="15" HAlign="haCenter" Memo.Text="Memo2" VAlign="vaCenter"/>
    <TfrxMemoView Name="Memo3" Left="226,7718" Top="7,55906" Width="188,9765" Height="18,89765" HAlign="haCenter" Memo.Text="Click these two memos"/>
  </TfrxReportPage>
</TfrxReport>
