importsession.dfm

刻录机源码

object frmSession: TfrmSession
  Left = 412
  Top = 317
  BorderStyle = bsDialog
  Caption = 'Disc & Session Browser'
  ClientHeight = 226
  ClientWidth = 356
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object lb: TListBox
    Left = 0
    Top = 75
    Width = 356
    Height = 151
    Align = alClient
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Courier New'
    Font.Style = []
    ItemHeight = 15
    ParentFont = False
    TabOrder = 0
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 356
    Height = 55
    Align = alTop
    BevelOuter = bvLowered
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 4
      Width = 69
      Height = 17
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Medium  :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 20
      Width = 69
      Height = 17
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Disc Size  :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 8
      Top = 36
      Width = 69
      Height = 17
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Used Space  :'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object lMedium: TLabel
      Left = 80
      Top = 4
      Width = 69
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lDiscSize: TLabel
      Left = 80
      Top = 20
      Width = 69
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lUsedSpace: TLabel
      Left = 80
      Top = 36
      Width = 69
      Height = 16
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 55
    Width = 356
    Height = 20
    Align = alTop
    Alignment = taLeftJustify
    BevelOuter = bvLowered
    BorderWidth = 4
    Caption = ' Number     Start     Size'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    object SpeedButton1: TSpeedButton
      Left = 283
      Top = 1
      Width = 70
      Height = 19
      Caption = 'Show Files'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      OnClick = SpeedButton1Click
    end
  end
end