home *** CD-ROM | disk | FTP | other *** search
- object IFrameDlg: TIFrameDlg
- Left = 239
- Top = 112
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsDialog
- Caption = 'P�ywaj�ca ramka'
- ClientHeight = 203
- ClientWidth = 436
- 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 = 368
- 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 = 368
- 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 = 368
- 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 = 14
- Width = 32
- Height = 32
- Hint = 'To narz�dzie s�u�y do definiowania '#13#10'tzw. "p�ywaj�cych ramek". '
- AutoSize = True
- ParentShowHint = False
- Picture.Data = {<image000.ico>}
- ShowHint = True
- end
- object Panel1: TPanel
- Left = 44
- Top = 4
- Width = 321
- Height = 195
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Label1: TLabel
- Left = 34
- Top = 17
- Width = 36
- Height = 13
- Caption = '&Nazwa:'
- FocusControl = Edit_Ramka_Nazwa
- end
- object Label2: TLabel
- Left = 17
- Top = 49
- Width = 53
- Height = 13
- Caption = '&Zawarto��:'
- FocusControl = Edit_Ramka_URL
- end
- object Label3: TLabel
- Left = 8
- Top = 79
- Width = 62
- Height = 13
- Caption = 'Wy&r�wnanie:'
- FocusControl = Lista_Align
- end
- object Label4: TLabel
- Left = 17
- Top = 109
- Width = 53
- Height = 13
- Caption = '&Szeroko��:'
- FocusControl = Edit1
- end
- object Label5: TLabel
- Left = 186
- Top = 79
- Width = 38
- Height = 13
- Caption = 'S&uwaki:'
- FocusControl = Lista_Suwak
- end
- object Label6: TLabel
- Left = 171
- Top = 109
- Width = 53
- Height = 13
- Caption = '&Wysoko��:'
- FocusControl = Edit3
- end
- object Label7: TLabel
- Left = 17
- Top = 133
- Width = 53
- Height = 26
- Caption = 'Szero&ko�� marginesu'
- FocusControl = Edit2
- WordWrap = True
- end
- object Label8: TLabel
- Left = 171
- Top = 133
- Width = 53
- Height = 26
- Caption = 'Wysoko�� &marginesu'
- FocusControl = Edit4
- WordWrap = True
- end
- object Przycisk_URL: TToolbarButton97
- Left = 289
- Top = 44
- Width = 23
- Height = 22
- Cursor = crHandPoint
- Hint = 'Kliknij, aby wybra� dokument do umieszczenia w ramce'
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 77777777777777777777777788888888777777700000000087777700FBFBFBFB
- 0877770F0FBFBFBFB087770BF0FBFBFBFB08770FBF0000000007770BFBFBFBFB
- 0877770FBFBFBFBF077777000000000077777770FBFB07777777777800008777
- 7777777777777777777777777777777777777777777777777777}
- Layout = blGlyphTop
- ParentShowHint = False
- ShowHint = True
- OnClick = Przycisk_URLClick
- end
- object Check_FrameBorder: TCheckBox
- Left = 76
- Top = 168
- Width = 221
- Height = 17
- Hint = 'Zaznacz, aby p�ywaj�ca ramka posiada�a tr�jwymiarowe obramowanie'
- HelpContext = 1146
- Caption = 'Obramowa&nie wok� p�ywaj�cej ramki'
- TabOrder = 12
- end
- object Edit_Ramka_Nazwa: TEdit97
- Left = 77
- Top = 14
- Width = 236
- Height = 19
- Hint = 'Nazwa p�ywaj�cej ramki'
- HelpContext = 1140
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object Lista_Align: TComboBox
- Left = 77
- Top = 75
- Width = 84
- Height = 21
- Hint = 'Wyr�wnanie ramki w stosunku do otaczaj�cych j� element�w.'
- HelpContext = 1142
- Style = csDropDownList
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'do lewej'
- 'do prawej'
- 'na �rodek'
- 'do g�ry'
- 'do do�u')
- ParentFont = False
- TabOrder = 2
- end
- object Lista_Suwak: TComboBox
- Left = 229
- Top = 75
- Width = 84
- Height = 21
- Hint = 'Okre�la, czy ramki maj� by� dost�pne suwaki.'
- HelpContext = 1143
- Style = csDropDownList
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'Auto'
- 'Tak'
- 'Nie')
- ParentFont = False
- TabOrder = 3
- end
- object Edit_Ramka_URL: TComboBox98
- Left = 77
- Top = 44
- Width = 208
- Height = 21
- Hint = 'Okre�la zawarto�� p�ywaj�cej ramki'
- HelpContext = 1141
- ItemHeight = 13
- TabOrder = 1
- OnDblClick = Przycisk_URLClick
- Complete = True
- MinLengthComplete = 0
- end
- object Edit1: TEdit97
- Left = 76
- Top = 105
- Width = 68
- Height = 19
- HelpContext = 1144
- TabOrder = 4
- Text = '0'
- end
- object Edit2: TEdit97
- Left = 76
- Top = 137
- Width = 68
- Height = 19
- HelpContext = 1145
- TabOrder = 8
- Text = '0'
- end
- object Edit3: TEdit97
- Left = 229
- Top = 105
- Width = 68
- Height = 19
- HelpContext = 1144
- TabOrder = 6
- Text = '0'
- end
- object Edit4: TEdit97
- Left = 229
- Top = 137
- Width = 68
- Height = 19
- HelpContext = 1145
- TabOrder = 10
- Text = '0'
- end
- object Spin_Szerokosc: TUpDown
- Left = 144
- Top = 104
- Width = 15
- Height = 21
- HelpContext = 1144
- Associate = Edit1
- Min = 0
- Max = 2048
- Increment = 5
- Position = 0
- TabOrder = 5
- Wrap = False
- end
- object Spin_Margines_Szer: TUpDown
- Left = 144
- Top = 136
- Width = 15
- Height = 21
- HelpContext = 1145
- Associate = Edit2
- Min = 0
- Max = 2048
- Increment = 5
- Position = 0
- TabOrder = 9
- Wrap = False
- end
- object Spin_Wysokosc: TUpDown
- Left = 297
- Top = 104
- Width = 15
- Height = 21
- HelpContext = 1144
- Associate = Edit3
- Min = 0
- Max = 2048
- Increment = 5
- Position = 0
- TabOrder = 7
- Wrap = False
- end
- object Spin_Margines_Wys: TUpDown
- Left = 297
- Top = 136
- Width = 15
- Height = 21
- HelpContext = 1145
- Associate = Edit4
- Min = 0
- Max = 2048
- Increment = 5
- Position = 0
- TabOrder = 11
- Wrap = False
- end
- end
- end
-