C!T ROM 5/ctrom5b.zip/ctrom5b/PROGRAM/DELPHI/MAXPACK/MAXPACK.DFM/MAXPACK.txt

Text File | 1995-04-27 | 5KB | 238 lines

object MaxPack1Form: TMaxPack1Form
  Left = 15
  Top = 64
  Width = 435
  Height = 300
  Caption = 'Show BDE/Network/Windows/Splash/BitBox '
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  PrintScale = poNone
  Scaled = False
  OnCreate = FormCreate
  TextHeight = 16
  object TabbedNotebook1: TTabbedNotebook
    Left = 0
    Top = 31
    Width = 427
    Height = 242
    Align = alClient
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 0
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'Intro'
      object Memo1: TMemo
        Left = 0
        Top = 0
        Width = 409
        Height = 192
        Align = alClient
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = []
        Lines.Strings = (
          'Hello and Welcome to MAXPACK1,'
          ''
          'This is not a thing I'#39'll be making splashy and perfect, rather'
          'it is a two hour volunteer effort to distribute some of my code '
          'back to the Delphi Forum. '
          ''
          'WARNING: DO NOT USE IN COMMERCIAL OR SHAREWARE'
          'DO NOT SELL THIS CODE! REINVENT IT! NO WARRANTIES!!'
          ''
          'Once you '#39'Options|Install'#39' regpack1 you'#39'll be seeing rough'
          'demos of the components here included. This is going to be'
          'a little bit of work for you perhaps, but I'#39'm thinking that lots'
          'of people who can get this to work will lean something delphi.'
          'That'#39's what I want. If you have stuff I should learn, Post or'
          'Email it to 71560,[e-mail]'
          ''
          'Best Regards,'
          'Share your stuff,'
          'Michael Ax'
          '')
        ParentFont = False
        ScrollBars = ssVertical
        TabOrder = 0
      end
    end
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'Splash'
      object Label1: TLabel
        Left = 72
        Top = 76
        Width = 285
        Height = 16
        Caption = 'The Splashscreen disappears when another'
      end
      object Label2: TLabel
        Left = 90
        Top = 96
        Width = 222
        Height = 16
        Caption = 'window in the app takes the focus!'
      end
      object Button1: TButton
        Left = 102
        Top = 32
        Width = 201
        Height = 33
        Caption = 'Fire SplashScreen!'
        TabOrder = 0
        OnClick = Button1Click
      end
      object Button2: TButton
        Left = 224
        Top = 134
        Width = 127
        Height = 23
        Caption = 'Fire differently'
        TabOrder = 1
        OnClick = Button2Click
      end
    end
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'BitBox'
      object Label3: TLabel
        Left = 182
        Top = 136
        Width = 94
        Height = 16
        Caption = 'Numeric Value'
      end
      object Label4: TLabel
        Left = 18
        Top = 20
        Width = 165
        Height = 16
        Caption = 'Access the bits of a word!'
      end
      object BitBox1: TBitBox
        Left = 198
        Top = 14
        Width = 93
        Height = 100
        Caption = 'BitBox1'
        TabOrder = 0
        Captions.Strings = (
          '(Bit0)'
          '(Bit1)'
          '(Bit2)'
          '(Bit3)'
          '(Bit4)'
          '(Bit5)'
          '(Bit6)'
          '(Bit7)'
          '(Bit8)'
          '(Bit9)'
          '(Bit10)'
          '(Bit11)'
          '(Bit12)'
          '(Bit13)'
          '(Bit14)'
          '(Bit15)')
        Possible = [Bit0, Bit1, Bit3, BitF]
        Selected = [Bit0, Bit1]
        Numeric = 3
        OnChange = BitBox1Change
      end
      object Edit1: TEdit
        Left = 282
        Top = 134
        Width = 55
        Height = 24
        TabOrder = 1
        Text = 'Edit1'
        OnChange = Edit1Change
      end
    end
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'Windows'
      object WindowsGrid: TStringGrid
        Left = 0
        Top = 0
        Width = 409
        Height = 192
        Align = alClient
        TabOrder = 0
      end
    end
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'Novell'
      object NovellGrid: TStringGrid
        Left = 0
        Top = 0
        Width = 409
        Height = 192
        Align = alClient
        TabOrder = 0
      end
    end
    object TTabPage
      Left = 5
      Top = 45
      Caption = 'BDE'
      object BDEGrid: TStringGrid
        Left = 0
        Top = 0
        Width = 409
        Height = 192
        Align = alClient
        TabOrder = 0
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 427
    Height = 31
    Align = alTop
    Caption = '(C)'#39'95 Michael/Ax-Systems  71560,1754             '
    TabOrder = 1
    object SpeedButton1: TSpeedButton
      Left = 344
      Top = 2
      Width = 45
      Height = 25
      Caption = 'Close'
      OnClick = SpeedButton1Click
    end
  end
  object SplashScreen: TSplashScreen
    Left = 9
    Top = 230
  end
  object WindowsUserInfo: TWindowsUserInfo
    UpdateOnLoad = True
    Left = 41
    Top = 232
  end
  object BDEUserInfo: TBDEUserInfo
    UpdateOnLoad = True
    Left = 75
    Top = 234
  end
  object NetWareUserInfo: TNetWareUserInfo
    UpdateOnLoad = True
    Left = 111
    Top = 234
  end
end