object OdnosnikDlg: TOdnosnikDlg Left = 176 Top = 121 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsDialog Caption = 'Wstawianie URLa' ClientHeight = 202 ClientWidth = 488 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} KeyPreview = True Position = poScreenCenter OnCreate = FormCreate OnKeyDown = FormKeyDown PixelsPerInch = 96 TextHeight = 13 object Przycisk_OK: TToolbarButton97 Left = 420 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 = 420 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 = 420 Top = 134 Width = 65 Height = 65 Cursor = crHandPoint Caption = '&Pomoc' Layout = blGlyphTop ParentShowHint = False ShowHint = False Spacing = 5 OnClick = Przycisk_PomocClick end object Image4: TImage Left = 6 Top = 14 Width = 32 Height = 32 Hint = 'Tym narz�dziem mo�esz wstawi�'#13#10'URL i jego opis.' AutoSize = True ParentShowHint = False Picture.Data = {} ShowHint = True end object Notebook: TPageControl98 Left = 44 Top = 4 Width = 369 Height = 197 DrawStyle = tdDefault Images = ImageList2 ActivePage = Tab_Odnosnik HotTrack = True TabOrder = 0 TabStop = False object Tab_Odnosnik: TTabSheet98 Color = clBtnFace Caption = 'URL' TabFont.Charset = DEFAULT_CHARSET TabFont.Color = clWindowText TabFont.Height = -11 TabFont.Name = 'Arial' TabFont.Style = [] ImageIndex = 0 object Label1: TLabel Left = 8 Top = 20 Width = 22 Height = 13 Caption = '&URL' FocusControl = LST_URLe end object Przycisk_Otworz: TToolbarButton97 Left = 329 Top = 38 Width = 23 Height = 22 Cursor = crHandPoint Hint = 'Kliknij tutaj aby wybra� dokument' Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 77777777777777777777777788888888777777700000000087777700FBFBFBFB 0877770F0FBFBFBFB087770BF0FBFBFBFB08770FBF0000000007770BFBFBFBFB 0877770FBFBFBFBF077777000000000077777770FBFB07777777777800008777 7777777777777777777777777777777777777777777777777777} ParentShowHint = False ShowHint = True OnClick = Przycisk_OtworzClick end object Label2: TLabel Left = 8 Top = 92 Width = 52 Height = 13 Caption = '&Opis URLa' FocusControl = Edit_Opis end object Edit_Opis: TEdit97 Left = 8 Top = 112 Width = 345 Height = 21 Hint = 'Opis URLa' HelpContext = 660 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 240 ParentFont = False ParentShowHint = False ShowHint = False TabOrder = 0 end object LST_URLe: TEdit97 Left = 8 Top = 38 Width = 316 Height = 21 Hint = 'Wpisz tutaj adres URL' HelpContext = 650 TabOrder = 1 OnDblClick = Przycisk_OtworzClick end end end object ImageList1: TImageList BlendColor = clFuchsia BkColor = clFuchsia Left = 4 Top = 96 end object ImageList2: TImageList Left = 8 Top = 156 end end