object frmSrwLink: TfrmSrwLink
  Left = 126
  Top = 134
  HelpContext = 1016
  BorderStyle = bsDialog
  Caption = 'Link Tables'
  ClientHeight = 313
  ClientWidth = 329
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  KeyPreview = True
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  OnKeyDown = FormKeyDown
  TextHeight = 13
  object Bevel1: TBevel
    Left = 216
    Top = 8
    Width = 2
    Height = 121
  end
  object imgShazam: TImage
    Left = 8
    Top = 53
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {<image000.bmp>}
  end
  object cmdOk: TBitBtn
    Left = 224
    Top = 8
    Width = 97
    Height = 25
    Caption = '&OK'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = cmdOkClick
    Style = bsNew
  end
  object cmdCancel: TBitBtn
    Left = 224
    Top = 40
    Width = 97
    Height = 25
    Caption = '&Cancel'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = cmdCancelClick
    Style = bsNew
  end
  object cmdHelp: TBitBtn
    Left = 224
    Top = 104
    Width = 97
    Height = 25
    Caption = '&Help'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = cmdHelpClick
    Style = bsNew
  end
  object panOptions: TPanel
    Left = 8
    Top = 136
    Width = 313
    Height = 169
    TabOrder = 7
    object labMsg: TLabel
      Left = 9
      Top = 12
      Width = 212
      Height = 13
      Caption = 'where all records are included from...'
    end
    object labTablesBoth: TLabel
      Left = 48
      Top = 40
      Width = 257
      Height = 25
      AutoSize = False
      Caption = 'both tables with matching records only.'
      WordWrap = True
      OnClick = TablesClick
    end
    object labTablesLeft: TLabel
      Tag = 1
      Left = 48
      Top = 72
      Width = 249
      Height = 41
      AutoSize = False
      Caption = 'Left'
      WordWrap = True
      OnClick = TablesClick
    end
    object labTablesRight: TLabel
      Tag = 2
      Left = 48
      Top = 120
      Width = 249
      Height = 41
      AutoSize = False
      Caption = 'Right'
      WordWrap = True
      OnClick = TablesClick
    end
    object imgCheck: TImage
      Left = 10
      Top = 37
      Width = 32
      Height = 32
      AutoSize = True
      Picture.Data = {<image001.bmp>}
    end
  end
  object cmbJoinOper: TComboBox
    Left = 56
    Top = 58
    Width = 153
    Height = 21
    Style = csDropDownList
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ItemHeight = 13
    Items.Strings = (
      'Is Equal To'
      'Is Greater Than'
      'Is Greater or Equal To'
      'Is Less Than'
      'Is Less or Equal To'
      'Is Not Equal To')
    ParentFont = False
    TabOrder = 1
  end
  object panTable1: TPanel
    Left = 8
    Top = 8
    Width = 201
    Height = 41
    TabOrder = 0
    object labTable1: TLabel
      Left = 8
      Top = 4
      Width = 185
      Height = 13
      AutoSize = False
      Caption = 'CUSTOMER'
    end
    object labField1: TLabel
      Left = 8
      Top = 20
      Width = 185
      Height = 13
      AutoSize = False
      Caption = 'CustNo'
    end
  end
  object panTable2: TPanel
    Left = 8
    Top = 88
    Width = 201
    Height = 41
    TabOrder = 2
    object labTable2: TLabel
      Left = 8
      Top = 4
      Width = 185
      Height = 13
      AutoSize = False
      Caption = 'ORDERS'
    end
    object labField2: TLabel
      Left = 8
      Top = 20
      Width = 185
      Height = 13
      AutoSize = False
      Caption = 'CustNo'
    end
  end
  object cmdDelete: TBitBtn
    Left = 224
    Top = 72
    Width = 97
    Height = 25
    Caption = '&Delete'
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = cmdDeleteClick
    Style = bsNew
  end
end