home *** CD-ROM | disk | FTP | other *** search
- object FSelectDlg: TFSelectDlg
- Left = 239
- Top = 139
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'Lista wyboru'
- ClientHeight = 293
- ClientWidth = 379
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- KeyPreview = True
- Position = poScreenCenter
- OnCreate = FormCreate
- OnKeyDown = FormKeyDown
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Przycisk_OK: TToolbarButton97
- Left = 312
- Top = 5
- Width = 65
- Height = 65
- Cursor = crHandPoint
- Caption = '&OK'
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = False
- Spacing = 5
- OnClick = Przycisk_OKClick
- end
- object Przycisk_Anuluj: TToolbarButton97
- Left = 312
- Top = 70
- Width = 65
- Height = 65
- Cursor = crHandPoint
- Caption = '&Anuluj'
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = False
- Spacing = 5
- OnClick = Przycisk_AnulujClick
- end
- object Przycisk_Pomoc: TToolbarButton97
- Left = 312
- Top = 135
- Width = 65
- Height = 65
- Cursor = crHandPoint
- Caption = '&Pomoc'
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = False
- Spacing = 5
- OnClick = Przycisk_PomocClick
- end
- object Image2: TImage
- Left = 6
- Top = 14
- Width = 32
- Height = 32
- Hint =
- 'U�ywaj�c tego narz�dzia mo�esz '#13#10'utworzy� list� opcjonalnych wyb' +
- 'or�w.'
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image000.ico>}
- ShowHint = True
- end
- object Panel1: TPanel
- Left = 44
- Top = 4
- Width = 266
- Height = 286
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label1: TLabel
- Left = 8
- Top = 17
- Width = 36
- Height = 13
- Caption = '&Nazwa:'
- FocusControl = Edit_Nazwa
- end
- object Label2: TLabel
- Left = 8
- Top = 48
- Width = 41
- Height = 13
- Caption = '&Rozmiar:'
- FocusControl = Edit1
- end
- object Label3: TLabel
- Left = 8
- Top = 84
- Width = 31
- Height = 13
- Caption = 'Op&cja:'
- FocusControl = EDT_Elem
- end
- object Przycisk_Dodaj: TToolbarButton97
- Left = 236
- Top = 132
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Dodanie opcji do listy'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- C6000000424DC60000000000000076000000280000000A0000000A0000000100
- 0400000000005000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777788877700
- 000077700087770000007770F087770000007880B088880000000000F0000800
- 00000FBFBFBF080000000000F000070000007770B087770000007770F0877700
- 00007770007777000000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_DodajClick
- end
- object Przycisk_Usun: TToolbarButton97
- Left = 236
- Top = 154
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Usuni�cie opcji z listy'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- C6000000424DC60000000000000076000000280000000A0000000A0000000100
- 0400000000005000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777700
- 0000777777777700000077777777770000007888888888000000000000000800
- 00000BFBFBFB0800000000000000070000007777777777000000777777777700
- 00007777777777000000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_UsunClick
- end
- object Przycisk_Wyczysc: TToolbarButton97
- Left = 236
- Top = 176
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Usuni�cie wszystkich opcji'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- AE000000424DAE0000000000000076000000280000000C000000070000000100
- 0400000000003800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDD80D
- 000000000DDDDD0800000000DDDDDDD00000000DDDDDDDD0000000D0DDDDDDD0
- 00000DDD00DDDD080000DDDDDD00008D0000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_WyczyscClick
- end
- object Bevel1: TBevel
- Left = 6
- Top = 64
- Width = 254
- Height = 10
- Shape = bsBottomLine
- end
- object BTN_Sort: TToolbarButton97
- Left = 236
- Top = 248
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Uporz�dkuj'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- EE000000424DEE000000000000007600000028000000100000000F0000000100
- 0400000000007800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DD000000DDDD
- D4DDDD00DDD0DDDD848DDDD00DDDDDDD444DDDDD00DDDDD84448DDDDD00DDDD4
- 4444DD0DDD00DDDDD4DDDD000000DDDDD4DDDDDDDDDDDDDDD4DDDD000D000DDD
- D4DDDD80DDD08DDDD4DDDDD00000DDDDD4DDDDD80D08DDDDD4DDDDDD000DDDDD
- D4DDDDDD808DDDDDD4DDDDDDD0DDDDDDD4DD}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = BTN_SortClick
- end
- object Bevel2: TBevel
- Left = 235
- Top = 239
- Width = 26
- Height = 7
- Shape = bsBottomLine
- end
- object MoveUpButton: TToolbarButton97
- Left = 236
- Top = 198
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Przesu� w g�r�'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- 4E010000424D4E01000000000000760000002800000012000000120000000100
- 040000000000D800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDD
- DDDDDDDDDDDDDD000000DDDDDDD77777DDDDDD000000DDDDDD000007DDDDDD00
- 0000DDDDDD0FBF07DDDDDD000000DDDDDD0BFB07DDDDDD000000DDDD770FBF07
- 77DDDD000000DDD0000BFB0000DDDD000000DDDD0FBFBFBF0DDDDD000000DDDD
- D0FBFBF0DDDDDD000000DDDDDD0FBF0DDDDDDD000000DDDDDDD0F0DDDDDDDD00
- 0000DDDDDDDD0DDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = MoveUpButtonClick
- end
- object MoveDownButton: TToolbarButton97
- Left = 236
- Top = 220
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Przesu� w d�'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- 4E010000424D4E01000000000000760000002800000012000000120000000100
- 040000000000D800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDD
- DDDDDDDDDDDDDD000000DDDDDDDD07DDDDDDDD000000DDDDDDD0F07DDDDDDD00
- 0000DDDDDD0FBF07DDDDDD000000DDDDD0FBFBF07DDDDD000000DDDD0FBFBFBF
- 07DDDD000000DDD0000BFB0000DDDD000000DDDDDD0FBF07DDDDDD000000DDDD
- DD0BFB07DDDDDD000000DDDDDD0FBF07DDDDDD000000DDDDDD00000DDDDDDD00
- 0000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = MoveDownButtonClick
- end
- object Label4: TLabel
- Left = 8
- Top = 109
- Width = 43
- Height = 13
- Caption = 'War&to��:'
- FocusControl = EDT_Value
- end
- object Edit_Nazwa: TEdit97
- Left = 56
- Top = 13
- Width = 204
- Height = 19
- HelpContext = 1160
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Check_Multiple: TCheckBox
- Left = 120
- Top = 46
- Width = 137
- Height = 17
- HelpContext = 1162
- Caption = '&Wybieranie wielu'
- TabOrder = 3
- end
- object Lista_Elementy: TListBox
- Left = 56
- Top = 132
- Width = 176
- Height = 147
- HelpContext = 1163
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- IntegralHeight = True
- ItemHeight = 13
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 6
- OnClick = Lista_ElementyClick
- OnKeyUp = Lista_ElementyKeyUp
- end
- object EDT_Elem: TEdit97
- Left = 56
- Top = 81
- Width = 204
- Height = 19
- HelpContext = 1163
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnKeyDown = EDT_ElemKeyDown
- end
- object Edit1: TEdit97
- Left = 57
- Top = 43
- Width = 28
- Height = 19
- HelpContext = 1161
- TabOrder = 1
- Text = '8'
- end
- object Spin_Rozmiar: TUpDown
- Left = 85
- Top = 43
- Width = 15
- Height = 19
- HelpContext = 1161
- Associate = Edit1
- Min = 1
- Position = 8
- TabOrder = 2
- Wrap = False
- end
- object EDT_Value: TEdit97
- Left = 56
- Top = 106
- Width = 204
- Height = 19
- HelpContext = 1163
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnKeyDown = EDT_ElemKeyDown
- end
- end
- end
-