home *** CD-ROM | disk | FTP | other *** search
/ Computer Active Guide 2009 April / CAGidas04.iso / Programos / essentialpim3.exe / Reports / CardClassic.fr3 < prev    next >
Encoding:
Extensible Markup Language  |  2009-04-03  |  13.6 KB  |  48 lines
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <TfrxReport Version="4.7.79" DotMatrixReport="False" IniFile="\Software\Fast Reports" OldStyleProgress="True" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39869,9228242477" ReportOptions.Description.Text="" ReportOptions.LastChange="39900,4522895602" ScriptLanguage="PascalScript" ScriptText.Text="var   FieldTop,CaptionTop: Extended = 28;   FieldVisible: Boolean; procedure FieldOnAfterData(Sender: TfrxComponent); begin   with TfrxMemoView(Sender) do   begin    FieldVisible := Trim(Memo.Text) <> '';    if FieldVisible then    begin                    Top := FieldTop;     CaptionTop := FieldTop;              FieldTop := FieldTop + CalcHeight;    end;                 end; end; procedure FieldCaptionOnAfterData(Sender: TfrxComponent); begin   with TfrxMemoView(Sender) do    if FieldVisible then     Top := CaptionTop    else     Memo.Text := ''; end; procedure PictureOnAfterData(Sender: TfrxComponent); begin   with TfrxPictureView(Sender) do   begin    Top := FieldTop + 4;    if Picture.Height <> 0 then     FieldTop := FieldTop + Height + 8    else     Height := 0;   end; end; procedure MasterDataOnAfterCalcHeight(Sender: TfrxComponent); var   Memo: TfrxMemoView; begin   Memo := TfrxMemoView(Sender.FindObject('GrMemo'));   if Memo = nil then    Memo := TfrxMemoView(Sender.FindObject('ContMemo'));   Memo.Height := FieldTop + 4;   TfrxMasterData(Sender).Height := FieldTop + 20;   FieldTop := 28; end; begin end." PropData="044C65667403940003546F70027408446174617365747301010C3400000020446174615365743D225265706F727473444D2E436F6E74616374732220446174615365744E616D653D22436F6E74616374732200010C1900000020446174615365744E616D653D22436F6E744669656C6473220000095661726961626C65730100055374796C650100">
  3.   <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
  4.   <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="15" RightMargin="70,4" TopMargin="0" BottomMargin="80,9625" ColumnWidth="0" ColumnPositions.Text="" Frame.Style="fsDash" HGuides.Text="" VGuides.Text="">
  5.     <TfrxMasterData Name="MasterData1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Height="122,04724409" Left="0" ParentFont="False" Top="96" Width="470,929438" OnAfterCalcHeight="MasterDataOnAfterCalcHeight" Columns="2" ColumnWidth="230,929133858268" ColumnGap="10" DataSetName="Groups" RowCount="0" Stretched="True">
  6.       <TfrxMemoView Name="GrMemo" Left="0" Top="0" Width="230,173228346457" Height="50" ShowHint="False" Frame.Color="10070188" Frame.Typ="15" Text=""/>
  7.       <TfrxMemoView Name="Memo1" Left="6" Top="6" Width="216,566929133858" Height="20" ShowHint="False" Color="14215660" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" GapX="4" GapY="2" ParentFont="False" Text="[Groups."80"]"/>
  8.       <TfrxMemoView Name="Memo2" Left="106" Top="27,45669291" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="92" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."92"]"/>
  9.       <TfrxMemoView Name="Memo3" Left="6" Top="27,45669291" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."92"]:"/>
  10.       <TfrxMemoView Name="Memo4" Left="106" Top="42,57480315" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="91" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."91"]"/>
  11.       <TfrxMemoView Name="Memo5" Left="6" Top="42,57480315" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."91"]:"/>
  12.       <TfrxMemoView Name="Memo6" Left="106" Top="57,69291339" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="3" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."3"]"/>
  13.       <TfrxMemoView Name="Memo7" Left="6" Top="57,69291339" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."3"]:"/>
  14.       <TfrxMemoView Name="Memo8" Left="106" Top="72,81102362" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="5" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."5"]"/>
  15.       <TfrxMemoView Name="Memo9" Left="6" Top="72,81102362" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."5"]:"/>
  16.       <TfrxMemoView Name="Memo10" Left="106" Top="87,92913386" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="15" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."15"]"/>
  17.       <TfrxMemoView Name="Memo11" Left="6" Top="87,92913386" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."15"]:"/>
  18.       <TfrxMemoView Name="Memo12" Left="106" Top="103,04724409" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="24" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."24"]"/>
  19.       <TfrxMemoView Name="Memo13" Left="6" Top="103,04724409" Width="101,10235" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."24"]:"/>
  20.     </TfrxMasterData>
  21.     <TfrxMasterData Name="MasterData2" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Height="125,77953" Left="0" ParentFont="False" Top="240" Width="470,929438" OnAfterCalcHeight="MasterDataOnAfterCalcHeight" Columns="2" ColumnWidth="230,929133858268" ColumnGap="10" DataSet="ReportsDM.Contacts" DataSetName="Contacts" RowCount="0" Stretched="True">
  22.       <TfrxMemoView Name="ContMemo" Left="0" Top="0" Width="230,173228346457" Height="50" ShowHint="False" Frame.Color="10070188" Frame.Typ="15" Text=""/>
  23.       <TfrxMemoView Name="Memo14" Left="6" Top="6" Width="216,56692913" Height="20" ShowHint="False" Color="14215660" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."1"]  [Contacts."2"]"/>
  24.       <TfrxMemoView Name="Memo15" Left="105,82677165" Top="28,45669291" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="92" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."92"]"/>
  25.       <TfrxMemoView Name="Memo16" Left="6" Top="28,45669291" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."92"]:"/>
  26.       <TfrxMemoView Name="Memo17" Left="105,82677165" Top="43,57480315" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="91" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."91"]"/>
  27.       <TfrxMemoView Name="Memo18" Left="6" Top="43,57480315" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."91"]:"/>
  28.       <TfrxMemoView Name="Memo19" Left="105,82677165" Top="58,69291339" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="3" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."3"]"/>
  29.       <TfrxMemoView Name="Memo20" Left="6" Top="58,69291339" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."3"]:"/>
  30.       <TfrxMemoView Name="Memo21" Left="105,82677165" Top="73,81102362" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="5" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."5"]"/>
  31.       <TfrxMemoView Name="Memo22" Left="6" Top="73,81102362" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."5"]:"/>
  32.       <TfrxMemoView Name="Memo23" Left="105,82677165" Top="89" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="15" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."15"]"/>
  33.       <TfrxMemoView Name="Memo24" Left="6" Top="89" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."15"]:"/>
  34.       <TfrxMemoView Name="Memo25" Left="105,82677165" Top="104" Width="117,16534457" Height="20" OnAfterData="FieldOnAfterData" ShowHint="False" StretchMode="smActualHeight" DataField="24" DataSet="ReportsDM.Contacts" DataSetName="Contacts" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[Contacts."24"]"/>
  35.       <TfrxMemoView Name="Memo26" Left="6" Top="104" Width="97,32282" Height="20" OnAfterData="FieldCaptionOnAfterData" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" GapX="4" GapY="2" ParentFont="False" Text="[ContFields."24"]:"/>
  36.     </TfrxMasterData>
  37.     <TfrxPageFooter Name="PageFooter1" Height="0" Left="0" Top="424" Width="470,929438">
  38.       <TfrxLineView Name="Line2" Left="-56,69291339" Top="0" Width="528" Height="0" ShowHint="False" Frame.Style="fsDash" Frame.Typ="4" Frame.Width="0,5"/>
  39.     </TfrxPageFooter>
  40.     <TfrxPageHeader Name="PageHeader1" Height="18,8976377952756" Left="0" Top="16" Width="470,929438">
  41.       <TfrxLineView Name="Line1" Left="472,062992125984" Top="0" Width="0" Height="816,377952755906" ShowHint="False" Frame.Style="fsDash" Frame.Typ="1" Frame.Width="0,1"/>
  42.       <TfrxLineView Name="Line3" Left="-0,755905511811024" Top="0" Width="0" Height="816,377952755906" ShowHint="False" Frame.Typ="1" Frame.Width="0,5"/>
  43.       <TfrxMemoView Name="Memo27" Left="-34" Top="0" Width="16" Height="468" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Rotation="90" VAlign="vaCenter" Text="EssentialPIM Printout"/>
  44.       <TfrxMemoView Name="Memo28" Left="-22" Top="0" Width="16" Height="476" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-11" Font.Name="Arial" Font.Style="4" ParentFont="False" Rotation="90" VAlign="vaCenter" Text="www.essentialpim.com"/>
  45.     </TfrxPageHeader>
  46.   </TfrxReportPage>
  47. </TfrxReport>
  48.