home *** CD-ROM | disk | FTP | other *** search
- object frmNastaveni: TfrmNastaveni
- Left = 181
- Top = 90
- HelpContext = 17
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'Mo�nosti'
- ClientHeight = 342
- ClientWidth = 407
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PopupMenu = popNastav
- Position = poScreenCenter
- ShowHint = True
- OnActivate = FormActivate
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl1: TPageControl
- Left = 8
- Top = 8
- Width = 393
- Height = 297
- ActivePage = TabSheet1
- MultiLine = True
- TabOrder = 0
- object TabSheet1: TTabSheet
- HelpContext = 26
- Caption = 'Obecn�'
- object GroupBox1: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 137
- Caption = 'Obecn�'
- TabOrder = 0
- object Label6: TLabel
- Left = 16
- Top = 20
- Width = 123
- Height = 13
- Caption = '&Form�t pro "Vlo�it datum":'
- FocusControl = edtPoleDatum
- end
- object chkSaveOnExit: TCheckBox
- Left = 16
- Top = 104
- Width = 161
- Height = 17
- Caption = '&ulo�it p�i ukon�en�'
- State = cbChecked
- TabOrder = 3
- end
- object edtPoleDatum: TEdit
- Left = 16
- Top = 36
- Width = 185
- Height = 21
- Hint = 'Lze pou��t substituce ^datum^ a ^�as^'
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Text = 'Dne ^datum^ v ^�as^'
- end
- object Button1: TButton
- Left = 16
- Top = 64
- Width = 153
- Height = 25
- Caption = 'P�idat do slo�ky "&Odeslat"'
- TabOrder = 1
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 208
- Top = 64
- Width = 145
- Height = 25
- Caption = 'P�idat na "&Plochu"'
- TabOrder = 2
- OnClick = Button2Click
- end
- end
- object GroupBox5: TGroupBox
- Left = 8
- Top = 152
- Width = 369
- Height = 97
- Caption = 'P�i startu'
- TabOrder = 1
- object chkZalomit: TCheckBox
- Left = 16
- Top = 24
- Width = 97
- Height = 17
- Caption = 'za&lomit ��dky'
- TabOrder = 0
- end
- object chkOdsaz: TCheckBox
- Left = 16
- Top = 48
- Width = 153
- Height = 17
- Caption = 'automatick� o&dsazov�n�'
- State = cbChecked
- TabOrder = 1
- end
- end
- end
- object TabSheet3: TTabSheet
- HelpContext = 27
- Caption = 'Dialogy'
- object GroupBox4: TGroupBox
- Left = 8
- Top = 112
- Width = 369
- Height = 137
- Caption = '&Maska pro dialog Otev��t/Ulo�it'
- TabOrder = 0
- object Label3: TLabel
- Left = 208
- Top = 40
- Width = 56
- Height = 13
- Caption = '&N�zev filtru:'
- FocusControl = edtNameFiltr
- end
- object Label4: TLabel
- Left = 208
- Top = 82
- Width = 19
- Height = 13
- Caption = '&Filtr:'
- FocusControl = edtFiltr
- end
- object lstFiltr: TListBox
- Left = 8
- Top = 16
- Width = 137
- Height = 105
- ItemHeight = 13
- Items.Strings = (
- 'Textov� soubory (*.txt)'
- '�ablony pro SpeedPanel (*.spd)'
- 'HTML soubory (*.htm, *.html)'
- 'Pascalovsk� soubory (*.pas)'
- 'V�echny soubory (*.*)')
- TabOrder = 0
- OnClick = lstFiltrClick
- end
- object btnUp: TButton
- Left = 152
- Top = 40
- Width = 20
- Height = 22
- Caption = '�'
- Enabled = False
- Font.Charset = SYMBOL_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Wingdings'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- OnClick = btnUpClick
- end
- object btnDown: TButton
- Left = 181
- Top = 40
- Width = 20
- Height = 22
- Caption = '�'
- Font.Charset = SYMBOL_CHARSET
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'Wingdings'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 2
- OnClick = btnDownClick
- end
- object btnAdd: TButton
- Left = 152
- Top = 72
- Width = 50
- Height = 22
- Caption = 'P�id&at'
- TabOrder = 3
- OnClick = btnAddClick
- end
- object btnDelete: TButton
- Left = 152
- Top = 99
- Width = 50
- Height = 22
- Caption = 'O&dstranit'
- TabOrder = 4
- OnClick = btnDeleteClick
- end
- object edtNameFiltr: TEdit
- Left = 208
- Top = 56
- Width = 145
- Height = 21
- TabOrder = 5
- Text = 'Nov� filtr'
- OnChange = edtNameFiltrChange
- OnEnter = edtNameFiltrEnter
- end
- object edtFiltr: TEdit
- Left = 208
- Top = 99
- Width = 145
- Height = 21
- TabOrder = 7
- Text = '*.'
- OnChange = edtFiltrChange
- end
- object lstPripona: TListBox
- Left = 232
- Top = 16
- Width = 73
- Height = 25
- ItemHeight = 13
- Items.Strings = (
- '*.txt'
- '*.spd'
- '*.htm'
- '*.pas'
- '*.*')
- TabOrder = 6
- Visible = False
- end
- end
- object GroupBox6: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 89
- Caption = 'Dialog "Otev��t"'
- TabOrder = 1
- object Label5: TLabel
- Left = 16
- Top = 24
- Width = 144
- Height = 13
- Caption = '&Slo�ka p�i spu�t�n� EasyPadu:'
- FocusControl = edtOpenSlozka
- end
- object edtOpenSlozka: TDirectoryEdit
- Left = 16
- Top = 40
- Width = 337
- Height = 21
- NumGlyphs = 1
- TabOrder = 0
- end
- end
- end
- object TabSheet2: TTabSheet
- HelpContext = 28
- Caption = 'P�sma/Barvy'
- object GroupBox3: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 241
- Caption = 'P�smo a barva'
- TabOrder = 0
- object btnPismo: TButton
- Left = 16
- Top = 24
- Width = 81
- Height = 25
- Caption = '&Typ p�sma...'
- TabOrder = 0
- OnClick = btnPismoClick
- end
- object Memo1: TMemo
- Left = 16
- Top = 120
- Width = 337
- Height = 105
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- Lines.Strings = (
- 'Sample text'
- 'Sample text'
- 'Sample text'
- 'Sample text'
- 'Sample text')
- ParentFont = False
- ReadOnly = True
- TabOrder = 5
- end
- object lstTextBarva: TListBox
- Left = 16
- Top = 72
- Width = 81
- Height = 33
- ItemHeight = 13
- Items.Strings = (
- 'barva textu'
- 'barva pozad�')
- TabOrder = 1
- end
- object btnStandard: TButton
- Left = 216
- Top = 19
- Width = 137
- Height = 25
- Caption = '&Standardn� barvy a p�smo'
- TabOrder = 4
- OnClick = btnStandardClick
- end
- object ColorGrid2: TColorGrid
- Left = 104
- Top = 72
- Width = 144
- Height = 16
- Ctl3D = False
- GridOrdering = go16x1
- BackgroundEnabled = False
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -4
- Font.Name = 'Arial'
- Font.Style = []
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 2
- OnChange = ColorGrid2Change
- end
- object Panel2: TPanel
- Left = 256
- Top = 73
- Width = 13
- Height = 13
- Caption = '...'
- Color = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 3
- OnClick = Panel2Click
- end
- end
- end
- object TabSheet4: TTabSheet
- HelpContext = 29
- Caption = 'Z�lo�ky'
- object GroupBox7: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 241
- Caption = 'Um�st�n� z�lo�ek'
- TabOrder = 0
- object GroupBox9: TGroupBox
- Left = 16
- Top = 24
- Width = 161
- Height = 201
- Caption = 'Pro SpeedPanel'
- TabOrder = 0
- object rdSpeedD: TRadioButton
- Left = 16
- Top = 40
- Width = 113
- Height = 17
- Caption = '&dole'
- Checked = True
- TabOrder = 1
- TabStop = True
- OnClick = rdSpeedDClick
- end
- object rdSpeedN: TRadioButton
- Left = 16
- Top = 16
- Width = 81
- Height = 17
- Caption = '&naho�e'
- TabOrder = 0
- OnClick = rdSpeedNClick
- end
- object chk1: TCheckBox
- Left = 16
- Top = 176
- Width = 129
- Height = 17
- Caption = '&v�ce��dkov� re�im'
- State = cbChecked
- TabOrder = 2
- OnClick = chk1Click
- end
- object zalSpeed: TPage95Control
- Left = 8
- Top = 64
- Width = 145
- Height = 105
- ActivePage = Tab95Sheet3
- FlatSeperators = False
- HotTrack = False
- TabInactiveColor = clSilver
- TabInactiveFont.Charset = DEFAULT_CHARSET
- TabInactiveFont.Color = clWindowText
- TabInactiveFont.Height = -11
- TabInactiveFont.Name = 'MS Sans Serif'
- TabInactiveFont.Style = []
- MultiLine = True
- TabOrder = 3
- TabPosition = tpBottomRight
- object Tab95Sheet1: TTab95Sheet
- Caption = 'Soubory'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- end
- object Tab95Sheet2: TTab95Sheet
- Caption = 'Html'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- end
- object Tab95Sheet3: TTab95Sheet
- Caption = 'Obl�ben�'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- end
- object Tab95Sheet4: TTab95Sheet
- Caption = 'Spustit'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- end
- end
- end
- object GroupBox10: TGroupBox
- Left = 184
- Top = 24
- Width = 169
- Height = 201
- Caption = 'Pro editor'
- TabOrder = 1
- object rdDole: TRadioButton
- Left = 8
- Top = 40
- Width = 49
- Height = 17
- Caption = 'd&ole'
- Checked = True
- TabOrder = 2
- TabStop = True
- OnClick = rdDoleClick
- end
- object rdNahore: TRadioButton
- Left = 8
- Top = 16
- Width = 57
- Height = 17
- Caption = 'n&aho�e'
- TabOrder = 1
- OnClick = rdNahoreClick
- end
- object chk2: TCheckBox
- Left = 8
- Top = 176
- Width = 129
- Height = 17
- Caption = 'v�&ce��dkov� re�im'
- State = cbChecked
- TabOrder = 3
- OnClick = chk2Click
- end
- object zalUkazka: TPage95Control
- Left = 8
- Top = 64
- Width = 153
- Height = 105
- ActivePage = Tab95Sheet6
- FlatSeperators = False
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -9
- Font.Name = 'Small Fonts'
- Font.Style = []
- HotTrack = False
- TabInactiveColor = clSilver
- TabInactiveFont.Charset = EASTEUROPE_CHARSET
- TabInactiveFont.Color = clWindowText
- TabInactiveFont.Height = -9
- TabInactiveFont.Name = 'Small Fonts'
- TabInactiveFont.Style = []
- MultiLine = True
- ParentFont = False
- TabOrder = 0
- TabPosition = tpBottomRight
- object Tab95Sheet5: TTab95Sheet
- Caption = 'A1.HTM'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- object Memo2: TMemo
- Left = 0
- Top = 0
- Width = 145
- Height = 63
- Align = alClient
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- Lines.Strings = (
- '<html>'
- '<head>'
- '<meta '
- 'http-equiv="Content'
- '-Type" '
- 'content="text/html; '
- 'charset=windows-125'
- '0">')
- ParentFont = False
- TabOrder = 0
- end
- end
- object Tab95Sheet6: TTab95Sheet
- Caption = 'BETA.HTM'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- object Memo3: TMemo
- Left = 0
- Top = 0
- Width = 145
- Height = 63
- Align = alClient
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- Lines.Strings = (
- '<html>'
- '<head>'
- '<meta '
- 'http-equiv="Content'
- '-Type" '
- 'content="text/html; '
- 'charset=windows-125'
- '0">')
- ParentFont = False
- TabOrder = 0
- end
- end
- object Tab95Sheet7: TTab95Sheet
- Caption = 'SOUBOR.HTM'
- GripAlign = gaLeft
- ImageIndex = -1
- StaticPageIndex = -1
- TabVisible = True
- object Memo4: TMemo
- Left = 0
- Top = 0
- Width = 145
- Height = 65
- Align = alClient
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- Lines.Strings = (
- '<html>'
- '<head>'
- '<meta '
- 'http-equiv="Content'
- '-Type" '
- 'content="text/html; '
- 'charset=windows-125'
- '0">')
- ParentFont = False
- TabOrder = 0
- end
- end
- end
- end
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'HTML'
- object GroupBox11: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 241
- Caption = '�ablona pro p�evod do HTML'
- TabOrder = 0
- object Label7: TLabel
- Left = 16
- Top = 16
- Width = 39
- Height = 13
- Caption = 'Z�&hlav�:'
- FocusControl = memoHlava
- end
- object Label8: TLabel
- Left = 16
- Top = 128
- Width = 34
- Height = 13
- Caption = 'Z�&pat�:'
- FocusControl = memoPata
- end
- object memoHlava: TMemo
- Left = 8
- Top = 32
- Width = 345
- Height = 81
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 0
- end
- object memoPata: TMemo
- Left = 8
- Top = 144
- Width = 345
- Height = 81
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 1
- end
- end
- end
- object TabSheet6: TTabSheet
- HelpContext = 30
- Caption = 'Asociace'
- object GroupBox8: TGroupBox
- Left = 8
- Top = 8
- Width = 369
- Height = 241
- Caption = 'Asociovan� p��pony soubor�'
- TabOrder = 0
- object edtPridat: TEdit
- Left = 16
- Top = 24
- Width = 121
- Height = 21
- TabOrder = 0
- OnChange = edtPridatChange
- end
- object lstAsociace: TListBox
- Left = 16
- Top = 48
- Width = 121
- Height = 185
- ItemHeight = 13
- TabOrder = 3
- OnClick = lstAsociaceClick
- end
- object btnAddAsoc: TButton
- Left = 152
- Top = 24
- Width = 75
- Height = 25
- Caption = 'P�id&at'
- Enabled = False
- TabOrder = 1
- OnClick = btnAddAsocClick
- end
- object btnDelAsoc: TButton
- Left = 152
- Top = 56
- Width = 75
- Height = 25
- Caption = 'O&dstranit'
- Enabled = False
- TabOrder = 2
- OnClick = btnDelAsocClick
- end
- end
- end
- end
- object btnOK: TButton
- Left = 238
- Top = 312
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- TabOrder = 1
- OnClick = btnOKClick
- end
- object btnStorno: TButton
- Left = 326
- Top = 312
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Storno'
- TabOrder = 2
- OnClick = btnStornoClick
- end
- object FontDialog2: TFontDialog
- Font.Charset = EASTEUROPE_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Courier New'
- Font.Style = []
- MinFontSize = 0
- MaxFontSize = 0
- Left = 76
- Top = 312
- end
- object ColorDialog2: TColorDialog
- Ctl3D = True
- Options = [cdFullOpen]
- Left = 112
- Top = 312
- end
- object popNastav: TPopupMenu
- Left = 192
- Top = 312
- object Dalzloka1: TMenuItem
- Caption = 'Next page'
- ShortCut = 16418
- Visible = False
- OnClick = Dalzloka1Click
- end
- object Pedchozzloka1: TMenuItem
- Caption = 'Previous page'
- ShortCut = 16417
- Visible = False
- OnClick = Pedchozzloka1Click
- end
- end
- object OpenDialog1: TOpenDialog
- Filter = 'Programy (*.exe)|*.exe|V�echny soubory (*.*)|*.*'
- InitialDir = 'C:\Program Files'
- Left = 148
- Top = 312
- end
- object FormStorage2: TFormStorage
- IniSection = 'Options'
- StoredProps.Strings = (
- 'edtPoleDatum.Text'
- 'chkSaveOnExit.Checked'
- 'chkZalomit.Checked'
- 'chkOdsaz.Checked'
- 'edtOpenSlozka.Text'
- 'lstFiltr.Items'
- 'rdSpeedD.Checked'
- 'rdSpeedN.Checked'
- 'rdDole.Checked'
- 'rdNahore.Checked'
- 'chk1.Checked'
- 'chk2.Checked'
- 'lstAsociace.Items'
- 'lstPripona.Items'
- 'PageControl1.ActivePage'
- 'Memo1.Color'
- 'memoHlava.Lines'
- 'memoPata.Lines')
- Left = 44
- Top = 312
- end
- end
-