home *** CD-ROM | disk | FTP | other *** search
- object SkryptDlg: TSkryptDlg
- Left = 263
- Top = 152
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'Nag��wek skryptu'
- ClientHeight = 204
- ClientWidth = 403
- 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 Image2: TImage
- Left = 6
- Top = 14
- Width = 32
- Height = 32
- Hint =
- 'U�ywaj�c tego narz�dzia mo�esz wstawi� na '#13#10'stron� nag��wek skry' +
- 'ptu oraz jego opis (komentarz).'
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image000.ico>}
- ShowHint = True
- end
- object Przycisk_OK: TToolbarButton97
- Left = 336
- 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 = 336
- 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 = 336
- Top = 134
- Width = 65
- Height = 65
- Cursor = crHandPoint
- Caption = '&Pomoc'
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = False
- Spacing = 5
- OnClick = Przycisk_PomocClick
- end
- object Panel1: TPanel
- Left = 44
- Top = 4
- Width = 289
- Height = 197
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label1: TLabel
- Left = 8
- Top = 15
- Width = 67
- Height = 13
- Caption = '&J�zyk skryptu:'
- FocusControl = Lista_Jezyk
- end
- object Label3: TLabel
- Left = 54
- Top = 43
- Width = 21
- Height = 13
- Caption = '&Typ:'
- FocusControl = LST_TYP
- end
- object Label2: TLabel
- Left = 8
- Top = 98
- Width = 194
- Height = 13
- Caption = 'Opis &skryptu (wstawiany jako komentarz):'
- FocusControl = MEM_Comments
- end
- object Przycisk_URL: TToolbarButton97
- Left = 258
- Top = 68
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Kliknij, aby wybra� lokalizacj� skryptu.'
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 77777777777777777777777788888888777777700000000087777700FBFBFBFB
- 0877770F0FBFBFBFB087770BF0FBFBFBFB08770FBF0000000007770BFBFBFBFB
- 0877770FBFBFBFBF077777000000000077777770FBFB07777777777800008777
- 7777777777777777777777777777777777777777777777777777}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_URLClick
- end
- object Label4: TLabel
- Left = 19
- Top = 73
- Width = 56
- Height = 13
- Caption = '&Lokalizacja:'
- end
- object Lista_Jezyk: TComboBox98
- Left = 80
- Top = 11
- Width = 201
- Height = 21
- HelpContext = 1170
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'JavaScript'
- 'JavaScript1.1'
- 'JavaScript1.2'
- 'JScript'
- 'LiveScript'
- 'VBScript')
- ParentFont = False
- TabOrder = 0
- OnChange = Lista_JezykChange
- Complete = True
- MinLengthComplete = 0
- end
- object LST_TYP: TComboBox98
- Left = 80
- Top = 39
- Width = 201
- Height = 21
- HelpContext = 1172
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'text/javascript'
- 'text/tcl'
- 'text/vbscript')
- ParentFont = False
- TabOrder = 1
- Complete = True
- MinLengthComplete = 0
- end
- object MEM_Comments: TMemo
- Left = 8
- Top = 115
- Width = 273
- Height = 74
- HelpContext = 2392
- TabOrder = 2
- end
- object Edit_URL: TEdit97
- Left = 80
- Top = 70
- Width = 175
- Height = 19
- Hint = 'Okre�la lokalizacj� skryptu.'
- HelpContext = 1171
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnDblClick = Przycisk_URLClick
- end
- end
- end
-