home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1999 January
/
Chip_1999-01_cd.bin
/
sharewar
/
setup21
/
easypad.exe
/
0
/
RCDATA
/
TFRMNASTAVENI
/
TFRMNASTAVENI.txt
Wrap
Text File
|
1998-10-18
|
24KB
|
900 lines
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
object chkPodleHTML: TCheckBox
Left = 16
Top = 72
Width = 225
Height = 17
Caption = '&nov� soubor podle HTML �ablony'
State = cbChecked
TabOrder = 2
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 = (
'HTML soubory (*.htm, *.html)'
'ASP soubory (*.asp)'
'�ablony pro SpeedPanel (*.spd)'
'TAG soubory (*.tag)'
'Textov� soubory (*.txt)'
'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 = 'New filter'
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 = (
'*.htm'
'*.asp'
'*.spd'
'*.tag'
'*.txt'
'*.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 TabSheet9: TTabSheet
HelpContext = 142
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 TabSheet10: TTabSheet
HelpContext = 145
Caption = 'Prohl�e�e'
object GroupBox2: TGroupBox
Left = 8
Top = 8
Width = 369
Height = 241
Caption = 'Seznam extern�ch WWW prohl�e��'
TabOrder = 0
object Label1: TLabel
Left = 160
Top = 24
Width = 34
Height = 13
Caption = '&N�zev:'
FocusControl = edtProhlizec
end
object Label2: TLabel
Left = 160
Top = 64
Width = 30
Height = 13
Caption = '&Cesta:'
FocusControl = edtCesta
end
object Button3: TButton
Left = 160
Top = 112
Width = 75
Height = 25
Caption = 'P�id&at'
TabOrder = 3
OnClick = Button3Click
end
object btnDelBrow: TButton
Left = 160
Top = 144
Width = 75
Height = 25
Caption = 'O&dstranit'
Enabled = False
TabOrder = 4
OnClick = btnDelBrowClick
end
object lstCesty: TListBox
Left = 232
Top = 200
Width = 105
Height = 33
ItemHeight = 13
TabOrder = 5
Visible = False
end
object edtProhlizec: TEdit
Left = 160
Top = 40
Width = 121
Height = 21
Enabled = False
TabOrder = 1
OnChange = edtProhlizecChange
end
object edtCesta: TFilenameEdit
Left = 160
Top = 80
Width = 193
Height = 21
Filter = 'Programy (*.exe)|*.exe'
DialogOptions = [ofHideReadOnly, ofNoLongNames]
DialogTitle = 'Prohl�et'
Enabled = False
ButtonWidth = 20
NumGlyphs = 1
TabOrder = 2
OnChange = edtCestaChange
end
object lstBrowsers: TTextListBox
Left = 16
Top = 24
Width = 129
Height = 209
ItemHeight = 13
TabOrder = 0
OnClick = lstBrowsersClick
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'
'memoHlava.Lines'
'memoPata.Lines'
'lstBrowsers.Items'
'lstCesty.Items'
'lstAsociace.Items'
'lstPripona.Items'
'PageControl1.ActivePage'
'Memo1.Color'
'chkPodleHTML.Checked')
Left = 44
Top = 312
end
end