piutangcard.~dfm

this is sample for traders

object PiutangCardForm: TPiutangCardForm
  Left = 192
  Top = 107
  AutoScroll = False
  BorderIcons = []
  Caption = ' KARTU PIUTANG PER-SP '
  ClientHeight = 463
  ClientWidth = 777
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Dina'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object spSkinGroupBox1: TspSkinGroupBox
    Left = 0
    Top = 0
    Width = 777
    Height = 41
    TabOrder = 0
    DrawDefault = True
    SkinDataName = 'groupbox'
    AlphaBlend = False
    AlphaBlendValue = 200
    UseSkinCursor = False
    DefaultFont.Charset = ANSI_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = -11
    DefaultFont.Name = 'Dina'
    DefaultFont.Style = []
    UseSkinFont = True
    DefaultWidth = 0
    DefaultHeight = 0
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    NumGlyphs = 1
    Spacing = 2
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    Caption = ' Data SP'
    Align = alTop
    TabStop = True
    object OvcSpeedButton1: TOvcSpeedButton
      Left = 228
      Top = 8
      Width = 89
      Height = 23
      Glyph.Data = {00000000}
      Caption = 'Oke'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Dina'
      Font.Style = [fsBold]
      ParentFont = False
      OnClick = OvcSpeedButton1Click
    end
    object JvStaticText5: TJvStaticText
      Left = 8
      Top = 8
      Width = 65
      Height = 23
      Alignment = taRightJustify
      AutoSize = False
      BevelKind = bkFlat
      Caption = 'NO-SP :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Dina'
      Font.Style = [fsBold]
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -13
      HotTrackFont.Name = 'Dina'
      HotTrackFont.Style = []
      Layout = tlCenter
      ParentFont = False
      TabOrder = 0
      TextMargins.X = 3
      TextMargins.Y = 0
      WordWrap = False
    end
    object edFind: TEdit
      Left = 76
      Top = 8
      Width = 145
      Height = 23
      TabStop = False
      AutoSize = False
      CharCase = ecUpperCase
      Color = clInfoBk
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      MaxLength = 14
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
    end
    object stStatus: TStaticText
      Left = 352
      Top = 8
      Width = 129
      Height = 25
      Alignment = taCenter
      AutoSize = False
      BevelKind = bkFlat
      BorderStyle = sbsSingle
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'Dina'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
    end
  end
  object spSkinGroupBox2: TspSkinGroupBox
    Left = 0
    Top = 44
    Width = 445
    Height = 145
    TabOrder = 1
    DrawDefault = True
    SkinDataName = 'groupbox'
    AlphaBlend = False
    AlphaBlendValue = 200
    UseSkinCursor = False
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    UseSkinFont = True
    DefaultWidth = 0
    DefaultHeight = 0
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    NumGlyphs = 1
    Spacing = 2
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    Caption = 'spSkinGroupBox2'
    object JvStaticText1: TJvStaticText
      Left = 8
      Top = 8
      Width = 117
      Height = 23
      Alignment = taRightJustify
      AutoSize = False
      BevelKind = bkFlat
      Caption = 'KONSUMEN :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -12
      HotTrackFont.Name = 'Dina'
      HotTrackFont.Style = []
      Layout = tlCenter
      ParentFont = False
      TabOrder = 0
      TextMargins.X = 3
      TextMargins.Y = 0
      WordWrap = False
    end
    object JvStaticText2: TJvStaticText
      Left = 8
      Top = 36
      Width = 117
      Height = 23
      Alignment = taRightJustify
      AutoSize = False
      BevelKind = bkFlat
      Caption = 'ALAMAT :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -12
      HotTrackFont.Name = 'Dina'
      HotTrackFont.Style = []
      Layout = tlCenter
      ParentFont = False
      TabOrder = 1
      TextMargins.X = 3
      TextMargins.Y = 0
      WordWrap = False
    end
    object JvStaticText3: TJvStaticText
      Left = 8
      Top = 80
      Width = 117
      Height = 23
      Alignment = taRightJustify
      AutoSize = False
      BevelKind = bkFlat
      Caption = 'TELP :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -12
      HotTrackFont.Name = 'Dina'
      HotTrackFont.Style = []
      Layout = tlCenter
      ParentFont = False
      TabOrder = 7
      TextMargins.X = 3
      TextMargins.Y = 0
      WordWrap = False
    end
    object JvStaticText4: TJvStaticText
      Left = 8
      Top = 116
      Width = 117
      Height = 23
      Alignment = taRightJustify
      AutoSize = False
      BevelKind = bkFlat
      Caption = 'DEALER :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      HotTrackFont.Charset = ANSI_CHARSET
      HotTrackFont.Color = clWindowText
      HotTrackFont.Height = -12
      HotTrackFont.Name = 'Dina'
      HotTrackFont.Style = []
      Layout = tlCenter
      ParentFont = False
      TabOrder = 8
      TextMargins.X = 3
      TextMargins.Y = 0
      WordWrap = False
    end
    object DBEdit1: TDBEdit
      Left = 128
      Top = 8
      Width = 69
      Height = 23
      TabStop = False
      AutoSize = False
      Color = 16119285
      Ctl3D = True
      DataField = 'LGNCODE'
      DataSource = dsSalesByPiutang
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit2: TDBEdit
      Left = 200
      Top = 8
      Width = 237
      Height = 23
      TabStop = False
      AutoSize = False
      Color = 16119285
      Ctl3D = True
      DataField = 'NAMALGN'
      DataSource = dsLgnByPiutang
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object DBMemo1: TDBMemo
      Left = 128
      Top = 36
      Width = 309
      Height = 41
      DataField = 'ADDRESS'
      DataSource = dsLgnByPiutang
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object DBEdit3: TDBEdit
      Left = 128
      Top = 80
      Width = 309
      Height = 23
      TabStop = False
      AutoSize = False
      Color = 16119285
      Ctl3D = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Dina'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      ReadOnly = True
      TabOrder = 5