home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / delphi / cbsuite.lzh / SU1SRC.ZIP / FDEMO06.DFM / FDEMO06.txt
Encoding:
Text File  |  1996-12-09  |  8.7 KB  |  371 lines
  1. object Form06: TForm06
  2.   Left = 139
  3.   Top = 203
  4.   Width = 605
  5.   Height = 466
  6.   ActiveControl = Panel1
  7.   Caption = 'Form06'
  8.   Font.Color = clBlack
  9.   Font.Height = -14
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   PixelsPerInch = 120
  13.   Position = poScreenCenter
  14.   OnCreate = FormCreate
  15.   TextHeight = 16
  16.   object Panel1: TPanel
  17.     Left = 0
  18.     Top = 0
  19.     Width = 597
  20.     Height = 41
  21.     Align = alTop
  22.     TabOrder = 0
  23.     object DBNavigator: TDBNavigator
  24.       Left = 10
  25.       Top = 6
  26.       Width = 291
  27.       Height = 31
  28.       DataSource = DataSource1
  29.       Ctl3D = False
  30.       ParentCtl3D = False
  31.       TabOrder = 0
  32.     end
  33.     object View: TBitBtn
  34.       Left = 404
  35.       Top = 4
  36.       Width = 89
  37.       Height = 33
  38.       Caption = '&View'
  39.       TabOrder = 1
  40.       OnClick = ViewClick
  41.     end
  42.     object Exit: TBitBtn
  43.       Left = 500
  44.       Top = 4
  45.       Width = 89
  46.       Height = 33
  47.       Caption = '&Exit'
  48.       ModalResult = 2
  49.       TabOrder = 2
  50.       OnClick = ExitClick
  51.     end
  52.   end
  53.   object Panel2: TPanel
  54.     Left = 0
  55.     Top = 41
  56.     Width = 597
  57.     Height = 398
  58.     Align = alClient
  59.     BevelInner = bvLowered
  60.     BorderWidth = 4
  61.     Caption = 'Panel2'
  62.     TabOrder = 1
  63.     object ScrollBox: TScrollBox
  64.       Left = 6
  65.       Top = 6
  66.       Width = 585
  67.       Height = 386
  68.       HorzScrollBar.Margin = 6
  69.       HorzScrollBar.Range = 310
  70.       VertScrollBar.Margin = 6
  71.       VertScrollBar.Range = 186
  72.       Align = alClient
  73.       AutoScroll = False
  74.       TabOrder = 0
  75.       object Label1: TLabel
  76.         Left = 8
  77.         Top = 6
  78.         Width = 67
  79.         Height = 16
  80.         Caption = 'Species No'
  81.         FocusControl = EditSpeciesNo
  82.         Font.Color = clBlack
  83.         Font.Height = -13
  84.         Font.Name = 'Arial'
  85.         Font.Style = []
  86.         ParentFont = False
  87.       end
  88.       object Label2: TLabel
  89.         Left = 91
  90.         Top = 6
  91.         Width = 52
  92.         Height = 16
  93.         Caption = 'Category'
  94.         FocusControl = EditCategory
  95.         Font.Color = clBlack
  96.         Font.Height = -13
  97.         Font.Name = 'Arial'
  98.         Font.Style = []
  99.         ParentFont = False
  100.       end
  101.       object Label3: TLabel
  102.         Left = 8
  103.         Top = 50
  104.         Width = 93
  105.         Height = 16
  106.         Caption = 'Common_Name'
  107.         FocusControl = EditCommon_Name
  108.         Font.Color = clBlack
  109.         Font.Height = -13
  110.         Font.Name = 'Arial'
  111.         Font.Style = []
  112.         ParentFont = False
  113.       end
  114.       object Label4: TLabel
  115.         Left = 8
  116.         Top = 94
  117.         Width = 85
  118.         Height = 16
  119.         Caption = 'Species Name'
  120.         FocusControl = EditSpeciesName
  121.         Font.Color = clBlack
  122.         Font.Height = -13
  123.         Font.Name = 'Arial'
  124.         Font.Style = []
  125.         ParentFont = False
  126.       end
  127.       object Label5: TLabel
  128.         Left = 8
  129.         Top = 138
  130.         Width = 69
  131.         Height = 16
  132.         Caption = 'Length (cm)'
  133.         FocusControl = EditLengthcm
  134.         Font.Color = clBlack
  135.         Font.Height = -13
  136.         Font.Name = 'Arial'
  137.         Font.Style = []
  138.         ParentFont = False
  139.       end
  140.       object Label6: TLabel
  141.         Left = 90
  142.         Top = 138
  143.         Width = 56
  144.         Height = 16
  145.         Caption = 'Length_In'
  146.         FocusControl = EditLength_In
  147.         Font.Color = clBlack
  148.         Font.Height = -13
  149.         Font.Name = 'Arial'
  150.         Font.Style = []
  151.         ParentFont = False
  152.       end
  153.       object EditSpeciesNo: TDBEdit
  154.         Left = 8
  155.         Top = 24
  156.         Width = 70
  157.         Height = 24
  158.         Color = clSilver
  159.         DataField = 'Species No'
  160.         DataSource = DataSource1
  161.         Font.Color = clWhite
  162.         Font.Height = -13
  163.         Font.Name = 'Arial'
  164.         Font.Style = []
  165.         MaxLength = 0
  166.         ParentFont = False
  167.         TabOrder = 0
  168.       end
  169.       object EditCategory: TDBEdit
  170.         Left = 91
  171.         Top = 24
  172.         Width = 105
  173.         Height = 24
  174.         Color = clSilver
  175.         DataField = 'Category'
  176.         DataSource = DataSource1
  177.         Font.Color = clWhite
  178.         Font.Height = -13
  179.         Font.Name = 'Arial'
  180.         Font.Style = []
  181.         MaxLength = 15
  182.         ParentFont = False
  183.         TabOrder = 1
  184.       end
  185.       object EditCommon_Name: TDBEdit
  186.         Left = 8
  187.         Top = 68
  188.         Width = 210
  189.         Height = 24
  190.         Color = clSilver
  191.         DataField = 'Common_Name'
  192.         DataSource = DataSource1
  193.         Font.Color = clWhite
  194.         Font.Height = -13
  195.         Font.Name = 'Arial'
  196.         Font.Style = []
  197.         MaxLength = 30
  198.         ParentFont = False
  199.         TabOrder = 2
  200.       end
  201.       object EditSpeciesName: TDBEdit
  202.         Left = 8
  203.         Top = 112
  204.         Width = 280
  205.         Height = 24
  206.         Color = clSilver
  207.         DataField = 'Species Name'
  208.         DataSource = DataSource1
  209.         Font.Color = clWhite
  210.         Font.Height = -13
  211.         Font.Name = 'Arial'
  212.         Font.Style = []
  213.         MaxLength = 40
  214.         ParentFont = False
  215.         TabOrder = 3
  216.       end
  217.       object EditLengthcm: TDBEdit
  218.         Left = 8
  219.         Top = 156
  220.         Width = 70
  221.         Height = 24
  222.         Color = clSilver
  223.         DataField = 'Length (cm)'
  224.         DataSource = DataSource1
  225.         Font.Color = clWhite
  226.         Font.Height = -13
  227.         Font.Name = 'Arial'
  228.         Font.Style = []
  229.         MaxLength = 0
  230.         ParentFont = False
  231.         TabOrder = 4
  232.       end
  233.       object EditLength_In: TDBEdit
  234.         Left = 90
  235.         Top = 156
  236.         Width = 143
  237.         Height = 24
  238.         Color = clSilver
  239.         DataField = 'Length_In'
  240.         DataSource = DataSource1
  241.         Font.Color = clWhite
  242.         Font.Height = -13
  243.         Font.Name = 'Arial'
  244.         Font.Style = []
  245.         MaxLength = 0
  246.         ParentFont = False
  247.         TabOrder = 5
  248.       end
  249.       object DBImage1: TDBImage
  250.         Left = 304
  251.         Top = 8
  252.         Width = 273
  253.         Height = 177
  254.         DataField = 'Graphic'
  255.         DataSource = DataSource1
  256.         TabOrder = 6
  257.       end
  258.       object DBMemo1: TDBMemo
  259.         Left = 8
  260.         Top = 196
  261.         Width = 569
  262.         Height = 173
  263.         Color = clWhite
  264.         DataField = 'Notes'
  265.         DataSource = DataSource1
  266.         Font.Color = clBlack
  267.         Font.Height = -13
  268.         Font.Name = 'Arial'
  269.         Font.Style = []
  270.         ParentFont = False
  271.         TabOrder = 7
  272.       end
  273.     end
  274.   end
  275.   object DataSource1: TDataSource
  276.     DataSet = Table1
  277.     Left = 287
  278.     Top = 5
  279.   end
  280.   object Table1: TTable
  281.     Active = True
  282.     DatabaseName = 'DBDEMOS'
  283.     TableName = 'biolife.db'
  284.     Left = 260
  285.     Top = 5
  286.     object Table1SpeciesNo: TFloatField
  287.       FieldName = 'Species No'
  288.     end
  289.     object Table1Category: TStringField
  290.       FieldName = 'Category'
  291.       Size = 15
  292.     end
  293.     object Table1Common_Name: TStringField
  294.       FieldName = 'Common_Name'
  295.       Size = 30
  296.     end
  297.     object Table1SpeciesName: TStringField
  298.       FieldName = 'Species Name'
  299.       Size = 40
  300.     end
  301.     object Table1Lengthcm: TFloatField
  302.       FieldName = 'Length (cm)'
  303.     end
  304.     object Table1Length_In: TFloatField
  305.       FieldName = 'Length_In'
  306.       DisplayFormat = '#####'
  307.     end
  308.     object Table1Notes: TMemoField
  309.       FieldName = 'Notes'
  310.       Size = 50
  311.     end
  312.     object Table1Graphic: TGraphicField
  313.       FieldName = 'Graphic'
  314.     end
  315.   end
  316.   object DBPrintWin1: TDBPrintWin
  317.     About = 'Version 5.32'
  318.     AboutRegistered = 'TOM SNIDER'
  319.     HeaderFont.Color = clWindowText
  320.     HeaderFont.Height = 16
  321.     HeaderFont.Name = 'Arial'
  322.     HeaderFont.Style = []
  323.     Font.Color = clWindowText
  324.     Font.Height = 16
  325.     Font.Name = 'Arial'
  326.     Font.Style = []
  327.     FooterFont.Color = clWindowText
  328.     FooterFont.Height = 12
  329.     FooterFont.Name = 'Arial'
  330.     FooterFont.Style = []
  331.     FrameObjects = True
  332.     clBtnFaceAsWhite = True
  333.     OutputTo = poViewer
  334.     Orientation = Default
  335.     Units = poInches
  336.     ViewButtonVisible = False
  337.     ShowCancelDialog = True
  338.     LineWidth = 0
  339.     Copies = 1
  340.     GridBackDrop = False
  341.     GridBackDropUnits = poInches
  342.     ZoomPercentage = 25.000000000000000000
  343.     HeaderTop = 0.500000000000000000
  344.     HeaderLeft = 0.500000000000000000
  345.     HeaderStringLeft = '                                  '
  346.     HeaderStringCenter = '                                  '
  347.     HeaderStringRight = '                                  '
  348.     HeaderEnabled = True
  349.     HeaderOutlined = False
  350.     HeaderFilled = False
  351.     TextColor = clBlack
  352.     ViewBkColor = 11234567
  353.     ViewHeading = 'Printit Viewer'
  354.     HeadingColor = clSilver
  355.     FrameStyle = frThin
  356.     FooterTop = 10.170000000000000000
  357.     FooterString = '                                                  '
  358.     FooterEnabled = True
  359.     FooterOutlined = False
  360.     FooterFilled = False
  361.     FixSansSerif = True
  362.     FooterStringLeft = 'Printed on @Date at @Time'
  363.     FooterStringRight = 'Page @Page'
  364.     BorderLeft = 0.500000000000000000
  365.     BorderRight = 0.500000000000000000
  366.     LineSpacing = 2.800000000000000000
  367.     Left = 336
  368.     Top = 8
  369.   end
  370. end
  371.