home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1999 mARCH
/
PCWK3A99.iso
/
Polskie
/
JaPa
/
Kkp.exe
/
0
/
RCDATA
/
TFORM2
/
TFORM2.txt
< prev
Wrap
Text File
|
1999-01-05
|
8KB
|
337 lines
object Form2: TForm2
Left = 181
Top = 231
Width = 608
Height = 307
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
ActiveControl = Edit1
Caption = 'Wyszukiwanie'
Color = clTeal
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
Icon.Data = {<image000.ico>}
Position = poScreenCenter
OnCreate = FormCreate
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Background1: TBackground
Left = 0
Top = 0
Width = 600
Height = 280
Align = alClient
Color1 = clWhite
Color2 = clBlack
BackStyle = bgTileBitmap
end
object LabelEffect1: TLabelEffect
Left = 0
Top = 6
Width = 573
Height = 39
DepthShadow = 5
DirectionHighlight = edDownRight
ColourHighlight = clBlack
GraduateFrom = clWindowText
EffectStyle = esFlying
ColourScheme = csCustom
Alignment = taCenter
Caption = 'Komputerowy Katalog P�yt 1998'
Color = clBlack
Font.Color = clYellow
Font.Height = -27
Font.Name = 'Times New Roman'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label1: TLabelEffect
Left = 8
Top = 196
Width = 121
Height = 21
DepthShadow = 5
DirectionHighlight = edDownRight
ColourHighlight = clBlack
GraduateFrom = clWindowText
EffectStyle = esFlying
ColourScheme = csCustom
Caption = 'Wprowad� wzorzec :'
Color = clBlack
Font.Color = clYellow
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label2: TLabelEffect
Left = 8
Top = 222
Width = 361
Height = 22
DepthShadow = 5
DirectionHighlight = edDownRight
ColourHighlight = clBlack
GraduateFrom = clWindowText
EffectStyle = esFlying
ColourScheme = csCustom
Caption = 'Po wprowadzeniu wzorca zaznacz przeszukiwan� kategori� :'
Font.Color = clYellow
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabelEffect
Left = 348
Top = 196
Width = 229
Height = 21
DepthShadow = 5
DirectionHighlight = edDownRight
ColourHighlight = clBlack
GraduateFrom = clWindowText
EffectStyle = esFlying
ColourScheme = csCustom
Alignment = taRightJustify
Caption = 'Wyszukiwanie wed�ug pe�nych nazw'
Font.Color = clYellow
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 136
Top = 196
Width = 168
Height = 21
AutoSize = False
TabOrder = 0
end
object Pelny: TCheckBox
Left = 577
Top = 197
Width = 14
Height = 14
Alignment = taLeftJustify
Color = clTeal
Font.Color = clYellow
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
TabOrder = 1
end
object DBGrid1: TBSDBGrid
Left = 7
Top = 44
Width = 585
Height = 145
Hint = 'Kliknij dwukrotnie tytu� p�yty'
TabStop = False
Color = clBtnFace
Columns = <
item
FieldName = 'Wykonawca'
Title.Color = clActiveCaption
Title.Font.Color = clWhite
Title.Font.Height = -11
Title.Font.Name = 'Arial'
Title.Font.Style = []
Width = 180
end
item
FieldName = 'Plyta'
Title.Color = clActiveCaption
Title.Font.Color = clWhite
Title.Font.Height = -11
Title.Font.Name = 'Arial'
Title.Font.Style = []
Width = 180
end
item
Alignment = taCenter
FieldName = 'Rok'
Title.Alignment = taCenter
Title.Color = clActiveCaption
Title.Font.Color = clWhite
Title.Font.Height = -11
Title.Font.Name = 'Arial'
Title.Font.Style = []
Width = 60
end
item
FieldName = 'Utw�r'
Title.Color = clActiveCaption
Title.Font.Color = clWhite
Title.Font.Height = -11
Title.Font.Name = 'Arial'
Title.Font.Style = []
Width = 400
end>
DataSource = DataSource1
FixedColor = clYellow
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [dgEditing, dgTitles, dgTabs, dgConfirmDelete, dgCancelOnExit]
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
TitleFont.Color = clRed
TitleFont.Height = -12
TitleFont.Name = 'Arial'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Cellstyle = csNone
end
object b_wykonawca: TColorButton
Left = 8
Top = 244
Width = 74
Height = 27
Hint = 'Szukaj w katalogu wykonawc�w (Alt+A)'
BevelSize = 1
Caption = '&Artysta'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 3
TabStop = True
OnClick = b_wykonawcaClick
end
object b_plyta: TColorButton
Left = 82
Top = 244
Width = 74
Height = 27
Hint = 'Szukaj w katalogu p�yt i album�w (Alt+P)'
BevelSize = 1
Caption = '&P�yta'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 4
TabStop = True
OnClick = b_plytaClick
end
object b_rok_wydania: TColorButton
Left = 156
Top = 244
Width = 74
Height = 27
Hint = 'Szukaj wed�ug roku wydania p�yty (Alt+R)'
BevelSize = 1
Caption = '&Rok'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 5
TabStop = True
OnClick = b_rok_wydaniaClick
end
object b_utwor: TColorButton
Left = 230
Top = 244
Width = 74
Height = 27
Hint = 'Szukaj w katalogu utwor�w (Alt+U)'
BevelSize = 1
Caption = '&Utw�r'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 6
TabStop = True
OnClick = b_utworClick
end
object b_pomoc: TColorButton
Left = 446
Top = 244
Width = 74
Height = 27
Hint = 'Otw�rz okno pomocy'
BevelSize = 1
Caption = 'Pomoc'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 7
TabStop = True
OnClick = b_pomocClick
end
object b_powrot: TColorButton
Left = 520
Top = 244
Width = 74
Height = 27
Hint = 'Powr�t do menu'
BevelSize = 1
Caption = 'Menu'
Color = clTeal
Font.Color = clYellow
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = [bsCenter, bsShowFocus, bsShowKey]
TabOrder = 8
TabStop = True
OnClick = b_powrotClick
end
object Query1: TQuery
Left = 12
Top = 8
end
object DataSource1: TDataSource
DataSet = Query1
Left = 44
Top = 8
end
object MarsCaption1: TMarsCaption
ActiveBeginColor = clRed
ActiveEndColor = clYellow
ActiveFontColor = clYellow
InactiveBeginColor = clBlack
InactiveEndColor = clSilver
InactiveFontColor = clSilver
ApplicationNameFont.Color = clBlack
ApplicationNameFont.Height = -11
ApplicationNameFont.Name = 'MS Sans Serif'
ApplicationNameFont.Style = [fsBold]
CaptionFont.Color = clBlack
CaptionFont.Height = -11
CaptionFont.Name = 'MS Sans Serif'
CaptionFont.Style = []
NumColors = 64
AutoSize = False
Left = 540
Top = 8
end
end