home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 April
/
PCWorld_1999-04_cd.bin
/
Hardware
/
Drivers
/
Freememo
/
FREEMEM.EXE
/
0
/
RCDATA
/
TFRMFREEMEM
/
TFRMFREEMEM.txt
< prev
Wrap
Text File
|
1998-06-24
|
50KB
|
1,818 lines
object frmFreeMem: TfrmFreeMem
Left = 156
Top = 110
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Free Memory Tool'
ClientHeight = 271
ClientWidth = 411
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poDefaultPosOnly
ShowHint = True
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 411
Height = 271
Align = alClient
BevelOuter = bvNone
BorderWidth = 5
TabOrder = 0
object PageControl1: TPageControl
Left = 5
Top = 5
Width = 401
Height = 261
ActivePage = tabAboutMEWPro
Align = alClient
TabOrder = 0
TabStop = False
object TabSheet1: TTabSheet
Caption = 'Free Memory'
object Label1: TLabel
Left = 16
Top = 163
Width = 151
Height = 13
Caption = 'Allocate and Free not more than'
end
object Label2: TLabel
Left = 216
Top = 163
Width = 27
Height = 13
Caption = 'times.'
end
object lstMem: TListBox
Left = 8
Top = 8
Width = 377
Height = 137
Columns = 5
ItemHeight = 13
TabOrder = 0
OnDblClick = lstMemDblClick
end
object butAlloc: TButton
Left = 8
Top = 192
Width = 137
Height = 25
Caption = 'Allocate and Free'
Default = True
TabOrder = 2
OnClick = butAllocClick
end
object UpDown1: TUpDown
Left = 201
Top = 160
Width = 15
Height = 21
Associate = txtMaxTimes
Min = 1
Max = 20
Position = 2
TabOrder = 3
Wrap = False
end
object txtMaxTimes: TEdit
Left = 176
Top = 160
Width = 25
Height = 21
MaxLength = 2
TabOrder = 1
Text = '2'
end
object butClose1: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 4
OnClick = butClose1Click
end
object Button1: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 5
OnClick = Button1Click
end
end
object TabSheet2: TTabSheet
Caption = 'Statistics'
object Label3: TLabel
Left = 16
Top = 208
Width = 121
Height = 17
Alignment = taCenter
AutoSize = False
Caption = 'Label3'
end
object Label4: TLabel
Left = 8
Top = 8
Width = 141
Height = 13
Caption = 'Available RAM to applications'
end
object Label26: TLabel
Left = 172
Top = 200
Width = 20
Height = 13
Caption = 'Title'
OnClick = Label26Click
end
object butClose2: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel2: TPanel
Left = 8
Top = 24
Width = 377
Height = 153
BevelInner = bvLowered
TabOrder = 1
object PerformanceChart1: TPerformanceChart
Left = 2
Top = 2
Width = 373
Height = 149
Caption = 'Free Memory (RAM)'
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clMaroon
Font.Height = -12
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ScaleFont.Charset = ANSI_CHARSET
ScaleFont.Color = clMaroon
ScaleFont.Height = -11
ScaleFont.Name = 'Arial'
ScaleFont.Style = [fsBold]
OnGetMaxY = PerformanceChart1GetMaxY
OnGetYDisplay = PerformanceChart1GetYDisplay
end
end
object TrackBar1: TTrackBar
Left = 8
Top = 184
Width = 129
Height = 17
Orientation = trHorizontal
Frequency = 1
Position = 1
SelEnd = 0
SelStart = 0
TabOrder = 2
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = TrackBar1Change
end
object chkCaption: TCheckBox
Left = 152
Top = 184
Width = 73
Height = 17
Caption = 'Show in'
State = cbChecked
TabOrder = 3
OnClick = chkCaptionClick
end
object Button2: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 4
OnClick = Button2Click
end
end
object tabBackground: TTabSheet
Caption = 'Background'
object Label18: TLabel
Left = 8
Top = 16
Width = 189
Height = 13
Caption = 'The critical amount of memory for you is:'
end
object Label19: TLabel
Left = 256
Top = 16
Width = 14
Height = 13
Caption = 'KB'
end
object Label20: TLabel
Left = 136
Top = 74
Width = 26
Height = 13
Caption = 'every'
end
object Label21: TLabel
Left = 224
Top = 74
Width = 39
Height = 13
Caption = 'minutes.'
end
object Label22: TLabel
Left = 136
Top = 138
Width = 237
Height = 13
Caption = 'if you have less than the critical amount of memory'
end
object Label23: TLabel
Left = 152
Top = 168
Width = 43
Height = 13
Caption = 'seconds.'
end
object Label24: TLabel
Left = 24
Top = 168
Width = 62
Height = 13
Caption = 'for more than'
end
object labNext: TLabel
Left = 24
Top = 104
Width = 22
Height = 13
Caption = 'Next'
end
object butClose4: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object udCritical: TUpDown
Left = 201
Top = 16
Width = 15
Height = 17
AlignButton = udLeft
Associate = txtCritical
Min = 100
Max = 32000
Increment = 100
Position = 500
TabOrder = 1
Wrap = False
OnClick = udCriticalClick
end
object txtCritical: TEdit
Left = 216
Top = 16
Width = 37
Height = 17
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 2
Text = '500'
end
object chkBackground: TCheckBox
Left = 8
Top = 40
Width = 165
Height = 17
Caption = 'Background Activity'
TabOrder = 3
OnClick = chkBackgroundClick
end
object chkRegular: TCheckBox
Left = 8
Top = 72
Width = 65
Height = 17
Caption = 'Free up'
TabOrder = 4
OnClick = chkRegularClick
end
object Edit5: TEdit
Left = 184
Top = 74
Width = 33
Height = 17
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 5
Text = '30'
end
object udmin: TUpDown
Left = 169
Top = 74
Width = 15
Height = 17
AlignButton = udLeft
Associate = Edit5
Min = 5
Max = 1440
Increment = 5
Position = 30
TabOrder = 6
Wrap = False
OnClick = udminClick
end
object chkCritical: TCheckBox
Left = 8
Top = 136
Width = 65
Height = 17
Caption = 'Free up'
TabOrder = 7
OnClick = chkCriticalClick
end
object Edit7: TEdit
Left = 112
Top = 168
Width = 33
Height = 17
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 8
Text = '30'
end
object udsec: TUpDown
Left = 97
Top = 168
Width = 15
Height = 17
AlignButton = udLeft
Associate = Edit7
Min = 1
Max = 3600
Position = 30
TabOrder = 9
Wrap = False
OnClick = udsecClick
end
object cboRegular: TComboBox
Left = 68
Top = 72
Width = 61
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 10
end
object cboCritical: TComboBox
Left = 68
Top = 136
Width = 61
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 11
end
object Button3: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 12
OnClick = Button3Click
end
end
object tabStartup: TTabSheet
Caption = 'Startup'
object butClose5: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Button4: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 1
OnClick = Button4Click
end
object chkAutoRun: TCheckBox
Left = 12
Top = 36
Width = 181
Height = 17
Caption = 'Run automaticly with Windows'
TabOrder = 2
OnClick = chkAutoRunClick
end
object GroupBox1: TGroupBox
Left = 16
Top = 64
Width = 361
Height = 113
Caption = 'Startup Options'
TabOrder = 3
object Label27: TLabel
Left = 16
Top = 26
Width = 36
Height = 13
Caption = 'Free up'
end
object Label28: TLabel
Left = 16
Top = 56
Width = 104
Height = 13
Caption = 'Free up not more than'
end
object Label29: TLabel
Left = 176
Top = 56
Width = 27
Height = 13
Caption = 'times.'
end
object Label30: TLabel
Left = 176
Top = 80
Width = 43
Height = 13
Caption = 'seconds.'
end
object Label31: TLabel
Left = 16
Top = 80
Width = 56
Height = 13
Caption = 'And wait for'
end
object cboAutoRun: TComboBox
Left = 64
Top = 24
Width = 73
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
end
object Edit4: TEdit
Left = 144
Top = 55
Width = 25
Height = 18
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 1
Text = '3'
end
object udAutoTimes: TUpDown
Left = 129
Top = 55
Width = 15
Height = 18
AlignButton = udLeft
Associate = Edit4
Min = 1
Max = 20
Position = 3
TabOrder = 2
Wrap = False
end
object Edit6: TEdit
Left = 144
Top = 79
Width = 25
Height = 18
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 3
Text = '15'
end
object udAutoDelay: TUpDown
Left = 129
Top = 79
Width = 15
Height = 18
AlignButton = udLeft
Associate = Edit6
Min = 1
Max = 3600
Position = 15
TabOrder = 4
Wrap = False
end
end
end
object TabSheet6: TTabSheet
Caption = 'Icon'
object Image1: TImage
Left = 8
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image000.ico>}
Visible = False
end
object Image2: TImage
Left = 48
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image001.ico>}
Visible = False
end
object Image3: TImage
Left = 112
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image002.ico>}
Visible = False
end
object Image4: TImage
Left = 160
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image003.ico>}
Visible = False
end
object Image5: TImage
Left = 216
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image004.ico>}
Visible = False
end
object Image6: TImage
Left = 256
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image005.ico>}
Visible = False
end
object Label12: TLabel
Left = 8
Top = 8
Width = 350
Height = 45
AutoSize = False
Caption =
'You can activate a small icon in the taskbar instead of having t' +
'his program use a lot of space between your other programs. If y' +
'ou have the icon activated, the program is minimized to the tray' +
' area.'
WordWrap = True
end
object Label13: TLabel
Left = 8
Top = 88
Width = 357
Height = 29
AutoSize = False
Caption =
'A red icon is shown if your free RAM falles below the critical a' +
'mount. You can set the critical amount on the "Enhanced" page.'
WordWrap = True
end
object Label14: TLabel
Left = 8
Top = 120
Width = 36
Height = 13
Caption = 'Show a'
end
object Label15: TLabel
Left = 56
Top = 120
Width = 38
Height = 13
Caption = 'Yellow'
Font.Charset = DEFAULT_CHARSET
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 104
Top = 120
Width = 129
Height = 13
Caption = 'Icon if free RAM falls below'
end
object Label17: TLabel
Left = 296
Top = 120
Width = 14
Height = 13
Caption = 'KB'
end
object Label25: TLabel
Left = 8
Top = 154
Width = 122
Height = 13
Caption = 'The three menu free-ups: '
end
object Image7: TImage
Left = 296
Top = 192
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image006.ico>}
Visible = False
end
object butClose6: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object chkShowIcon: TCheckBox
Left = 8
Top = 64
Width = 97
Height = 17
Caption = 'Show Icon'
State = cbChecked
TabOrder = 1
OnClick = chkShowIconClick
end
object txtYellow: TEdit
Left = 256
Top = 120
Width = 37
Height = 17
BorderStyle = bsNone
Color = clBtnFace
ReadOnly = True
TabOrder = 2
Text = '3.000'
end
object udYellow: TUpDown
Left = 241
Top = 120
Width = 15
Height = 17
AlignButton = udLeft
Associate = txtYellow
Min = 100
Max = 32000
Increment = 100
Position = 3000
TabOrder = 3
Wrap = False
OnClick = udYellowClick
end
object cboMenu1: TComboBox
Left = 140
Top = 152
Width = 69
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 4
OnClick = cboMenu1Click
end
object cboMenu2: TComboBox
Left = 220
Top = 152
Width = 69
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 5
OnClick = cboMenu2Click
end
object cboMenu3: TComboBox
Left = 300
Top = 152
Width = 69
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 6
OnClick = cboMenu3Click
end
object Button5: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 7
OnClick = Button5Click
end
end
object tabAboutMEWPro: TTabSheet
Caption = 'About'
object Panel99: TPanel
Left = 0
Top = 0
Width = 393
Height = 233
Align = alClient
BevelOuter = bvNone
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label5: TLabel
Left = 24
Top = 12
Width = 353
Height = 28
Alignment = taCenter
AutoSize = False
Caption = 'FreeMem Professional'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object lblVersionMEWPro: TLabel
Left = 16
Top = 48
Width = 153
Height = 26
Alignment = taCenter
AutoSize = False
Caption = 'Version 3'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object labRegistered: TLabel
Left = 2
Top = 120
Width = 185
Height = 14
Alignment = taCenter
AutoSize = False
Caption = 'Please Register this Software for'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 16
Top = 88
Width = 155
Height = 14
Caption = 'Copyright 1998 by Meikel Weber'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object labPrice: TLabel
Left = 24
Top = 140
Width = 145
Height = 22
Alignment = taCenter
AutoSize = False
Caption = '$ 15'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object labEnter: TLabel
Left = 208
Top = 136
Width = 159
Height = 13
Caption = 'Enter your Registration Code here'
end
object mdURLLabel1: TmdURLLabel
Left = 222
Top = 46
Width = 149
Height = 13
Hint = 'home.t-online.de/home/meikelw/fmempro.htm'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Click here for the latest updates'
URL = 'home.t-online.de/home/meikelw/fmempro.htm'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object mdURLLabel2: TmdURLLabel
Left = 214
Top = 94
Width = 157
Height = 13
Hint = 'mew@gmx.de'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Send questions and comments to'
URL = 'mew@gmx.de'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = mailto
end
object lblRegisterNow: TmdURLLabel
Left = 30
Top = 166
Width = 139
Height = 24
Hint = 'www.shareit.com/programs/101097.htm'
AutoSize = False
LinkFont.Charset = ANSI_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -21
LinkFont.Name = 'Times New Roman'
LinkFont.Style = [fsBold, fsItalic]
PassiveFont.Charset = ANSI_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -21
PassiveFont.Name = 'Times New Roman'
PassiveFont.Style = [fsBold, fsItalic]
Caption = 'Register NOW'
URL = 'www.shareit.com/programs/101097.htm'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object butClose3: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel4: TPanel
Left = 192
Top = 40
Width = 3
Height = 185
Color = clSilver
TabOrder = 1
end
object labRegURL: TEdit
Left = 0
Top = 195
Width = 190
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 2
Text = 'www.shareit.com/programs/101097.htm'
end
object Edit2: TEdit
Left = 208
Top = 67
Width = 177
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 3
Text = 'home.t-online.de/home/meikelw/fmempro.htm'
end
object Edit3: TEdit
Left = 264
Top = 115
Width = 73
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 4
Text = 'mew@gmx.de'
end
object Button6: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 5
OnClick = Button6Click
end
object txtKey: TEdit
Left = 224
Top = 155
Width = 129
Height = 21
MaxLength = 12
TabOrder = 6
OnChange = txtKeyChange
end
end
end
object tabAboutBEN: TTabSheet
Caption = 'About'
object Panel6: TPanel
Left = 0
Top = 0
Width = 393
Height = 233
Align = alClient
BevelOuter = bvNone
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label34: TLabel
Left = 24
Top = 12
Width = 353
Height = 28
Alignment = taCenter
AutoSize = False
Caption = 'FreeMem Standard'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object Label35: TLabel
Left = 40
Top = 48
Width = 98
Height = 26
Caption = 'Version 3'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label36: TLabel
Left = 16
Top = 80
Width = 155
Height = 14
Caption = 'Copyright 1998 by Meikel Weber'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object mdURLLabel5: TmdURLLabel
Left = 222
Top = 46
Width = 149
Height = 13
Hint = 'www.3bsoftware.com/freemem.htm'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Click here for the latest updates'
URL = 'www.3bsoftware.com/freemem.htm'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object mdURLLabel6: TmdURLLabel
Left = 214
Top = 94
Width = 157
Height = 13
Hint = 'freemem@3bsoftware.com'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Send questions and comments to'
URL = 'freemem@3bsoftware.com'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = mailto
end
object Label37: TLabel
Left = 16
Top = 104
Width = 64
Height = 13
Caption = 'Distributed by'
end
object Label38: TLabel
Left = 88
Top = 104
Width = 70
Height = 13
Caption = '3B Software'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label39: TLabel
Left = 24
Top = 152
Width = 142
Height = 19
Caption = 'Unregistered Version'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object Button9: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel7: TPanel
Left = 192
Top = 40
Width = 3
Height = 185
Color = clSilver
TabOrder = 1
end
object Edit1: TEdit
Left = 208
Top = 67
Width = 177
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 2
Text = 'www.3bsoftware.com/freemem.htm'
end
object Edit10: TEdit
Left = 232
Top = 115
Width = 137
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 3
Text = 'freemem@3bsoftware.com'
end
object Button10: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 4
OnClick = Button6Click
end
end
end
object tabAboutBENPro: TTabSheet
Caption = 'About'
object Panel3: TPanel
Left = 0
Top = 0
Width = 393
Height = 233
Align = alClient
BevelOuter = bvNone
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label7: TLabel
Left = 24
Top = 12
Width = 353
Height = 28
Alignment = taCenter
AutoSize = False
Caption = 'FreeMem Professional'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object lblVersionBenPro: TLabel
Left = 16
Top = 48
Width = 153
Height = 26
Alignment = taCenter
AutoSize = False
Caption = 'Version 3'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 16
Top = 80
Width = 155
Height = 14
Caption = 'Copyright 1998 by Meikel Weber'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object mdURLLabel3: TmdURLLabel
Left = 222
Top = 46
Width = 149
Height = 13
Hint = 'www.3bsoftware.com/freemem.htm'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Click here for the latest updates'
URL = 'www.3bsoftware.com/freemem.htm'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object mdURLLabel4: TmdURLLabel
Left = 214
Top = 94
Width = 157
Height = 13
Hint = 'freemem@3bsoftware.com'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Send questions and comments to'
URL = 'freemem@3bsoftware.com'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = mailto
end
object Label10: TLabel
Left = 16
Top = 104
Width = 64
Height = 13
Caption = 'Distributed by'
end
object Label32: TLabel
Left = 88
Top = 104
Width = 70
Height = 13
Caption = '3B Software'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 24
Top = 152
Width = 126
Height = 19
Caption = 'Registered Version'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object Button7: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel5: TPanel
Left = 192
Top = 40
Width = 3
Height = 185
Caption = 'Panel5'
Color = clSilver
TabOrder = 1
end
object Edit8: TEdit
Left = 208
Top = 67
Width = 177
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 2
Text = 'www.3bsoftware.com/freemem.htm'
end
object Edit9: TEdit
Left = 232
Top = 115
Width = 137
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 3
Text = 'freemem@3bsoftware.com'
end
object Button8: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 4
OnClick = Button6Click
end
end
end
object tabAboutMEW: TTabSheet
Caption = 'About'
object Panel10: TPanel
Left = 0
Top = 0
Width = 393
Height = 233
Align = alClient
BevelOuter = bvNone
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label6: TLabel
Left = 24
Top = 12
Width = 353
Height = 28
Alignment = taCenter
AutoSize = False
Caption = 'FreeMem Standard'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold, fsItalic]
ParentFont = False
end
object lblVersionMEWStd: TLabel
Left = 16
Top = 48
Width = 153
Height = 26
Alignment = taCenter
AutoSize = False
Caption = 'Version 3'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label53: TLabel
Left = 16
Top = 88
Width = 155
Height = 14
Caption = 'Copyright 1998 by Meikel Weber'
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object mdURLLabel7: TmdURLLabel
Left = 222
Top = 46
Width = 149
Height = 13
Hint = 'www.meikel.com/freemem'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Click here for the latest updates'
URL = 'www.meikel.com/freemem'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object mdURLLabel8: TmdURLLabel
Left = 214
Top = 94
Width = 157
Height = 13
Hint = 'mew@gmx.de'
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Send questions and comments to'
URL = 'mew@gmx.de'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = mailto
end
object Label9: TLabel
Left = 24
Top = 112
Width = 137
Height = 13
Caption = 'This program is FREE to use.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object mdURLLabel9: TmdURLLabel
Left = 8
Top = 144
Width = 177
Height = 33
Hint = 'www.meikel.com/freemem'
Alignment = taCenter
AutoSize = False
WordWrap = True
LinkFont.Charset = DEFAULT_CHARSET
LinkFont.Color = clBlue
LinkFont.Height = -11
LinkFont.Name = 'MS Sans Serif'
LinkFont.Style = []
PassiveFont.Charset = DEFAULT_CHARSET
PassiveFont.Color = clWindowText
PassiveFont.Height = -11
PassiveFont.Name = 'MS Sans Serif'
PassiveFont.Style = []
Caption = 'Check out the Professional Version for more features'
URL = 'www.meikel.com/freemem'
URLAsHint = True
ShowPrefix = False
LabelType = Link
LinkType = http
end
object Button14: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel11: TPanel
Left = 192
Top = 40
Width = 3
Height = 185
Color = clSilver
TabOrder = 1
end
object Edit12: TEdit
Left = 232
Top = 67
Width = 137
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 2
Text = 'www.meikel.com/freemem/'
end
object Edit13: TEdit
Left = 264
Top = 115
Width = 73
Height = 14
BorderStyle = bsNone
Color = clSilver
ReadOnly = True
TabOrder = 3
Text = 'mew@gmx.de'
end
object Button15: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 4
OnClick = Button6Click
end
end
end
object tabOrderBEN: TTabSheet
Caption = 'Order Information'
object Panel8: TPanel
Left = 0
Top = 0
Width = 393
Height = 233
Align = alClient
BevelOuter = bvNone
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label40: TLabel
Left = 16
Top = 40
Width = 157
Height = 19
Caption = 'FreeMem Professional '
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
object Label41: TLabel
Left = 16
Top = 16
Width = 89
Height = 13
Caption = 'Register to receive'
end
object Label42: TLabel
Left = 24
Top = 120
Width = 127
Height = 13
Caption = 'Automatic memory Free-Up'
end
object Label43: TLabel
Left = 8
Top = 120
Width = 8
Height = 12
Caption = 'l'
Font.Charset = SYMBOL_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
end
object Label44: TLabel
Left = 24
Top = 136
Width = 158
Height = 13
Caption = 'Configurable low memory Free-Up'
end
object Label45: TLabel
Left = 8
Top = 136
Width = 8
Height = 12
Caption = 'l'
Font.Charset = SYMBOL_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 24
Top = 152
Width = 158
Height = 13
Caption = 'Convenient configurable tray icon'
end
object Label47: TLabel
Left = 8
Top = 152
Width = 8
Height = 12
Caption = 'l'
Font.Charset = SYMBOL_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
end
object Label48: TLabel
Left = 24
Top = 168
Width = 27
Height = 13
Caption = 'Menu'
end
object Label50: TLabel
Left = 24
Top = 184
Width = 111
Height = 13
Caption = 'Free Technical Support'
end
object Label51: TLabel
Left = 8
Top = 184
Width = 8
Height = 12
Caption = 'l'
Font.Charset = SYMBOL_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
end
object Label52: TLabel
Left = 208
Top = 40
Width = 169
Height = 33
AutoSize = False
Caption = 'For pricing and ordering instructions click the button below.'
WordWrap = True
end
object Label56: TLabel
Left = 16
Top = 72
Width = 131
Height = 13
Caption = 'FreeMem Professional list of'
end
object Label57: TLabel
Left = 16
Top = 88
Width = 126
Height = 13
Caption = 'powerful features includes:'
end
object Button11: TButton
Left = 312
Top = 192
Width = 73
Height = 25
Cancel = True
Caption = 'Minimize'
TabOrder = 0
OnClick = butClose1Click
end
object Panel9: TPanel
Left = 192
Top = 8
Width = 3
Height = 217
Color = clSilver
TabOrder = 1
end
object Button12: TButton
Left = 232
Top = 192
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 2
OnClick = Button6Click
end
object Button13: TButton
Left = 208
Top = 96
Width = 169
Height = 25
Caption = '&Order Information'
TabOrder = 3
OnClick = Button6Click
end
end
end
end
end
object Timer1: TTimer
OnTimer = Timer1Timer
Left = 271
Top = 27
end
object PopupMenu1: TPopupMenu
Left = 303
Top = 27
object ShowFreeMemPro1: TMenuItem
Caption = '&Show FreeMem Pro'
OnClick = ShowFreeMemPro1Click
end
object BackgroundActivity1: TMenuItem
Caption = '&Background Activity'
Checked = True
Default = True
OnClick = BackgroundActivity1Click
end
object N2: TMenuItem
Caption = '-'
end
object mnuFree1: TMenuItem
Caption = '&Test2'
OnClick = mnuFree1Click
end
object mnuFree2: TMenuItem
Caption = '&Test3'
OnClick = mnuFree2Click
end
object mnuFree3: TMenuItem
Caption = '&Test4'
OnClick = mnuFree3Click
end
object N1: TMenuItem
Caption = '-'
end
object mnuExit1: TMenuItem
Caption = 'E&xit FreeMem Pro'
OnClick = mnuExit1Click
end
end
object Traybar1: TTraybar
Icon.Data = {<image007.ico>}
OnDblClick = Traybar1DblClick
OnRightClick = Traybar1RightClick
Left = 368
Top = 32
end
object TimerCritical: TTimer
OnTimer = TimerCriticalTimer
Left = 335
Top = 27
end
end
