home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2002 March
/
Chip_2002-03_cd1.bin
/
zkuste
/
delphi
/
kompon
/
d5
/
CSDBPACK.ZIP
/
DBBrowse.dfm
/
DBBrowse.txt
Wrap
Text File
|
2001-12-21
|
7KB
|
214 lines
object frmDBBrowse: TfrmDBBrowse
Left = 193
Top = 104
Width = 578
Height = 239
Hint = 'Press Z to zoom in/out, Ctrl-A to Select/Unselect All'
HorzScrollBar.Smooth = True
HorzScrollBar.Style = ssFlat
HorzScrollBar.Tracking = True
VertScrollBar.Smooth = True
VertScrollBar.Style = ssFlat
VertScrollBar.Tracking = True
ActiveControl = dbgBrowse
BorderIcons = [biSystemMenu, biMaximize]
Caption = 'default'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poOwnerFormCenter
ShowHint = True
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
OnKeyUp = FormKeyUp
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 6
Top = 185
Width = 28
Height = 13
Anchors = [akLeft, akBottom]
Caption = 'Find:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 169
Top = 185
Width = 10
Height = 13
Anchors = [akRight, akBottom]
Caption = 'in'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
end
object btnOK: TBitBtn
Left = 395
Top = 180
Width = 81
Height = 26
Anchors = [akRight, akBottom]
Caption = '&OK'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ModalResult = 1
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnClick = btnOKClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object btnCancel: TBitBtn
Left = 485
Top = 180
Width = 78
Height = 27
Anchors = [akRight, akBottom]
Caption = '&Cancel'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
TabOrder = 4
Kind = bkCancel
end
object txtFindText: TEdit
Left = 35
Top = 180
Width = 129
Height = 21
Hint = 'Enter search text here. Press ENTER to initiate search.'
Anchors = [akLeft, akRight, akBottom]
AutoSelect = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
TabOrder = 1
OnKeyPress = txtFindTextKeyPress
end
object cboFind: TComboBox
Left = 183
Top = 180
Width = 195
Height = 21
Style = csDropDownList
Anchors = [akRight, akBottom]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 2
OnEnter = cboFindEnter
end
object dbgBrowse: TDBGrid
Left = 5
Top = 5
Width = 559
Height = 170
Anchors = [akLeft, akTop, akRight, akBottom]
DefaultDrawing = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Verdana'
Font.Style = []
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
PopupMenu = popGrid
ReadOnly = True
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'Verdana'
TitleFont.Style = []
OnDrawColumnCell = dbgBrowseDrawColumnCell
OnKeyDown = dbgBrowseKeyDown
OnKeyUp = dbgBrowseKeyUp
end
object popGrid: TPopupMenu
Left = 5
Top = 25
object Indexby1: TMenuItem
Tag = 1000
Bitmap.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555555FFFFFFFF5555555000000005555555577777777FF555550999999900
55555575555555775F55509999999901055557F55555557F75F5001111111101
105577FFFFFFFF7FF75F00000000000011057777777777775F755070FFFFFF0F
01105777F555557F75F75500FFFFFF0FF0105577F555FF7F57575550FF700008
8F0055575FF7777555775555000888888F005555777FFFFFFF77555550000000
0F055555577777777F7F555550FFFFFF0F05555557F5FFF57F7F555550F000FF
0005555557F777557775555550FFFFFF0555555557F555FF7F55555550FF7000
05555555575FF777755555555500055555555555557775555555}
Caption = 'Index by'
Hint = 'Changing index or display type will remove all selection.'
end
object Displayusing1: TMenuItem
Tag = 2000
Bitmap.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
55557F7777777555555500000005555555557777777555555555}
Caption = 'Display using'
end
end
end