You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

77 lines
5.0 KiB

<?xml version="1.0" encoding="utf-8"?>
<Report ScriptLanguage="Vb" ReportInfo.Created="02/07/2013 15:54:10" ReportInfo.Modified="06/06/2013 10:01:37" ReportInfo.CreatorVersion="2013.2.2.0">
<ScriptText>Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Windows.Forms
Imports System.Drawing
Imports Microsoft.VisualBasic
Imports FastReport
Imports FastReport.Data
Imports FastReport.Dialog
Imports FastReport.Table
Imports FastReport.Barcode
Imports FastReport.Utils
Namespace FastReport
Public Class ReportScript
Private Sub Picture1_BeforePrint(ByVal sender As object, ByVal e As EventArgs)
Picture1.ImageLocation= CType(Report.GetParameterValue(&quot;URL&quot;), String)
End Sub
End Class
End Namespace
</ScriptText>
<Dictionary>
<TableDataSource Name="Daten" ReferenceName="Data.Daten" DataType="System.Int32" Enabled="true">
<Column Name="FirmaNr" DataType="System.Int32"/>
<Column Name="Adresszeile1" DataType="System.String"/>
<Column Name="Adresszeile2" DataType="System.String"/>
<Column Name="Adresszeile3" DataType="System.String"/>
<Column Name="Adresszeile4" DataType="System.String"/>
<Column Name="Adresszeile5" DataType="System.String"/>
<Column Name="Adresszeile6" DataType="System.String"/>
<Column Name="Adresszeile7" DataType="System.String"/>
<Column Name="Titel" DataType="System.String"/>
<Column Name="Aktiv" DataType="System.Boolean" BindableControl="CheckBox"/>
<Column Name="Bezeichnung" DataType="System.String"/>
<Column Name="Tel" DataType="System.String"/>
</TableDataSource>
<Parameter Name="Parcours" DataType="System.String"/>
<Parameter Name="Spruch" DataType="System.String"/>
<Parameter Name="URL" DataType="System.String"/>
</Dictionary>
<ReportPage Name="Page1" RawPaperSize="9" Columns.Count="3" Columns.Width="63.3" Columns.Positions="0,63.3,126.7">
<PageHeaderBand Name="PageHeader1" Width="718.2" Height="122.85">
<PictureObject Name="Picture1" Left="18.9" Width="141.75" Height="122.85" BeforePrintEvent="Picture1_BeforePrint"/>
<TextObject Name="Text12" Left="264.6" Top="28.35" Width="434.7" Height="28.35" Text="A-Z Berufsliste der teilgenommenen Firmen" HorzAlign="Right" Font="Arial, 14pt, style=Bold"/>
<TextObject Name="Text14" Left="283.5" Width="415.8" Height="28.35" Text="[Parcours]" HorzAlign="Right" Font="Arial, 14pt, style=Bold"/>
</PageHeaderBand>
<GroupHeaderBand Name="GroupHeader1" Top="126.85" Width="239.27" Height="28.35" CanGrow="true" CanShrink="true" KeepWithData="true" RepeatOnEveryPage="true" Condition="[Daten.Bezeichnung]">
<TextObject Name="Text2" Left="18.9" Top="9.45" Width="207.9" Height="18.9" CanGrow="true" Text="[Daten.Bezeichnung]" Font="Arial, 9pt, style=Bold"/>
<ChildBand Name="Child1" Top="159.2" Width="239.27" Height="9.45"/>
<DataBand Name="Data1" Top="172.65" Width="239.27" Height="160.65" CanGrow="true" CanShrink="true" DataSource="Daten" KeepTogether="true">
<TextObject Name="Text8" Left="18.9" Top="94.5" Width="207.9" Height="18.9" CanGrow="true" CanShrink="true" Text="[Daten.Adresszeile6]" Font="Arial, 9pt"/>
<TextObject Name="Text9" Left="18.9" Top="113.4" Width="207.9" Height="18.9" CanShrink="true" Text="[Daten.Adresszeile7]" Font="Arial, 9pt"/>
<TextObject Name="Text6" Left="18.9" Top="75.6" Width="207.9" Height="18.9" CanGrow="true" CanShrink="true" Text="[Daten.Adresszeile5]" Font="Arial, 9pt"/>
<TextObject Name="Text7" Left="18.9" Top="56.7" Width="207.9" Height="18.9" CanGrow="true" CanShrink="true" Text="[Daten.Adresszeile4]" Font="Arial, 9pt"/>
<TextObject Name="Text5" Left="18.9" Top="37.8" Width="207.9" Height="18.9" CanGrow="true" CanShrink="true" Text="[Daten.Adresszeile3]" Font="Arial, 9pt"/>
<TextObject Name="Text4" Left="18.9" Top="18.9" Width="207.9" Height="18.9" CanGrow="true" CanShrink="true" Text="[Daten.Adresszeile2]" Font="Arial, 9pt"/>
<TextObject Name="Text1" Left="18.9" Width="207.9" Height="18.9" CanGrow="true" Text="[Daten.Adresszeile1]" Font="Arial, 9pt"/>
<TextObject Name="Text3" Left="18.9" Top="132.3" Width="179.55" Height="18.9" Text="Tel: [Daten.Tel]" Font="Arial, 9pt"/>
<ChildBand Name="Child2" Top="337.3" Width="239.27" Height="9.45"/>
</DataBand>
<GroupFooterBand Name="GroupFooter1" Top="350.75" Width="239.27" Height="9.45">
<LineObject Name="Line1" Left="18.9" Width="141.75"/>
</GroupFooterBand>
</GroupHeaderBand>
<PageFooterBand Name="PageFooter1" Top="364.2" Width="718.2" Height="37.8">
<TextObject Name="Text19" Left="18.9" Top="18.9" Width="94.5" Height="18.9" Text="[Date]" Format="Date" Format.Format="d"/>
<TextObject Name="Text20" Left="599.8" Top="18.9" Width="94.5" Height="18.9" Text="[PageN]" HorzAlign="Right"/>
<LineObject Name="Line2" Left="18.9" Top="9.45" Width="680.4"/>
</PageFooterBand>
</ReportPage>
</Report>