main.dfm

jvcl driver development envionment

object MainForm: TMainForm
  Left = 302
  Top = 170
  Width = 440
  Height = 276
  Caption = 'JVCL RX Library Demo Program'
  Color = clAppWorkSpace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Icon.Data = {
    0000010001002020100000000000E80200001600000028000000200000004000
    0000010004000000000080020000000000000000000000000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000099999000099999990000000000000000099900000009990000000000
    0000000000999CC000099CCCCC000000000000000009990000099CCC00000000
    000000000000999000990CC000000000000000000000099900990CC000000000
    00000000000000999099CC000000000000000000000000099999CC0000009999
    90000000999900009990CC000000999000000009990000000999CC000000099C
    CCC0000990CCCC00099990000000099CC00000099CCC0000990999000000099C
    C00000990CC00000990C999000000099C00000990CC0000099CC099900000099
    C0000099CC00000099CC009990000099CC000990CC00000990CC000999000099
    CC000990CC00000990CC00009999000999999999C00000999CC0000009990009
    9C0000999900999999900009999900099CCCCCCC99900000CCC00000000C0009
    9CC00000999900CCCCCCC0000CCC000099C000000999C0000000000000000000
    99C000000099CC00000000000000000099CC00000099CC000000000000000000
    99CC00000999CC000000000000000000999C00009990CC000000000000000099
    99999999900CCC00000000000000000000CCC00000CCC0000000000000000000
    CCCCCCCCCCC0000000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFF0780FFFF8FE3FFFFC1E03FFFE3E0FFFFF1C9FFFFF8C9FFFFF
    C43FFFFFE03F07F0F13F1FE3F83F81E4387F87E0F23F87C9F21FC7C9F08FC7C3
    F0C7C393E4E3C393E4F0E007C1F8E3C301E0E001F1FEE1F0C078F1F87FFFF1FC
    3FFFF0FC3FFFF0F83FFFF0F13FFFC0063FFFFC7C7FFFF001FFFFFFFFFFFF}
  Menu = MainMenu1
  OldCreateOrder = True
  Position = poDefault
  WindowMenu = WindowMenu
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Toolbar: TJvSpeedBar
    Left = 0
    Top = 0
    Width = 432
    Height = 46
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Options = [sbAllowDrag, sbAllowResize, sbFlatBtns, sbGrayedBtns, sbTransparentBtns]
    BtnOffsetHorz = 8
    BtnOffsetVert = 3
    BtnWidth = 46
    BtnHeight = 40
    Version = 3
    BevelInner = bvLowered
    BevelOuter = bvNone
    TabOrder = 1
    InternalVer = 1
    object SpeedbarSection1: TJvSpeedBarSection
      Caption = 'File'
    end
    object SpeedbarSection2: TJvSpeedBarSection
      Caption = 'View'
    end
    object SpeedbarSection3: TJvSpeedBarSection
      Caption = 'Window'
    end
    object SpeedbarSection4: TJvSpeedBarSection
      Caption = 'Help'
    end
    object CustomizeBtn: TJvSpeedItem
      BtnCaption = 'Setup'
      Caption = 'Customize JvSpeedbar'
      DropDownMenu = ToolbarMenu
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DF7777777777777777770000DF87
        77787777877778870000DF8FAA78F9978FCC78870000DF8FAA78F9978FCC7887
        0000DF8FFF78FFF78FFF78870000DF8888888888888888870000DFFFFFFFFFFF
        FFFFFFF70000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
        DDDDDDDDDDDDDDDD0000DDDDDDDDDDDDD70007DD0000DDDDDDDDDDDD70EEE0DD
        0000DDD7000000000EE007DD0000DDD0E4EEEEEEEEE0DDDD0000DDD700000000
        0EE007DD0000DDDDDDDDDDDD70EEE0DD0000DDDDDDDDDDDDD70007DD0000DDDD
        DDDDDDDDDDDDDDDD0000}
      Hint = 'Customize JvSpeedbar|'
      Spacing = 3
      Left = 238
      Top = 3
      OnClick = CustomizeItemClick
      SectionName = 'File'
    end
    object ExitBtn: TJvSpeedItem
      BtnCaption = 'Exit'
      Caption = 'Exit Application'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000777777777777777DDDD7000077777777777777FDFD7700007777
        777777777F3F37770000444444077777FFF4444D0000DDDDD450777F3FF4DDDD
        0000DDDDD45507FFFFF4DDDD0000DDDDD45550FFFFF4DDDD0000DDD0045550FF
        FFF4DDDD0000DDD0A05550FFFFF4DDDD00000000EA0550FFFEF4DDDD00000EAE
        AEA050FFFFF4DDDD00000AEAEAEA00FEFEF4DDDD00000EAEAEA050FFFFF4DDDD
        00000000EA0550FEFEF4DDDD0000DDD0A05550EFEFE4DDDD0000DDD0045550FE
        FEF4DDDD0000DDDDD45550EFEFE4DDDD0000DDDDD44444444444DDDD0000DDDD
        DDDDDDDDDDDDDDDD0000}
      Hint = 'Exit Application|'
      Spacing = 3
      Left = 353
      Top = 3
      Visible = True
      OnClick = Exit
      SectionName = 'File'
    end
    object View1Btn: TJvSpeedItem
      Tag = 1
      AllowAllUp = True
      BtnCaption = 'Controls'
      Caption = 'View Controls'
      GroupIndex = 1
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888800008888880000088888888800008888880CCC088888888800008888
        880CCC077888888800008888880CCC0880000008000088888800000880999908
        0000888888887888880990880000888888887888880990880000888888888404
        8881188800008888888842B2488008880000800000000BBB07788888000080FF
        FFFF42B248888888000080FFFFFFF40488888888000080FFFFFFFFF088888888
        000080FFFFFFFFF088888888000080FFFFFFFFF088888888000080FFFFFFFFF0
        88888888000080CCCCCCCCC08888888800008000000000008888888800008888
        88888888888888880000}
      Hint = 'View Controls|'
      Spacing = 3
      Left = 8
      Top = 3
      Visible = True
      OnClick = View
      SectionName = 'View'
    end
    object View2Btn: TJvSpeedItem
      Tag = 2
      AllowAllUp = True
      BtnCaption = 'DB'
      Caption = 'View Data Controls'
      GroupIndex = 1
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888800008888880000088888888800008888880CCC088888888800008888
        880CCC077888888800008888880CCC0880000008000088888800000880999908
        0000888888887888880990880000888888887888880990880000880000008404
        000118880000880FFFF742B24FF008880000880F77F70BBB077F08880000880F
        FFF742B24FFF08880000880F77F7F40477FF08880000880FFFF7FFFFFFFF0888
        0000880F77F7F777777F08880000880FFFF7FFFFFFFF08880000880000000000
        0000088800008808888888888888088800008800000000000000088800008888
        88888888888888880000}
      Hint = 'View Data Controls|'
      Spacing = 3
      Left = 54
      Top = 3
      Visible = True
      OnClick = View
      SectionName = 'View'
    end
    object View3Btn: TJvSpeedItem
      Tag = 3
      AllowAllUp = True
      BtnCaption = 'Tools'
      Caption = 'View Tools'
      GroupIndex = 1
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888888800008880000088888888888800008880CCC088888888888800008880
        CCC077888888888800008880CCC0880000008888000088800000880999908888
        0000888887888880990888880000888887888880990888880000888888404888
        1188888800008888842B2488008888880000888880BBB0778888888800008888
        842B24888888888800008888884048887000788800008888888888870EEE0888
        0000887000000000EE0078880000880E4EEEEEEEEE0888880000887000000000
        EE00788800008888888888870EEE088800008888888888887000788800008888
        88888888888888880000}
      Hint = 'View Tools|'
      Spacing = 3
      Left = 123
      Top = 3
      Visible = True
      OnClick = View
      SectionName = 'View'
    end
    object WizardBtn: TJvSpeedItem
      BtnCaption = 'Wizard'
      Caption = 'Wizard Demo'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
        DDDDDDDDDDDDDDDD0000DD000DDDDDDDDDDDDDDD0000DD0B000D00000DDDDDDD
        0000DD000E00BFBFB0DDDDDD0000DD000E0BFBF000DDDDDD0000DD000E0FBFBF
        BF0DDDDD0000DD000E0BFBF000000DDD0000DD000E0FBFBFBFBFB0DD0000DD00
        0E0BF00000000DDD0000DD000000BFB0DDDDDDDD0000DDDDDDDD000DDDDDDDDD
        0000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDD
        DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
        DDDDDDDDDDDDDDDD0000}
      Hint = 'Wizard Demo|'
      Spacing = 1
      Left = 238
      Top = 3
      Visible = True
      OnClick = WizardBtnClick
      SectionName = 'View'
    end
    object CascadeBtn: TJvSpeedItem
      Tag = 1
      BtnCaption = 'Cascade'
      Caption = 'Cascade'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDDD00000000000000D0000DDDD
        D0FFFFFFFFFFFF0D0000DDDDD0FFFFFFFFFFFF0D0000DDD000FFFFFFFFFFFF0D
        0000DDD0F0FFFFFFFFFFFF0D0000DDD0F0FFFFFFFFFFFF0D0000D000F0FFFFFF
        FFFFFF0D0000D0F0F0FFFFFFFFFFFF0D0000D0F0F00000000000000D0000D0F0
        F0F0CCCCCC0F0F0D0000D0F0F00000000000000D0000D0F00000000000000DDD
        0000D0F0F0CCCCCC0F0F0DDD0000D0F00000000000000DDD0000D00000000000
        000DDDDD0000D0F0CCCCCC0F0F0DDDDD0000D00000000000000DDDDD0000DDDD
        DDDDDDDDDDDDDDDD0000}
      Hint = 'Cascade|'
      Spacing = 3
      Left = 5
      Top = 3
      OnClick = WindowItemClick
      SectionName = 'Window'
    end
    object TileBtn: TJvSpeedItem
      Tag = 2
      BtnCaption = 'Tile'
      Caption = 'Tile'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000D000000000000000000D0000D0FFFFFFFFFFFFFFFF0D0000D0FF
        FFFFFFFFFFFFFF0D0000D0FFFFFFFFFFFFFFFF0D0000D0FFFFFFFFFFFFFFFF0D
        0000D0FFFFFFFFFFFFFFFF0D0000D000000000000000000D0000D0F0CCCCCCCC
        CC0F0F0D0000D000000000000000000D0000D000000000000000000D0000D0FF
        FFFFFFFFFFFFFF0D0000D0FFFFFFFFFFFFFFFF0D0000D0FFFFFFFFFFFFFFFF0D
        0000D0FFFFFFFFFFFFFFFF0D0000D0FFFFFFFFFFFFFFFF0D0000D00000000000
        0000000D0000D0F0CCCCCCCCCC0F0F0D0000D000000000000000000D0000DDDD
        DDDDDDDDDDDDDDDD0000}
      Hint = 'Tile|'
      Spacing = 3
      Left = 5
      Top = 3
      OnClick = WindowItemClick
      SectionName = 'Window'
    end
    object ArrangeBtn: TJvSpeedItem
      Tag = 3
      BtnCaption = 'Arrange'
      Caption = 'Arrange icons'
      Glyph.Data = {
        06020000424D0602000000000000760000002800000028000000140000000100
        0400000000009001000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDFFFFFFFFFFFFFF
        FFFFD000000000000000000DD777777777777777777FD0FFFFFFFFFFFFFFFF0D
        D7FDFFFFDFFFFDFFFF7FD0F0000F0000F0000F0DD7F7777D7777D7777D7FD0FF
        92FFF2BFFFE9FF0DD7FD77FDD77FDD77FD7FD0FFCEFFF92FFFCAFF0DD7FD77DD
        D77DDD77DD7FD0FFFFFFFFFFFFFFFF0DD7FDDDDDDDDDDDDDDD7FD0FFFFFFFFFF
        FFFFFF0DD7FDDDDDDDDDDDDDDD7FD0FFFFFFFFFFFFFFFF0DD7FDDDDDDDDDDDDD
        DD7FD0FFFFFFFFFFFFFFFF0DD7FDDDDDDDDDDDDDDD7FD0FFFFFFFFFFFFFFFF0D
        D7FDDDDDDDDDDDDDDD7FD0FFFFFFFFFFFFFFFF0DD7FDDDDDDDDDDDDDDD7FD0FF
        FFFFFFFFFFFFFF0DD7FDDDDDDDDDDDDDDD7FD0FFFFFFFFFFFFFFFF0DD7FFFFFF
        FFFFFFFFFF7FD000000000000000000DD777777777777777777FD0F0CCCCCCCC
        CC0F0F0DD7FFFFFFFFFFFFFFFF7FD000000000000000000DD777777777777777
        777DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
        DDDDDDDDDDDDDDDDDDDD}
      Hint = 'Arrange icons|'
      NumGlyphs = 2
      Spacing = 3
      Left = 5
      Top = 3
      OnClick = WindowItemClick
      SectionName = 'Window'
    end
    object AboutBtn: TJvSpeedItem
      BtnCaption = 'About'
      Caption = 'About'
      Glyph.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
        DDDDDDDD0000DDDDDDD000000DDDDDDD0000DDDDD0040044400DDDDD0000DDDD
        0440FF044440DDDD0000DDD0440FFFF044440DDD0000DD04440FF078044440DD
        0000DD044447FF00444440DD0000D0444440FF744444440D0000D04444447FF0
        4444440D0000D04444400FF74444440D0000D044440870FF0444440D0000D044