object lsLgnForm: TlsLgnForm
  Left = 192
  Top = 107
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = ' Data Langganan '
  ClientHeight = 468
  ClientWidth = 777
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Dina'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefaultPosOnly
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox3: TGroupBox
    Left = 0
    Top = 37
    Width = 777
    Height = 431
    Align = alClient
    TabOrder = 0
    object AddBtn: TSpeedButton
      Left = 368
      Top = 10
      Width = 49
      Height = 45
      Glyph.Data = {
        E6000000424DE60000000000000076000000280000000F0000000E0000000100
        04000000000070000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088888888888888808888880008888880888888070888
        8880888888070888888088800007000088808880777777708880888000070000
        8880888888070888888088888807088888808888880008888880888888888888
        88808888888888888880}
      Layout = blGlyphTop
      OnClick = AddBtnClick
    end
    object ItemGrid: TJvDBUltimGrid
      Left = 8
      Top = 60
      Width = 761
      Height = 349
      Color = 16119285
      Ctl3D = True
      DataSource = dsCust
      FixedColor = 14408667
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'Dina'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgRowLines, dgRowSelect, dgCancelOnExit]
      ParentCtl3D = False
      ParentFont = False
      PopupMenu = PopupMenu1
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clNavy
      TitleFont.Height = -13
      TitleFont.Name = 'Dina'
      TitleFont.Style = []
      OnKeyDown = ItemGridKeyDown
      AutoAppend = False
      TitleButtons = True
      TitleArrow = True
      SelectColumnsDialogStrings.Caption = 'Select columns'
      SelectColumnsDialogStrings.RealNamesOption = '[With the real field name]'
      SelectColumnsDialogStrings.OK = '&OK'
      SelectColumnsDialogStrings.NoSelectionWarning = 'At least one column must be visible!'
      CanDelete = False
      EditControls = <>
      RowsHeight = 17
      TitleRowHeight = 20
      SortWith = swFields
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'LGNCODE'
          Title.Alignment = taCenter
          Title.Caption = 'KODE'
          Width = 50
          Visible = True
        end
        item
          Alignment = taRightJustify
          Expanded = False
          FieldName = 'JENIS'
          Title.Alignment = taCenter
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'NAMALGN'
          Title.Alignment = taCenter
          Title.Caption = 'NAMA LANGGANAN'
          Width = 175
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ADDRESS'
          Title.Alignment = taCenter
          Title.Caption = 'ALAMAT'
          Width = 225
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CITY'
          Title.Alignment = taCenter
          Title.Caption = 'KOTA'
          Width = 115
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CURBAL'
          Title.Alignment = taRightJustify
          Title.Caption = 'BALANCE'
          Width = 95
          Visible = True
        end>
    end
    object StBAR: TJvStatusBar
      Left = 2
      Top = 409
      Width = 773
      Height = 20
      Panels = <
        item
          Alignment = taCenter
          Bevel = pbNone
          Width = 250
        end
        item
          Alignment = taCenter
          Width = 250
        end>
    end
    object RadioGroup1: TspSkinRadioGroup
      Left = 8
      Top = 10
      Width = 149
      Height = 43
      TabOrder = 2
      DrawDefault = True
      SkinDataName = 'groupbox'
      AlphaBlend = False
      AlphaBlendValue = 200
      UseSkinCursor = False
      DefaultFont.Charset = ANSI_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = -13
      DefaultFont.Name = 'Dina'
      DefaultFont.Style = []
      UseSkinFont = True
      DefaultWidth = 0
      DefaultHeight = 0
      AutoEnabledControls = True
      CheckedMode = True
      Checked = True
      NumGlyphs = 1
      Spacing = 2
      DefaultAlignment = taLeftJustify
      DefaultCaptionHeight = 22
      BorderStyle = bvFrame
      CaptionMode = False
      RollUpMode = False
      RollUpState = False
      Caption = 'RadioGroup1'
      OnClick = RadioGroup1Click
      ButtonSkinDataName = 'radiobox'
      ButtonDefaultFont.Charset = ANSI_CHARSET
      ButtonDefaultFont.Color = clNavy
      ButtonDefaultFont.Height = -13
      ButtonDefaultFont.Name = 'Dina'
      ButtonDefaultFont.Style = []
      Columns = 2
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = 'Dina'
      Font.Style = []
      ItemIndex = 1
      Items.Strings = (
        'Kode'
        'Nama')
      ParentFont = False
    end
    object edFind: TEdit
      Left = 160
      Top = 31
      Width = 201
      Height = 23
      AutoSize = False
      CharCase = ecUpperCase
      Color = clInfoBk
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Dina'
      Font.Style = []
      MaxLength = 30
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 3
      OnChange = edFindChange
    end
    object JvStaticText2: TJvStaticText
      Left = 160
      Top = 10