xinyong.dfm

本系统为演示Delphi的功能而开发设计

object XinyongForm: TXinyongForm
  Left = 189
  Top = 236
  Width = 498
  Height = 280
  BorderIcons = [biSystemMenu]
  Caption = '客户信用查询'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = '宋体'
  Font.Style = []
  Icon.Data = {
    0000010002002020100000000000E80200002600000010101000000000002801
    00000E0300002800000020000000400000000100040000000000800200000000
    0000000000000000000000000000000000000000800000800000008080008000
    0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
    0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000003888738337700000000000000000038FBFFFB788B8837700000000000
    0788FBFFFBFFF7FF8B8883700000000007FBFFFBFFFBFF7BFFFB888700000000
    007FFBFFFBFFFB7FFBFFFBF3700000000007FFFBFFFBFFF7FFFBFF7777000000
    0007FBFFFBFFFBF7FB7777FFF800000000007FFBFFFBFFF777FBFFFBF8000000
    00007BFFFBFFFBFFFBFFFBFFF8000000000007FBFFFBFFFBFFFBFFFBF8000000
    000007FFFBFFFBFFFBFFFBFFF8000000000000000FFBFFFBFFFBFFFBF8000000
    0000066660FFFBFFFBFFFBFFF80000666000066660FBFFFBFFFBFFFBF8000666
    66000006660FFBFFFBFFFBFFF8000E6666066660660FFFFFFFFBFFFBF8000E66
    66066660660000000FFFFBFFF8000EE6660666606607777777FBFFFBF8000EE6
    660EEEE6660FFBFFFBFFFBFFF80000EEE0770E6660FBFFFBFFFBFFFBF8000000
    00000EEE60FFFBFFFBFFFBFFF8000000000000000FFBFFFBFFFBFFFBF8000000
    000007FFFBFFFBFFFBFFFBFFF8000000000007FBFFFBFFFBFFFBFFFBF8000000
    000007FFFBFFFBFFFBFFFBFFF8000000000007FBFFFBFFFBFFFBFFFBF8000000
    0000077777777777777777777700000000000000000000000000000000000000
    0000000000000000000000000000FFFFFFFFFFFFFFFFFFE003FFFF00007FFC00
    001FF800000FF8000007FC000003FE000001FE000001FF000001FF000001FF80
    0001FF800001FF800001C7000001830000010000000100000001000000010000
    00010000000180000001C7000001FF800001FF800001FF800001FF800001FF80
    0001FF800001FFFFFFFFFFFFFFFF280000001000000020000000010004000000
    0000C00000000000000000000000000000000000000000000000000080000080
    000000808000800000008000800080800000C0C0C000808080000000FF0000FF
    000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
    00000000000000087B77088800000008FFFBF0B7880000008BFFFB0FB7800000
    8FFBFF0F0080000008FFFB80FB700000000BFFFBFF7000000660FBFFFB700660
    0060FFFBFF700E60E06000FFFB700EE00EE0FFFBFF700000000FFBFFFB700000
    08FBFFFBFF7000000888888888800000000000000000FFFF0000F00F0000E003
    0000E0010000F0000000F0000000F8000000F800000090000000000000000000
    00000000000098000000F8000000F8000000FFFF0000}
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnActivate = FormActivate
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 14
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 84
    Height = 14
    Caption = '拖欠还车辆数'
  end
  object Label8: TLabel
    Left = 200
    Top = 8
    Width = 84
    Height = 14
    Caption = '现未还车辆数'
  end
  object LabelTuoQian: TLabel
    Left = 96
    Top = 8
    Width = 7
    Height = 14
  end
  object LabelWeiHuan: TLabel
    Left = 296
    Top = 8
    Width = 7
    Height = 14
  end
  object ButtonStop: TButton
    Left = 12
    Top = 219
    Width = 232
    Height = 25
    Caption = '信用状况不佳,停止下一步处理(&T)'
    ModalResult = 2
    TabOrder = 0
    OnClick = ButtonStopClick
  end
  object ButtonNext: TButton
    Left = 244
    Top = 219
    Width = 233
    Height = 25
    Caption = '信用状况良好,继续下一步处理(&N)'
    ModalResult = 1
    TabOrder = 1
    OnClick = ButtonNextClick
  end
  object DBGridLease: TDBGrid
    Left = 8
    Top = 24
    Width = 473
    Height = 185
    DataSource = HuaXiaData.DataSourceXinyong
    TabOrder = 2
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -14
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'begin_date'
        Title.Alignment = taCenter
        Title.Caption = '租赁起始日期'
        Width = 119
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'return_date'
        Title.Alignment = taCenter
        Title.Caption = '应还车日期'
        Width = 116
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'real_return_date'
        Title.Alignment = taCenter
        Title.Caption = '实际还车日期'
        Width = 113
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'car_type'
        Title.Alignment = taCenter
        Title.Caption = '租赁车辆型号'
        Width = 95
        Visible = True
      end>
  end
end