08.memos and pictures.fr3

DELPHI报表控件 DELPHI报表控件

<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9968403472" ReportOptions.Description.Text="Demonstrates how to create simple list report with images and memos from DB fields. DB field placed in the memo of objects." ReportOptions.LastChange="38447,5102997454" ScriptLanguage="PascalScript" ScriptText.Text="procedure frxReport1OnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  ADODataBase.DatabaseName := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + &#60;PathToDatabase&#62;;&#13;&#10;  ADODataBase.Connected := True;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." OnStartReport="frxReport1OnStartReport" PropData="08446174617365747301010C2000000020446174615365743D2242696F2220446174615365744E616D653D2242696F220000095661726961626C657301010C11000000204E616D653D222044617461626173652200010C2C000000204E616D653D2250617468546F4461746162617365222056616C75653D22272E2E5C64656D6F2E6D646227220000055374796C650100">
  <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
    <TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
      <TfrxMemoView Name="Memo1" Left="0" Top="3,77953" Width="718,1107" Height="22,67718" Color="8421376" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" Memo.Text="Fishes" ParentFont="False" VAlign="vaCenter"/>
    </TfrxReportTitle>
    <TfrxPageHeader Name="Band2" Height="37,7953" Left="0" Top="68,03154" Width="755,906" PrintOnFirstPage="False">
      <TfrxMemoView Name="Memo2" Left="0" Top="3,77952999999999" Width="718,1107" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="8" Frame.Width="2" HAlign="haRight" Memo.Text="Favourite fishes of Borland Corp." ParentFont="False"/>
    </TfrxPageHeader>
    <TfrxMasterData Name="Band3" Height="120,94496" Left="0" Top="166,29932" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="Bio" DataSetName="Bio" RowCount="0" Stretched="True">
      <TfrxMemoView Name="Memo5" Left="0" Top="86,92919" Width="445,98454" Height="26,45671" StretchMode="smMaxHeight" Color="13434828" Font.Charset="1" Font.Color="128" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haBlock" HideZeros="True" Memo.Text="[Bio.&#34;Notes&#34;]" ParentFont="False"/>
      <TfrxMemoView Name="Memo3" Left="0" Top="7,55905999999999" Width="445,98454" Height="71,81107" Color="13434879" Font.Charset="1" Font.Color="32768" Font.Height="-13" Font.Name="Arial" Font.Style="0" Memo.Text="Number: [Bio.&#34;Species No&#34;]&#13;&#10;Name: [Bio.&#34;Common Name&#34;]&#13;&#10;Spec name: [Bio.&#34;Species Name&#34;]&#13;&#10;Length (cm): [Bio.&#34;Length (cm)&#34;]" ParentFont="False"/>
      <TfrxMemoView Name="Memo4" Left="453,5436" Top="7,55905999999999" Width="49,13389" Height="105,82684" StretchMode="smMaxHeight" Color="13434879" Memo.Text=""/>
      <TfrxPictureView Name="Picture1" Left="502,67749" Top="15,11812" Width="128,50402" Height="86,92919" DataField="Graphic" DataSet="Bio" DataSetName="Bio"/>
      <TfrxMemoView Name="Memo7" Left="631,18151" Top="7,55905999999999" Width="49,13389" Height="105,82684" StretchMode="smMaxHeight" Color="13434879" Memo.Text=""/>
      <TfrxMemoView Name="Memo8" Left="502,67749" Top="102,04731" Width="128,50402" Height="11,33859" StretchMode="smMaxHeight" Color="13434879" Memo.Text=""/>
      <TfrxMemoView Name="Memo9" Left="502,67749" Top="7,55905999999999" Width="128,50402" Height="7,55906" Color="13434879" Memo.Text=""/>
    </TfrxMasterData>
    <TfrxPageFooter Name="Band4" Height="22,67718" Left="0" Top="347,71676" Width="755,906">
      <TfrxMemoView Name="Memo6" Left="0" Top="3,77953000000002" Width="718,1107" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" Memo.Text="[Page#]" ParentFont="False"/>
    </TfrxPageFooter>
  </TfrxReportPage>
  <TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Height="200" Left="243" Top="156" Width="300">
    <TfrxADOQuery Name="Bio" UserName="Bio" CloseDataSource="True" FieldAliases.Text="Species No=Species No&#13;&#10;Category=Category&#13;&#10;Common_Name=Common Name&#13;&#10;Species Name=Species Name&#13;&#10;Length (cm)=Length (cm)&#13;&#10;Length_In=Length In&#13;&#10;Notes=Notes&#13;&#10;Graphic=Graphic" SQL.Text="select * from biolife" Database="ADODatabase" PropData="05704C65667402140470546F70020C0A506172616D65746572730100"/>
    <TfrxADODatabase Name="ADODatabase" LoginPrompt="False" PropData="05704C65667402200470546F700244"/>
  </TfrxDialogPage>
</TfrxReport>