home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 January
/
Chip_1999-01_cd.bin
/
zkuste
/
delphi
/
D1
/
SYSINFSW.ZIP
/
SYSIABT.DFM
/
SYSIABT.txt
< prev
Wrap
Text File
|
1996-03-04
|
9KB
|
407 lines
object SysInfoAboutBox: TSysInfoAboutBox
Left = 197
Top = 110
BorderIcons = []
BorderStyle = bsDialog
Caption = 'About'
ClientHeight = 336
ClientWidth = 373
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
PixelsPerInch = 96
Position = poScreenCenter
OnActivate = FormActivate
TextHeight = 16
object Panel1: TPanel
Left = 4
Top = 4
Width = 365
Height = 105
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 0
object ProgramIcon: TImage
Left = 44
Top = 16
Width = 32
Height = 32
Picture.Data = {<image000.bmp>}
Stretch = True
IsControl = True
end
object ProductName: TLabel
Left = 108
Top = 8
Width = 222
Height = 24
Caption = 'System Info Component'
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Version: TLabel
Left = 124
Top = 36
Width = 46
Height = 16
Caption = 'Version'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object VersionNumber: TLabel
Left = 176
Top = 36
Width = 141
Height = 16
Caption = '1.00 Shareware Version'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Copyright: TLabel
Left = 8
Top = 60
Width = 189
Height = 16
Caption = 'Copyright 1995, TechnoSoft, Inc.'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Comments: TLabel
Left = 8
Top = 80
Width = 338
Height = 16
Caption = 'A component to allow easy access to system information.'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
end
object Panel2: TPanel
Left = 4
Top = 108
Width = 365
Height = 45
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 1
object Label8: TLabel
Left = 40
Top = 8
Width = 31
Height = 13
Caption = 'User:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label10: TLabel
Left = 40
Top = 24
Width = 56
Height = 13
Caption = 'Company:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object UserName: TLabel
Left = 156
Top = 8
Width = 153
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object CompanyName: TLabel
Left = 156
Top = 24
Width = 153
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
end
object Panel3: TPanel
Left = 4
Top = 152
Width = 365
Height = 77
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 2
object Label1: TLabel
Left = 40
Top = 40
Width = 102
Height = 13
Caption = 'Windows Version:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label2: TLabel
Left = 40
Top = 56
Width = 77
Height = 13
Caption = 'DOS Version:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label3: TLabel
Left = 40
Top = 24
Width = 75
Height = 13
Caption = 'Coprocessor:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label4: TLabel
Left = 40
Top = 8
Width = 30
Height = 13
Caption = 'CPU:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object WinVersion: TLabel
Left = 156
Top = 40
Width = 129
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object DosVersion: TLabel
Left = 156
Top = 56
Width = 129
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object Coprocessor: TLabel
Left = 156
Top = 24
Width = 129
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object CPU: TLabel
Left = 156
Top = 8
Width = 129
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
end
object Panel4: TPanel
Left = 4
Top = 228
Width = 365
Height = 61
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 3
object Label5: TLabel
Left = 40
Top = 8
Width = 77
Height = 13
Caption = 'Free Memory:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label6: TLabel
Left = 40
Top = 24
Width = 94
Height = 13
Caption = 'Free Resources:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object Label9: TLabel
Left = 40
Top = 40
Width = 105
Height = 13
Caption = 'Free Disk Space:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
WordWrap = True
IsControl = True
end
object FreeMemory: TLabel
Left = 156
Top = 8
Width = 133
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object FreeResources: TLabel
Left = 156
Top = 24
Width = 133
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
object FreeDisk: TLabel
Left = 156
Top = 40
Width = 133
Height = 13
AutoSize = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
IsControl = True
end
end
object Panel5: TPanel
Left = 4
Top = 288
Width = 365
Height = 45
BevelInner = bvRaised
TabOrder = 4
object Panel6: TPanel
Left = 140
Top = 4
Width = 81
Height = 37
BevelInner = bvLowered
BevelOuter = bvLowered
BevelWidth = 2
TabOrder = 0
object BitBtn1: TBitBtn
Left = 4
Top = 4
Width = 73
Height = 29
TabOrder = 0
OnClick = Button1Click
Kind = bkOK
end
end
end
end