home *** CD-ROM | disk | FTP | other *** search
- object FInneDlg: TFInneDlg
- Left = 153
- Top = 100
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'Elementy formularza'
- ClientHeight = 332
- ClientWidth = 547
- 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 = 480
- Top = 4
- 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 = 480
- Top = 69
- 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 = 480
- Top = 134
- 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 = 10
- Width = 32
- Height = 32
- Hint =
- 'Przy pomocy tego narz�dzia mo�na okre�li� '#13#10'dodatkowe r�ne elem' +
- 'enty formularza.'
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image000.ico>}
- ShowHint = True
- end
- object Panel1: TPanel
- Left = 44
- Top = 4
- Width = 433
- Height = 321
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label_Nazwa: TLabel
- Left = 199
- Top = 8
- Width = 36
- Height = 13
- Caption = '&Nazwa:'
- FocusControl = Edit_Name
- end
- object Label_Value: TLabel
- Left = 316
- Top = 8
- Width = 43
- Height = 13
- Caption = '&Warto��:'
- FocusControl = Edit_Value
- end
- object Label_Maxlength: TLabel
- Left = 199
- Top = 51
- Width = 49
- Height = 29
- AutoSize = False
- Caption = 'Max &d�ugo��:'
- FocusControl = Edit2
- WordWrap = True
- end
- object Label_Obrazek: TLabel
- Left = 199
- Top = 148
- Width = 25
- Height = 13
- Caption = '&URL:'
- FocusControl = Edit_Obrazek
- end
- object Label_Align: TLabel
- Left = 199
- Top = 108
- Width = 59
- Height = 13
- Caption = 'W&yr�wnanie'
- FocusControl = Lista_Align
- end
- object Label_Rozmiar: TLabel
- Left = 315
- Top = 59
- Width = 41
- Height = 13
- Caption = '&Rozmiar:'
- FocusControl = Edit1
- end
- object Bevel1: TBevel
- Left = 188
- Top = 7
- Width = 9
- Height = 182
- Shape = bsLeftLine
- end
- object Przycisk_Obrazek: TToolbarButton97
- Left = 404
- Top = 163
- Width = 23
- Height = 22
- Cursor = crHandPoint
- DisplayMode = dmGlyphOnly
- DropdownArrow = False
- Glyph.Data = {
- 4E010000424D4E01000000000000760000002800000012000000120000000100
- 040000000000D800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDD
- D77777777DDDDD000000DDDD0000000007DDDD000000DDD00FBFBFBFB07DDD00
- 0000DDD0F0FBFBFBFB07DD000000DDD0BF0FBFBFBFB07D000000DDD0FBF00000
- 0000DD000000DDD0BFBFBFBFB07DDD000000DDD0FBFBFBFBF0DDDD000000DDD0
- 000000000DDDDD000000DDDD0FBFB0DDDDDDDD000000DDDD700007DDDDDDDD00
- 0000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDDDDDDDD000000DDDDDDDDDDDD
- DDDDDD000000DDDDDDDDDDDDDDDDDD000000}
- Layout = blGlyphTop
- Opaque = False
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_ObrazekClick
- end
- object Label1: TLabel
- Left = 10
- Top = 189
- Width = 99
- Height = 13
- Caption = 'Sk�adniki formularza:'
- end
- object Label2: TLabel
- Left = 9
- Top = 5
- Width = 144
- Height = 13
- Caption = 'Dost�pne elementy formularzy:'
- end
- object Przycisk_Dodaj: TToolbarButton97
- Left = 404
- Top = 206
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Dodanie elementu do formularza'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- C6000000424DC60000000000000076000000280000000A0000000A0000000100
- 0400000000005000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777788877700
- 000077700087770000007770F087770000007880B088880000000000F0000800
- 00000FBFBFBF080000000000F000070000007770B087770000007770F0877700
- 00007770007777000000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_DodajClick
- end
- object Przycisk_Wyczysc: TToolbarButton97
- Left = 404
- Top = 228
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Wyczyszczenie formularza'
- DisplayMode = dmGlyphOnly
- Glyph.Data = {
- AE000000424DAE0000000000000076000000280000000C000000070000000100
- 0400000000003800000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDD80D
- 000000000DDDDD0800000000DDDDDDD00000000DDDDDDDD0000000D0DDDDDDD0
- 00000DDD00DDDD080000DDDDDD00008D0000}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_WyczyscClick
- end
- object Edit_Name: TEdit97
- Left = 199
- Top = 24
- Width = 112
- Height = 19
- HelpContext = 1321
- TabOrder = 0
- end
- object Edit_Value: TEdit97
- Left = 314
- Top = 24
- Width = 110
- Height = 19
- HelpContext = 1322
- TabOrder = 1
- end
- object Lista_Align: TComboBox98
- Left = 199
- Top = 124
- Width = 110
- Height = 21
- HelpContext = 1325
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'do g�ry'
- 'na �rodek'
- 'do do�u'
- 'do lewej'
- 'do prawej')
- TabOrder = 8
- Complete = True
- MinLengthComplete = 0
- end
- object Check_Checked: TCheckBox
- Left = 199
- Top = 85
- Width = 89
- Height = 17
- HelpContext = 1327
- Caption = '&Zaznaczony ?'
- TabOrder = 6
- end
- object Check_Tab: TCheckBox
- Left = 314
- Top = 85
- Width = 111
- Height = 17
- HelpContext = 1328
- Caption = 'Obs�uga &TAB ?'
- State = cbChecked
- TabOrder = 7
- end
- object Edit_Obrazek: TComboBox98
- Left = 199
- Top = 164
- Width = 202
- Height = 21
- HelpContext = 1329
- ItemHeight = 13
- TabOrder = 11
- Complete = True
- MinLengthComplete = 0
- end
- object Edit1: TEdit97
- Left = 370
- Top = 54
- Width = 38
- Height = 19
- HelpContext = 1323
- TabOrder = 4
- Text = '0'
- end
- object Edit2: TEdit97
- Left = 253
- Top = 54
- Width = 41
- Height = 19
- HelpContext = 1324
- TabOrder = 2
- Text = '0'
- end
- object Spin_Rozmiar: TUpDown
- Left = 408
- Top = 54
- Width = 15
- Height = 21
- HelpContext = 1323
- Associate = Edit1
- Min = 0
- Max = 2048
- Position = 0
- TabOrder = 5
- Wrap = False
- end
- object Spin_Maxlength: TUpDown
- Left = 294
- Top = 54
- Width = 15
- Height = 21
- HelpContext = 1324
- Associate = Edit2
- Min = 0
- Max = 2048
- Position = 0
- TabOrder = 3
- Wrap = False
- end
- object CHK_Keys: TCheckBox
- Left = 314
- Top = 125
- Width = 63
- Height = 17
- HelpContext = 1339
- Caption = '&Hotkey'
- TabOrder = 9
- OnClick = CHK_KeysClick
- end
- object LST_keys: TComboBox98
- Left = 372
- Top = 123
- Width = 53
- Height = 21
- HelpContext = 1339
- Style = csDropDownList
- Enabled = False
- ItemHeight = 13
- Items.Strings = (
- 'A'
- 'B'
- 'C'
- 'D'
- 'E'
- 'F'
- 'G'
- 'H'
- 'I'
- 'J'
- 'K'
- 'L'
- 'M'
- 'N'
- 'O'
- 'P'
- 'Q'
- 'R'
- 'S'
- 'T'
- 'U'
- 'V'
- 'W'
- 'X'
- 'Y'
- 'Z'
- '0'
- '1'
- '2'
- '3'
- '4'
- '5'
- '6'
- '7'
- '8'
- '9')
- TabOrder = 10
- Complete = True
- MinLengthComplete = 0
- end
- object Mem_Form: TSyntaxMemo
- Left = 8
- Top = 206
- Width = 392
- Height = 109
- HelpContext = 2330
- ActiveParser = 1
- ClipCopyFormats = [smTEXT, smRTF]
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = []
- Gutter = 18
- HyperCursor = crDefault
- IndentStep = 1
- Margin = 2
- Modified = False
- Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoProcessDroppedFiles, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack, smoUseTAB, smoSmartFill, smoOLEDragSource]
- Parser1 = MainFormx.HTMLParser
- ReadOnly = False
- RightMargin = 80
- SaveFormat = sfTEXT
- SelStart = 0
- SelLength = 0
- SelTextColor = clWhite
- SelTextBack = clNavy
- TabDefault = 4
- TabOrder = 12
- Version = '2.00.02'
- VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
- WrapAtColumn = 0
- end
- end
- object Lista_El: THETreeView
- Left = 51
- Top = 25
- Width = 175
- Height = 164
- HelpContext = 1320
- ReadOnly = True
- RightClickSelect = True
- HideSelection = False
- Indent = 19
- Items.Data = {
- 0A0000002D0000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
- 14506F6C652065647963796A6E65202254657874222100000001000000010000
- 00FFFFFFFFFFFFFFFF00000000000000000854657874617265612D0000000200
- 000002000000FFFFFFFFFFFFFFFF000000000000000014506F6C6520686173B3
- 612250617373776F7264222D0000000900000009000000FFFFFFFFFFFFFFFF00
- 0000000000000014506F6C6520756B72797465202248696464656E222C000000
- 0300000003000000FFFFFFFFFFFFFFFF0000000000000000134F70636A612031
- 202022436865636B426F7822290000000400000004000000FFFFFFFFFFFFFFFF
- 0000000000000000104F70636A612032202022526164696F2228000000060000
- 0006000000FFFFFFFFFFFFFFFF00000000000000000F5A77796BB3792070727A
- 796369736B290000000500000005000000FFFFFFFFFFFFFFFF00000000000000
- 001050727A796369736B20225265736574222A0000000600000006000000FFFF
- FFFFFFFFFFFF00000000000000001150727A796369736B20225375626D697422
- 2E0000000700000007000000FFFFFFFFFFFFFFFF000000000000000015506F74
- 77696572647A656E6965206F6272617A656B}
- OnChange = Lista_ElChange
- TabOrder = 1
- Images = Images
- end
- object Images: TImageList
- Left = 8
- Top = 44
- end
- end
-