rptind.pas

suite component ace report

unit Rptind;

{ ----------------------------------------------------------------
  Ace Reporter Version 1.0
  Copyright 1995 SCT Accociates, Inc.
  Written by Kevin Maher, Steve Tyrakowski
  ---------------------------------------------------------------- }

interface

uses
  SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
  Forms, Dialogs, Sctvar, StdCtrls, sctctrl, DB, DBTables, Sctrep, ExtCtrls,
  DBCtrls, AcePage;

type
  TformRpt4 = class(TForm)
    rband1: TSctBand;
    ReportHeaderLevel: TSctLevel;
    rband2: TSctBand;
    PageHeaderLevel: TSctLevel;
    rband3: TSctBand;
    DetailLevel: TSctLevel;
    rband4: TSctBand;
    PageFooterLevel: TSctLevel;
    rband5: TSctBand;
    ReportFooterLevel: TSctLevel;
    rgrouppage1: TSctGrouppage;
    rreport1: TSctReport;
    rsctvarlabel1: TSctvarlabel;
    svarDateTime: TSctDateTimeVar;
    svarPage: TSctPageVar;
    animals: TTable;
    DataSource1: TDataSource;
    animalsNAME: TSctdbvar;
    animalsSIZE: TSctdbvar;
    animalsWEIGHT: TSctdbvar;
    animalsAREA: TSctdbvar;
    animalsBMP: TSctdbvar;
    animalsNAME2: TStringField;
    animalsSIZE2: TSmallintField;
    animalsWEIGHT2: TSmallintField;
    animalsAREA2: TStringField;
    animalsBMP2: TBlobField;
    rsctvarlabel2: TSctvarlabel;
    rsctvarlabel3: TSctvarlabel;
    rsctvarlabel4: TSctvarlabel;
    rscttextlabel1: TSctTextLabel;
    rscttextlabel3: TSctTextLabel;
    rscttextlabel4: TSctTextLabel;
    rscttextlabel5: TSctTextLabel;
    rsctvarlabel6: TSctvarlabel;
    rsctvarlabel5: TSctvarlabel;
    rscttextlabel6: TSctTextLabel;
    SctShape1: TSctShape;
    SctImageLabel1: TSctImageLabel;
    SctShape2: TSctShape;
    DataSourceGuide: TSctDataSourceGuide;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  formRpt4: TformRpt4;

implementation

{$R *.DFM}

end.