home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1997 May
/
Pcwk0597.iso
/
borland
/
cb
/
setup
/
cbuilder
/
data.z
/
PROC.DFM
/
PROC.txt
< prev
Wrap
Text File
|
1997-02-28
|
9KB
|
318 lines
object Form1: TForm1
Left = 182
Top = 128
BorderStyle = bsSingle
Caption = 'Process Viewer'
ClientHeight = 423
ClientWidth = 563
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Menu = MainMenu1
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label2: TLabel
Left = 8
Top = 36
Width = 18
Height = 13
Caption = 'PID'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 382
Top = 36
Width = 98
Height = 13
Caption = 'Window Class Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 192
Top = 36
Width = 90
Height = 13
Caption = 'Caption of Window'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object TBevel
Left = 320
Top = 0
Width = 5
Height = 1
end
object Bevel1: TBevel
Left = 0
Top = 27
Width = 563
Height = 9
Align = alTop
Shape = bsTopLine
end
object GroupBox1: TGroupBox
Left = 8
Top = 349
Width = 292
Height = 40
Caption = 'Pid Info Color'
TabOrder = 0
object RadioButton1: TRadioButton
Left = 8
Top = 16
Width = 57
Height = 17
Caption = 'Re&d'
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 80
Top = 16
Width = 57
Height = 17
Caption = '&Green'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = RadioButton1Click
end
object RadioButton3: TRadioButton
Left = 152
Top = 16
Width = 49
Height = 17
Caption = '&Blue'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton4: TRadioButton
Left = 224
Top = 16
Width = 49
Height = 17
Caption = 'B&lack'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = RadioButton1Click
end
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 563
Height = 27
Align = alTop
TabOrder = 1
object SpeedButton3: TSpeedButton
Left = 69
Top = 1
Width = 25
Height = 25
Hint = 'Clear PID Info Viewer'
Enabled = False
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777700000000000000000007777700008FFFFFFFFFFFFF07777700008FFF
FFFFFFFFFF07777700008FF7777777731117777700008FFFFFFFFF39DD117777
00008FFFFFFFFF9D9DD1177700008FF77777FFD9F9DD107700008FFFFFFFFF9D
FD9D020700008FFFFFFFFFF9DFD0202000008FF77777777F9D0B220200008FFF
FFFFFFFFF0BBB22000008FFF0FFFFFFFFF0BBB2200008FF0B0FFFFFFFF00BBB2
00008F0B8B0FFFFFFF070BBB00008FF0B0FFFFFFFF0770BB00008FFF0FFFFFFF
FF07770B00008FFFFFFFFFFFFF07777000008888888888888807777700007777
77777777777777770000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 1
Top = 1
Width = 25
Height = 25
Hint = 'List Processes'
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777800087
77800087000077777808F7087808F70800007777708FFF70708FFF7000007777
70FFFFF070FFFFF000007807708FFF70008FFF70000070770008F8000808F808
0000707707800087078000870000780087777777800877770000777770007777
7777777700007770600600777077777700007700EEFE60777807777700007700
006F0007770077770000770FFF0EF607770B077700007766006F00070000B077
00007776EEEE60770BBBBB07000077766E06007770FB00000000777776667777
70BFB0770000777777777777770BFB070000777777777777770FBFB000007777
77777777778000000000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton4Click
end
object Image1: TImage
Left = 31
Top = 5
Width = 33
Height = 17
Picture.Data = {<image001.bmp>}
end
object SpeedButton2: TSpeedButton
Left = 94
Top = 1
Width = 25
Height = 25
Hint = 'Refresh PIDs'
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777700000000000000000007777700008FFFFFFFFFFFFF07777700008FFF
FFFFFFFFFF07777700008FF777FF7F8FFF07777700008FFFFFF8FF8FFF077777
00008FFFFFFF8F8FF807777700008FF77FFFFFFF8F07777700008FFFFF88FF0F
FF07777700008FFFFFFFF0F0FF07777700008FF77FF8F8FF0F07777700008FFF
FF8FFF8FE007777700008FFF0FFFFFF8EE07777700008FF0B0FFF8FF8EE07777
00008F0B8B0F8FFFF8EE077700008FF0B0FFFFFFFF8EE07700008FFF0FFFFFFF
FF08EE0700008FFFFFFFFFFFFF078EE00000888888888888880778E000007777
77777777777777870000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton2Click
end
object SpeedButton1: TSpeedButton
Left = 119
Top = 1
Width = 25
Height = 25
Hint = 'Kill Selected PID'
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777000077700077777777777777000070600600778888887777000000EE
FE60700000087777000000006F0000FFF708877700000FFF0EF607FFFF708777
000066006F000FFFFFF08877000076EEEE60FFFFFFFF08870000766E0600FFFF
7FFFF087000077766678FFFFF77FF088000077777770F8FFFFF7FF0800007799
9770F0F8F8F8FF08000077997770F0F0F0F0FF08000077979770F0F0F0F00F08
000097777970F0F0F0F08087000097777970F0F0F0F0777700007979777800F0
F0F0777700007799777780F0F00877770000799977777800F087777700007777
77777778087777770000}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 398
Width = 563
Height = 25
Panels = <>
SimplePanel = True
end
object ListBox1: TListBox
Left = 8
Top = 56
Width = 545
Height = 289
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 3
TabWidth = 125
OnClick = ListBox1Click
end
object MainMenu1: TMainMenu
Left = 524
Top = 358
object File1: TMenuItem
Caption = '&File'
ShortCut = 0
object New1: TMenuItem
Caption = '&List Pids...'
ShortCut = 0
OnClick = New1Click
end
object Refresh1: TMenuItem
Caption = '&Refresh List'
ShortCut = 0
OnClick = Refresh1Click
end
object N1: TMenuItem
Caption = '-'
ShortCut = 0
end
object Exit1: TMenuItem
Caption = 'E&xit'
ShortCut = 0
OnClick = Exit1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
ShortCut = 0
object About1: TMenuItem
Caption = '&About...'
ShortCut = 0
OnClick = About1Click
end
end
end
object Timer1: TTimer
Interval = 200
OnTimer = Timer1Timer
Left = 493
Top = 358
end
end