PC World Komputer 1997 May/Pcwk0597.iso/borland/cb/setup/cbuilder/data.z/BIOREP.DFM/BIOREP.txt

Text File | 1997-02-28 | 8KB | 345 lines

object BioForm: TBioForm
  Left = 178
  Top = 127
  Width = 721
  Height = 563
  HorzScrollBar.Range = 1200
  VertScrollBar.Range = 2000
  AutoScroll = False
  Caption = 'BioForm'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 14
  object DetailBand: TQRBand
    Left = 0
    Top = 57
    Width = 1200
    Height = 152
    Align = alTop
    BandType = rbDetail
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrInchesHV
    object QRDBText1: TQRDBText
      Left = 116
      Top = 12
      Width = 177
      Height = 17
      AlignToBand = False
      DataSource = DataSource1
      DataField = 'Common_Name'
    end
    object QRDBText3: TQRDBText
      Left = 116
      Top = 60
      Width = 177
      Height = 17
      AlignToBand = False
      DataSource = DataSource1
      DataField = 'Category'
    end
    object QRLabel1: TQRLabel
      Left = 8
      Top = 12
      Width = 105
      Height = 16
      Caption = 'Common name :'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRDBText4: TQRDBText
      Left = 116
      Top = 36
      Width = 177
      Height = 17
      AlignToBand = False
      DataSource = DataSource1
      DataField = 'Species Name'
    end
    object QRLabel2: TQRLabel
      Left = 8
      Top = 36
      Width = 77
      Height = 16
      Caption = 'Real name :'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRLabel3: TQRLabel
      Left = 8
      Top = 60
      Width = 65
      Height = 16
      Caption = 'Category :'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRDBText5: TQRDBText
      Left = 116
      Top = 84
      Width = 37
      Height = 17
      AlignToBand = False
      DataSource = DataSource1
      DataField = 'Length (cm)'
    end
    object QRLabel4: TQRLabel
      Left = 8
      Top = 84
      Width = 68
      Height = 16
      Caption = 'Size (CM) :'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRLabel5: TQRLabel
      Left = 8
      Top = 124
      Width = 79
      Height = 16
      Caption = 'Description :'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object QRDBText2: TQRDBText
      Left = 116
      Top = 124
      Width = 625
      Height = 17
      AlignToBand = False
      DataSource = DataSource1
      DataField = 'Notes'
    end
    object DBImage1: TDBImage
      Left = 352
      Top = 12
      Width = 169
      Height = 105
      DataField = 'Graphic'
      DataSource = DataSource1
      Stretch = True
      TabOrder = 0
    end
  end
  object TitleBand: TQRBand
    Left = 0
    Top = 0
    Width = 1200
    Height = 57
    Align = alTop
    BandType = rbTitle
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object Image1: TImage
      Left = 12
      Top = 4
      Width = 69
      Height = 33
      Picture.Data = {<image000.bmp>}
      Stretch = True
    end
    object QRLabel6: TQRLabel
      Left = 96
      Top = 4
      Width = 193
      Height = 36
      Caption = 'QuickReport'
      AlignToBand = False
      Font.Color = 8404992
      Font.Height = -32
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRLabel7: TQRLabel
      Left = 300
      Top = 20
      Width = 109
      Height = 16
      Caption = 'for C++ Builder'
      AlignToBand = False
      Font.Color = 8404992
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRLabel8: TQRLabel
      Left = 572
      Top = 20
      Width = 167
      Height = 16
      Caption = 'Copyright (c) 1996 QSD AS'
      AlignToBand = False
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold, fsItalic]
      ParentFont = False
    end
    object QRShape2: TQRShape
      Left = 8
      Top = 44
      Width = 733
      Height = 5
      Brush.Color = clNavy
      Shape = qrsRectangle
    end
  end
  object QRBand1: TQRBand
    Left = 0
    Top = 233
    Width = 1200
    Height = 8
    Align = alTop
    BandType = rbDetail
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object QRShape1: TQRShape
      Left = 8
      Top = 3
      Width = 737
      Height = 1
      Shape = qrsRectangle
    end
  end
  object QRBand2: TQRBand
    Left = 0
    Top = 209
    Width = 1200
    Height = 24
    Align = alTop
    BandType = rbPageFooter
    Color = clWhite
    ForceNewPage = False
    Frame.Width = 0
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    Ruler = qrrNone
    object QRSysData1: TQRSysData
      Left = 676
      Top = 4
      Width = 65
      Height = 17
      Alignment = taRightJustify
      AlignToBand = True
      Data = qrsPageNumber
      Text = 'Page '
    end
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'BCDEMOS'
    TableName = 'BIOLIFE.DB'
    Left = 40
    Top = 272
    object Table1SpeciesNo: TFloatField
      FieldName = 'Species No'
    end
    object Table1Category: TStringField
      FieldName = 'Category'
      Size = 15
    end
    object Table1Common_Name: TStringField
      FieldName = 'Common_Name'
      Size = 30
    end
    object Table1SpeciesName: TStringField
      FieldName = 'Species Name'
      Size = 40
    end
    object Table1Lengthcm: TFloatField
      FieldName = 'Length (cm)'
    end
    object Table1Length_In: TFloatField
      FieldName = 'Length_In'
    end
    object Table1Notes: TMemoField
      FieldName = 'Notes'
      BlobType = ftMemo
      Size = 50
    end
    object Table1Graphic: TGraphicField
      FieldName = 'Graphic'
      BlobType = ftGraphic
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 72
    Top = 272
  end
  object Biorep: TQuickReport
    DataSource = DataSource1
    ColumnMarginInches = 0
    ColumnMarginMM = 0
    Columns = 1
    DisplayPrintDialog = False
    LeftMarginInches = 0
    LeftMarginMM = 0
    Orientation = poPortrait
    PageFrame.DrawTop = False
    PageFrame.DrawBottom = False
    PageFrame.DrawLeft = False
    PageFrame.DrawRight = False
    PaperLength = 0
    PaperSize = qrpDefault
    PaperWidth = 0
    ReportTitle = 'QuickReport Biolife demo report'
    RestartData = True
    SQLCompatible = False
    TitleBeforeHeader = False
    Left = 4
    Top = 272
  end
  object QRDetailLink1: TQRDetailLink
    PrintBefore = False
    Left = 104
    Top = 272
  end
end