uBerkasBaru.dfm

object frmBerkasBaru: TfrmBerkasBaru
  Left = 524
  Top = 123
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Manajemen Berkas'
  ClientHeight = 462
  ClientWidth = 314
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 314
    Height = 41
    Align = alTop
    TabOrder = 0
    object btnBaru: TButton
      Left = 8
      Top = 8
      Width = 65
      Height = 25
      Cursor = crHandPoint
      Caption = 'Baru'
      TabOrder = 0
      OnClick = btnBaruClick
    end
    object btnSimpan: TButton
      Left = 176
      Top = 8
      Width = 65
      Height = 25
      Cursor = crHandPoint
      Caption = 'Simpan'
      TabOrder = 1
      OnClick = btnSimpanClick
    end
    object btnHapus: TButton
      Left = 240
      Top = 8
      Width = 65
      Height = 25
      Cursor = crHandPoint
      Caption = 'Hapus'
      TabOrder = 2
      OnClick = btnHapusClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 41
    Width = 314
    Height = 104
    Align = alTop
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 8
      Width = 41
      Height = 16
      Caption = 'No. RM'
    end
    object Label2: TLabel
      Left = 8
      Top = 40
      Width = 33
      Height = 16
      Caption = 'Nama'
    end
    object Label3: TLabel
      Left = 8
      Top = 72
      Width = 44
      Height = 16
      Caption = 'No. Rak'
    end
    object txtRM: TEdit
      Left = 64
      Top = 8
      Width = 241
      Height = 24
      TabOrder = 0
      Text = 'txtRM'
    end
    object txtNama: TEdit
      Left = 64
      Top = 40
      Width = 241
      Height = 24
      TabOrder = 1
      Text = 'txtNama'
    end
    object txtRak: TEdit
      Left = 64
      Top = 72
      Width = 241
      Height = 24
      TabOrder = 2
      Text = 'txtRak'
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 145
    Width = 314
    Height = 276
    Align = alClient
    BorderWidth = 5
    TabOrder = 2
    object ListBox1: TListBox
      Left = 6
      Top = 6
      Width = 302
      Height = 264
      Cursor = crHandPoint
      Align = alClient
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 421
    Width = 314
    Height = 41
    Align = alBottom
    TabOrder = 3
    object Label4: TLabel
      Left = 8
      Top = 12
      Width = 23
      Height = 16
      Caption = 'Cari'
    end
    object txtCari: TEdit
      Left = 112
      Top = 8
      Width = 193
      Height = 24
      TabOrder = 0
      Text = 'txtCari'
      OnKeyPress = txtCariKeyPress
    end
    object cmbCari: TComboBox
      Left = 40
      Top = 8
      Width = 73
      Height = 24
      Cursor = crHandPoint
      Style = csDropDownList
      ItemHeight = 16
      ItemIndex = 0
      TabOrder = 1
      Text = 'No. RM'
      OnChange = cmbCariChange
      Items.Strings = (
        'No. RM'
        'Nama'
        'No. Rak')
    end
  end
end