44.fr3

这个是功能强大的报表软件

<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="3.23" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report." ReportOptions.LastChange="38965,5327842824" ScriptLanguage="PascalScript" ScriptText.Text="procedure DialogPage1OnShow(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  BDETable1.Open;&#13;&#10;  while not BDETable1.EOF do&#13;&#10;  begin&#13;&#10;    CheckListBox1.Items.Add(BDETable1.FieldByName('Company').AsString);&#13;&#10;    BDETable1.Next;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band4OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if CheckListBox1.Checked[&#60;Line#&#62; - 1] then&#13;&#10;    Band4.Visible := True else&#13;&#10;    Band4.Visible := False;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3500000020446174615365743D224244455461626C65312220446174615365744E616D653D22496E7465726E616C20437573746F6D657273220000095661726961626C65730100055374796C650100">
  <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
    <TfrxReportTitle Name="Band1" Height="28" Left="0" Top="16" Width="755,906">
      <TfrxMemoView Name="Memo1" Align="baWidth" Left="0" Top="4" Width="755,906" Height="20" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaBottom" Text="Customers"/>
    </TfrxReportTitle>
    <TfrxPageHeader Name="Band2" Height="32" Left="0" Top="64" Width="755,906">
      <TfrxMemoView Name="Memo3" Left="6" Top="8" Width="194" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
      <TfrxMemoView Name="Memo4" Left="207" Top="8" Width="163" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
      <TfrxMemoView Name="Memo5" Left="378" Top="8" Width="127" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
      <TfrxMemoView Name="Memo6" Left="512" Top="8" Width="89" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
      <TfrxMemoView Name="Memo7" Left="609" Top="8" Width="101" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
    </TfrxPageHeader>
    <TfrxPageFooter Name="Band3" Height="28" Left="0" Top="156" Width="755,906">
      <TfrxMemoView Name="Memo2" Left="6" Top="8" Width="704" Height="16" 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" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
    </TfrxPageFooter>
    <TfrxMasterData Name="Band4" Height="20" Left="0" Top="116" Width="755,906" OnBeforePrint="Band4OnBeforePrint" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="BDETable1" DataSetName="Internal Customers" RowCount="0">
      <TfrxMemoView Name="Memo8" Left="6" Top="0" Width="194" Height="20" DataField="Company" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Company&#34;]"/>
      <TfrxMemoView Name="Memo9" Left="207" Top="0" Width="163" Height="20" DataField="Addr1" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Addr1&#34;]"/>
      <TfrxMemoView Name="Memo10" Left="378" Top="0" Width="127" Height="20" DataField="Contact" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Contact&#34;]"/>
      <TfrxMemoView Name="Memo11" Left="512" Top="0" Width="89" Height="20" DataField="Phone" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Phone&#34;]"/>
      <TfrxMemoView Name="Memo12" Left="609" Top="0" Width="101" Height="20" DataField="FAX" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;FAX&#34;]"/>
    </TfrxMasterData>
  </TfrxReportPage>
  <TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" BorderStyle="bsDialog" Caption="Choose records to print" Height="417" Left="265" Top="150" Width="306" OnShow="DialogPage1OnShow">
    <TfrxADOTable Name="BDETable1" UserName="Internal Customers" CloseDataSource="True" FieldAliases.Text="" TableName="customer" IndexName="ByCompany" IndexFieldNames="Company"/>
    <TfrxCheckListBoxControl Name="CheckListBox1" Left="4" Top="8" Width="193" Height="377" Color="-2147483643" Items.Text=""/>
    <TfrxBitBtnControl Name="BitBtn1" Left="212" Top="16" Width="75" Height="25" Glyph.PropData="04446174610AE2010000DE010000424DDE01000000000000760000002800000024000000120000000100040000000000680100000000000000000000100000000000000000000000000080000080000000808000800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333333333333333333333333333333330000333333333333333333333333F3333333333300003333344333333333333333388F3333333333000033334224333333333333338338F3333333330000333422224333333333333833338F3333333300003342222224333333333383333338F3333333000034222A22224333333338F338F3338F33333300003222A3A2224333333338F3838F338F33333300003A2A333A222433333338F83338F338F33333000033A33333A222433333338333338F338F33330000333333333A222433333333333338F338F33300003333333333A222433333333333338F338F33000033333333333A222433333333333338F338F30000333333333333A222433333333333338F338F00003333333333333A224333333333333338F38F000033333333333333A223333333333333338F830000333333333333333A3333333333333333383300003333333333333333333333333333333333330000" Kind="bkOK" Caption="OK" ModalResult="1" NumGlyphs="2"/>
    <TfrxBitBtnControl Name="BitBtn2" Left="212" Top="48" Width="75" Height="25" Glyph.PropData="04446174610AE2010000DE010000424DDE01000000000000760000002800000024000000120000000100040000000000680100000000000000000000100000000000000000000000000080000080000000808000800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333333333333333333333333333000033338833333333333333333F3333333333330000333911833333983333333388F333333F333300003339111833391183333338F38F333F88F33300003339111183911118333338F338F3F8338F3300003333911118111118333338F3338F833338F3000033333911111111833333338F33383333F8330000333333911111183333333338F333333F833300003333333111118333333333338F3333383333000033333339111183333333333338F33383333300003333339111118333333333333833338F333300003333391118111833333333338333338F333300003333911183911183333333383338F338F333000033339118333911183333338F33838F338F33000033333913333391113333338FF83338F338F300003333333333333919333333388333338FFF83000033333333333333333333333333333338883300003333333333333333333333333333333333330000" Kind="bkCancel" Caption="Cancel" ModalResult="2" NumGlyphs="2"/>
  </TfrxDialogPage>
</TfrxReport>