object FormExpandPanel: TFormExpandPanel
  Left = 195
  Top = 183
  Caption = 'FormExpandPanel'
  ClientHeight = 337
  ClientWidth = 528
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object wwDBGrid1: TwwDBGrid
    Left = 0
    Top = 0
    Width = 528
    Height = 185
    ControlType.Strings = (
      'selected;CheckBox;Yes;No'
      'EDUCATION;CustomEdit;wwRadioGroup1;F'
      'SEX;CustomEdit;wwRadioGroup2;F'
      'MARRIED;CustomEdit;wwCheckBox2;F'
      'RINTERESTS;RichEdit;wwDBRichEdit2;T'
      'IMAGE;CustomEdit;DBImage2;T'
      'PAYMETHOD;CustomEdit;wwRadioGroup2;F'
      'Name;CustomEdit;wwExpandButton1;F'
      'ShippingAddress;CustomEdit;wwExpandButton2;F')
    Selected.Strings = (
      'ACCT_NBR'#9'6'#9'Account #'#9'F'
      'Name'#9'19'#9'Name'#9'F'
      'ShippingAddress'#9'39'#9'ShippingAddress'#9'F'
      'RINTERESTS'#9'15'#9'Interests/Hobbies'#9'F')
    IniAttributes.FileName = 'delphi32.ini.ini'
    IniAttributes.Delimiter = ';;'
    TitleColor = 12615680
    FixedCols = 1
    ShowHorzScrollBar = True
    Align = alTop
    DataSource = DataSource1
    Options = [dgEditing, dgAlwaysShowEditor, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgWordWrap, dgFixedResizable, dgProportionalColResize]
    TabOrder = 0
    TitleAlignment = taCenter
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = True
    UseTFields = False
    PaintOptions.BackgroundBitmap.Data = {
      07544269746D617056020000424D560200000000000076000000280000001E00
      00001E0000000100040000000000E0010000C40E0000C40E0000100000000000
      0000D9EEEE00C7E0E000EBFEFE00C6DFDF00B3D0D000EDFFFF00DAEFEF00B2CF
      CF00A1C0C000FFFFFF0000000000000000000000000000000000000000000000
      0000600111111111111333111116660110000001111110011111331111100011
      3000600001110601111111110000011331000000000000011111111000000011
      1100600000001100001111111006001111000000001111166600001111126011
      1000111001160006666666014411060011001100601000006666660111110001
      3300110666000000006662260001001111000000000000000006622226611111
      1000000111100011000662222260111106000601111000010006662222620113
      1100660111060000000600062662611111000601106660000000011066026111
      0600660000060100001062662262201102000600000600000000626622626011
      0200600006666000000062662262601102000066666666011000066622660011
      0600266622266001100000666660001006002226222660011100100000000000
      6600200666660000113131000000000662000000000601100341330011000066
      2200000006600000134000011111106626000000000111111111111111310066
      6600000001144333111331111110066600001000000114311113100000100060
      0000310066661410001111000000000001003110022201302011111111100000
      1100111002220000000011333110000000000010022222013100011310022000
      0000}
    PaintOptions.AlternatingRowRegions = [arrDataColumns]
    PaintOptions.FastRecordScrolling = False
    PaintOptions.AlternatingRowColor = clSilver
    PaintOptions.BackgroundOptions = [coFillDataCells, coBlendFixedRow, coBlendFixedColumn, coBlendAlternatingRow]
  end
  object wwDBRichEdit2: TwwDBRichEdit
    Left = 176
    Top = 40
    Width = 95
    Height = 16
    AutoURLDetect = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    GutterWidth = 3
    HideSelection = False
    ParentFont = False
    PrintJobName = 'Delphi 5'
    TabOrder = 1
    EditorOptions = [reoShowSaveExit, reoShowPrint, reoShowPrintPreview, reoShowPageSetup, reoShowFormatBar, reoShowToolBar, reoShowStatusBar, reoShowHints, reoShowRuler, reoShowInsertObject, reoCloseOnEscape, reoFlatButtons, reoShowSpellCheck, reoShowMainMenuIcons, reoShowZoomCombo]
    EditorCaption = 'Edit Rich Text'
    EditorPosition.Left = 0
    EditorPosition.Top = 0
    EditorPosition.Width = 0
    EditorPosition.Height = 0
    MeasurementUnits = muInches
    PrintMargins.Top = 1.000000000000000000
    PrintMargins.Bottom = 1.000000000000000000
    PrintMargins.Left = 1.000000000000000000
    PrintMargins.Right = 1.000000000000000000
    PrintHeader.VertMargin = 0.500000000000000000
    PrintHeader.Font.Charset = DEFAULT_CHARSET
    PrintHeader.Font.Color = clWindowText
    PrintHeader.Font.Height = -11
    PrintHeader.Font.Name = 'MS Sans Serif'
    PrintHeader.Font.Style = []
    PrintFooter.VertMargin = 0.500000000000000000
    PrintFooter.Font.Charset = DEFAULT_CHARSET
    PrintFooter.Font.Color = clWindowText
    PrintFooter.Font.Height = -11
    PrintFooter.Font.Name = 'MS Sans Serif'
    PrintFooter.Font.Style = []
    RichEditVersion = 2
    Data = {
      8B0000007B5C727466315C616E73695C616E7369637067313235325C64656666
      305C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C
      666368617273657430204D532053616E732053657269663B7D7D0D0A5C766965
      776B696E64345C7563315C706172645C66305C66733136207777444252696368
      45646974325C7061720D0A7D0D0A00}
  end
  object wwDataInspector1: TwwDataInspector
    Left = 272
    Top = 40
    Width = 211
    Height = 36
    DisableThemes = False
    Ctl3D = False
    CaptionColor = clNone
    ParentCtl3D = False
    ScrollBars = ssNone
    TabOrder = 2
    DataSource = DataSource1
    Items = <
      item
        DataSource = DataSource1
        DataField = 'FIRST_NAME'
        Caption = 'First Name'
        WordWrap = False
      end
      item
        DataSource = DataSource1
        DataField = 'LAST_NAME'
        Caption = 'Last Name'
        WordWrap = False
      end>
    CaptionWidth = 107
    Options = [ovColumnResize, ovRowResize, ovEnterToTab, ovCenterCaptionVert]
    CaptionFont.Charset = DEFAULT_CHARSET
    CaptionFont.Color = clWindowText
    CaptionFont.Height = -11
    CaptionFont.Name = 'MS Sans Serif'
    CaptionFont.Style = []
    LineStyleCaption = ovDottedLine
    LineStyleData = ovDottedLine
    CaptionIndent = 2
    Visible = False
  end
  object wwExpandButton1: TwwExpandButton
    Left = 517
    Top = 120
    Width = 118
    Height = 16
    TabStop = False
    DisableThemes = False
    Grid = wwDataInspector1
    Caption = 'wwExpandButton1'
    Color = clWindow
    ParentColor = False
    ShowText = True
    TabOrder = 3
  end
  object wwExpandButton2: TwwExpandButton
    Left = 40
    Top = 136
    Width = 238
    Height = 16
    TabStop = False
    DisableThemes = False
    Grid = wwRecordViewPanel1
    OnBeforeExpand = wwExpandButton2BeforeExpand
    OnAfterExpand = wwExpandButton2AfterExpand
    Caption = 'wwExpandButton1'
    Color = clWindow
    ParentColor = False
    ShowText = True
    TabOrder = 4
  end
  object wwDBRichEdit1: TwwDBRichEdit
    Left = 0
    Top = 178
    Width = 528
    Height = 159
    Align = alBottom
    AutoURLDetect = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    GutterWidth = 3
    HideSelection = False
    ParentFont = False
    PrintJobName = 'Delphi 5'
    TabOrder = 5
    EditorOptions = [reoShowSaveExit, reoShowPrint, reoShowPrintPreview, reoShowPageSetup, reoShowFormatBar, reoShowToolBar, reoShowStatusBar, reoShowHints, reoShowRuler, reoShowInsertObject, reoCloseOnEscape, reoFlatButtons, reoShowSpellCheck, reoShowMainMenuIcons, reoShowZoomCombo]
    EditorCaption = 'Edit Rich Text'
    EditorPosition.Left = 0
    EditorPosition.Top = 0
    EditorPosition.Width = 0
    EditorPosition.Height = 0
    MeasurementUnits = muInches
    PrintMargins.Top = 1.000000000000000000
    PrintMargins.Bottom = 1.000000000000000000
    PrintMargins.Left = 1.000000000000000000
    PrintMargins.Right = 1.000000000000000000
    PrintHeader.VertMargin = 0.500000000000000000
    PrintHeader.Font.Charset = DEFAULT_CHARSET
    PrintHeader.Font.Color = clWindowText
    PrintHeader.Font.Height = -11
    PrintHeader.Font.Name = 'MS Sans Serif'
    PrintHeader.Font.Style = []
    PrintFooter.VertMargin = 0.500000000000000000
    PrintFooter.Font.Charset = DEFAULT_CHARSET
    PrintFooter.Font.Color = clWindowText
    PrintFooter.Font.Height = -11
    PrintFooter.Font.Name = 'MS Sans Serif'
    PrintFooter.Font.Style = []
    RichEditVersion = 2
    Data = {
      5D0100007B5C727466315C616E73695C616E7369637067313235325C64656666
      305C6465666C616E67313033337B5C666F6E7474626C7B5C66305C666E696C5C
      6663686172736574302054696D6573204E657720526F6D616E3B7D7D0D0A5C76
      6965776B696E64345C7563315C706172645C66305C6673323220546869732064
      656D6F2064656D6F6E7374726174657320616E6F7468657220757365206F6620
      74686520657870616E6420627574746F6E20636F6E74726F6C2077697468696E
      2074686520677269642E2020546865206772696420757365732074776F206361
      6C63756C61746564206669656C647320746F20646973706C617920746865206E
      616D6520616E642074686520616464726573732E202054686520757365722063
      616E20657870616E642074686573652063616C63756C61746564206669656C64
      7320746F20656469742074686569722076616C7565732E5C7061720D0A7D0D0A
      00}
  end
  object Panel1: TPanel
    Left = 64
    Top = 208
    Width = 233
    Height = 113
    TabOrder = 6
    Visible = False
  end
  object wwRecordViewPanel1: TwwRecordViewPanel
    Left = 183
    Top = 208
    Width = 337
    Height = 113
    HorzScrollBar.Margin = 6
    HorzScrollBar.Range = 299
    VertScrollBar.Increment = 23
    VertScrollBar.Margin = 6
    VertScrollBar.Range = 606
    AutoScroll = False
    TabOrder = 7
    Visible = False
    DataSource = DataSource1
    ControlOptions = []
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Selected.Strings = (
      'ACCT_NBR'#9'10'#9'Account #'#9#9
      'FIRST_NAME'#9'7'#9'First'#9#9
      'LAST_NAME'#9'5'#9'Last'#9#9
      'RINTERESTS'#9'33'#9'Interests/Hobbies'#9#9
      'IMAGE'#9'8'#9'Photo'#9#9
      'PAYMETHOD'#9'10'#9'PAYMETHOD'#9#9
      'BALANCEDUE'#9'10'#9'BALANCEDUE'#9#9
      'SEX'#9'15'#9'Sex'#9#9
      'MARRIED'#9'9'#9'Married?'#9#9
      'CITY'#9'9'#9'CITY'#9#9
      'EDUCATION'#9'31'#9'Highest level of Education:'#9#9
      'ADDRESS_1'#9'13'#9'ADDRESS_1'#9#9
      'STATE'#9'5'#9'STATE'#9#9
      'ZIP'#9'5'#9'ZIP'#9#9
      'TELEPHONE'#9'12'#9'TELEPHONE'#9#9
      'DATE_OPEN'#9'14'#9'DATE_OPEN'#9#9
      'INTERESTS'#9'33'#9'INTERESTS'#9#9
      'SS_NUMBER'#9'11'#9'SS_NUMBER'#9#9
      'PICTURE'#9'15'#9'PICTURE'#9#9
      'BIRTH_DATE'#9'11'#9'BIRTH_DATE'#9#9
      'RISK_LEVEL'#9'10'#9'RISK_LEVEL'#9#9
      'OCCUPATION'#9'20'#9'OCCUPATION'#9#9
      'OBJECTIVES'#9'10'#9'OBJECTIVES'#9#9
      'CREDRATING'#9'11'#9'CREDRATING'#9#9
      'Name'#9'40'#9'Name'#9#9
      'ShippingAddress'#9'60'#9'ShippingAddress'#9#9)
  end
  object DataSource1: TDataSource
    DataSet = ClientDataSet1
    Left = 8
    Top = 8
  end
  object ClientDataSet1: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    OnCalcFields = ClientDataSet1CalcFields
    Left = 48
    Top = 8
    Data = {
      [encoded data, 222272 characters]
      67696E6565720853656375726974790141}
    object ClientDataSet1ACCT_NBR: TFloatField
      FieldName = 'ACCT_NBR'
    end
    object ClientDataSet1FIRST_NAME: TStringField
      FieldName = 'FIRST_NAME'
    end
    object ClientDataSet1LAST_NAME: TStringField
      FieldName = 'LAST_NAME'
    end
    object ClientDataSet1RINTERESTS: TBlobField
      FieldName = 'RINTERESTS'
      BlobType = ftTypedBinary
      Size = 1
    end
    object ClientDataSet1IMAGE: TBlobField
      FieldName = 'IMAGE'
      BlobType = ftTypedBinary
      Size = 1
    end
    object ClientDataSet1PAYMETHOD: TSmallintField
      FieldName = 'PAYMETHOD'
    end
    object ClientDataSet1BALANCEDUE: TFloatField
      FieldName = 'BALANCEDUE'
    end
    object ClientDataSet1SEX: TStringField
      FieldName = 'SEX'
      Size = 6
    end
    object ClientDataSet1MARRIED: TBooleanField
      FieldName = 'MARRIED'
    end
    object ClientDataSet1CITY: TStringField
      FieldName = 'CITY'
    end
    object ClientDataSet1EDUCATION: TSmallintField
      FieldName = 'EDUCATION'
    end
    object ClientDataSet1ADDRESS_1: TStringField
      FieldName = 'ADDRESS_1'
    end
    object ClientDataSet1STATE: TStringField
      FieldName = 'STATE'
      Size = 2
    end
    object ClientDataSet1ZIP: TStringField
      FieldName = 'ZIP'
      Size = 5
    end
    object ClientDataSet1TELEPHONE: TStringField
      FieldName = 'TELEPHONE'
      Size = 12
    end
    object ClientDataSet1DATE_OPEN: TDateField
      FieldName = 'DATE_OPEN'
    end
    object ClientDataSet1INTERESTS: TStringField
      FieldName = 'INTERESTS'
      Size = 120
    end
    object ClientDataSet1SS_NUMBER: TFloatField
      FieldName = 'SS_NUMBER'
    end
    object ClientDataSet1PICTURE: TStringField
      FieldName = 'PICTURE'
      Size = 15
    end
    object ClientDataSet1BIRTH_DATE: TDateField
      FieldName = 'BIRTH_DATE'
    end
    object ClientDataSet1RISK_LEVEL: TStringField
      FieldName = 'RISK_LEVEL'
      Size = 8
    end
    object ClientDataSet1OCCUPATION: TStringField
      FieldName = 'OCCUPATION'
    end
    object ClientDataSet1OBJECTIVES: TStringField
      FieldName = 'OBJECTIVES'
      Size = 10
    end
    object ClientDataSet1CREDRATING: TStringField
      FieldName = 'CREDRATING'
      Size = 1
    end
    object ClientDataSet1Name: TStringField
      FieldKind = fkCalculated
      FieldName = 'Name'
      ReadOnly = True
      Size = 40
      Calculated = True
    end
    object ClientDataSet1ShippingAddress: TStringField
      FieldKind = fkCalculated
      FieldName = 'ShippingAddress'
      ReadOnly = True
      Size = 60
      Calculated = True
    end
  end
end
