UOchRezerwacjaSkype.frm

object OchRezerwacjaSkype: TOchRezerwacjaSkype
  Left = 368
  Height = 558
  Top = 364
  Width = 1238
  Caption = 'Rezerwacja rozmów przez Skype'
  ClientHeight = 558
  ClientWidth = 1238
  Icon.Data = {
    7E04000000000100010010100000010020006804000016000000280000001000
    0000200000000100200000000000000400006400000064000000000000000000
    0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    FF00FFFFFF00AA830000AA830000AA820000A67E0000AD880C28C0A0376ECCB1
    5392CBAF5294D5BB64AFEBD794E7EBD894E7D4BB65ACAE8A1132A7800000FFFF
    FF00FFFFFF00AA830000A9820000A780010BC8A9428EF0D67EF1FDE182FFFFE3
    81FFFFE380FFFFE37EFFFFE17CFFFFE27FFFFFE98FFFEAD27DE9B18C1230FFFF
    FF00FFFFFF00AA830000A881030AD1B34EB3FBDA6BFFFBD75EFFFBE292FFFCEB
    B3FFFCEBB2FFFAE18DFFF7D153FFF7CF49FFF8D04CFFFDDB6AFFDBBB4DADFFFF
    FF00FFFFFF00AF860000C8A73686F2CE54FFEFC846FFF9F0D3FFFEFFFFFFF9FA
    FFFFF9FAFFFFFEFFFFFFF8EEC9FFEDC53DFFEDC02CFFEEC335FFEBC84FE9FFFF
    FF00FFFFFF00C097091CE8C44FF0EBBA17FFF0DC99FFFEFFFFFFE7D495FFE0B8
    34FFE0B833FFE6D28CFFFEFFFFFFF0D889FFE9B712FFEABC23FFEFC844E9FFFF
    FF00FFFFFF00D4AB1C60EFC537FFECB90BFFE7C450FFE6CE7DFFE8B409FFEEB7
    00FFEEB704FFEBC649FFFFFFFFFFEFDD9FFFE9B505FFEEBF23FFF2C62FADFFFF
    FF00FFFFFF00E5BA2884F6CA35FFF2BF15FFF0BB07FFEEB906FFF3CE52FFF6DE
    8BFFF9E9B5FFFEFEF9FFF6F6F2FFE9C449FFF2BD0BFFF6C832FFEABE298CFFFF
    FF00FFFFFF00E6B92680FCCD40FFFBC82AFFF9CB34FFFAEAB7FFFDFFFFFFFAFD
    FFFFF6F5F2FFEFE1B6FFEEC955FFF9C625FFFBC92DFFFCCD41FFEEC12E8FFFFF
    FF00FFFFFF00E3BA3DACFDC93EFFFCC224FFF7D472FFFDFFFFFFF1E0AFFFEDC2
    48FFF3C131FFF7C840FFFCD461FFFDC836FFFBC42DFFFCCA49FFF4C3216AFFFF
    FF00FFFFFF00F2C856E8FCC641FFFCC333FFF0CC6FFFFBFFFFFFFCEBC0FFFDD6
    72FFFCD87AFFFDF1CFFFFBFBFDFFF4C64FFFFCC53CFFFACF58F4F4C21422FFFF
    FF00FFFFFF00F8CF60E5FACB5AFFFAC951FFF5C551FFEDDAADFFF8F9FAFFFAFC
    FFFFFAFDFFFFF7F7F8FFECD8A7FFF6C652FFFCD26EFFF7CC458AF4C31700FFFF
    FF00FFFFFF00F8CF50A2FBD584FFFACE6CFFFBCF6BFFF7CA67FFEECB7DFFEED1
    94FFEED192FFEECA7AFFF8CC6CFFFCD785FFF8D362B3F5C6250BF5C62700FFFF
    FF00FFFFFF00F5C72826FAD982DFFBDA99FFFAD58AFFFBD589FFFCD88EFFFCD8
    8DFFFCD88EFFFCDB94FFFBDB90EDF8D3618AF5C82C0BF5C72800F5C72900FFFF
    FF00FFFFFF00F5C62300F6CA3626F9D877A0FAE09DE0FAE09DE2F9D97DA8F9D9
    7588F9DA7988F8D66665F6CE4522F6CA3400F5C82D00F5C72900F5C72900FFFF
    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
    FF00000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000
  }
  OnClose = FormClose
  OnCreate = FormCreate
  LCLVersion = '6.6'
  WindowState = wsMaximized
  object Panel5: TPanel
    Left = 0
    Height = 50
    Top = 0
    Width = 1238
    Align = alTop
    BevelOuter = bvNone
    ClientHeight = 50
    ClientWidth = 1238
    Color = clWhite
    ParentColor = False
    TabOrder = 0
    object plGradient2: TplGradient
      Left = 0
      Height = 50
      Top = 0
      Width = 1238
      Align = alClient
      BevelWidth = 1
      BevelStyle = bvNone
      Buffered = True
      Direction = gdUpLeft
      ColorStart = clSkyBlue
      ColorEnd = clWhite
      StepWidth = 1
      Style = gsHorizontal
    end
    object Label1: TLabel
      Left = 64
      Height = 19
      Top = 16
      Width = 254
      Caption = 'Rezerwacja rozmów przez Skype'
      Font.CharSet = EASTEUROPE_CHARSET
      Font.Color = 16731983
      Font.Height = -16
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Quality = fqDraft
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Image1: TImage
      Left = 8
      Height = 50
      Top = 0
      Width = 50
      Picture.Data = {
        1754506F727461626C654E6574776F726B47726170686963BB05000089504E47
        0D0A1A0A0000000D49484452000000320000003208060000001E3F88B1000000
        017352474200AECE1CE90000000467414D410000B18F0BFC6105000000097048
        597300000EC300000EC301C76FA86400000550494441546843ED585B681C5518
        1E76D3A25641256D051F44A8880A5E405F44ADD18222FAE2056FE08322825A7D
        F0494154ACFA205A051FBCB422BD39B3A949AC6D4D6BDAB441DBB4D5A6AD4DA4
        B4B5455B73516B32337BBF1CBF7FF654DDD9FFCC9CD94BB6603EF8C86639E79F
        EFDFFF76CE18339841ABF1919815379D4571D37D3F66391B6296BB1F9F87F1B7
        0FDF2F8F5BF6FD4662FC5CB9FA0C4442CC8E99CE62889E885BAE08A4E9A4E064
        4FDCB4DF89996E279CDC8EBDDF97E96EA3EFB0E60DCFE92F9C79F209D3006BEA
        7238F0132BBA5E9A4E094E0F82CF1ADD7F9D2F9FD878B459F6423CF0549580E6
        708A22D57887D64E5D86484C320F6C36C790868F4A15750235D1B474D2E7AABA
        1B0772F639C6F0B4931A84B1C6992F654584D762DD71CE708B78C8B0ECB9529D
        3E50708B18632D2532644FE4344334DEE38C45E5055D49D1B1352D9EDC9D112F
        EECF7A5CFC4356DCB12D2DE67527D93D8134DD9552A21EE07D2F6B4893776D4F
        8BCDA305912D0A258A2521BEFBBD201EDF95116777F2763846EA6670641F6724
        8C172202EB4E16A4547D1C768A622122C7D96438A63D67B078C4B73994F4ABEE
        FA23200421A0E8DD33A0EB8CF3A6941A0CEF00C81A50F3D51FB35252257210B8
        65AC203EFD392F3E3B96177DF89C51F83B91297975C5D9AF2086B45654D0B596
        B106149C9D70C5C91492DE078AD0A55F550B6B47A17F78242F5755E26ECDA8C4
        4CFB6929570D3A95729B555CB03E296554E2CA8D2976FD69BE7CA03A8AB76AD6
        0AEA78A7941B00F46BE4619A33C0F1E62D6929E35F50CEB7316BFD7C092D99D2
        AF80807E7038A7B5A74CA768ACB6DBA56235E0710F6FA09AD7F4A6A4FC4A3CBF
        37CBAEF773CE5A579C13A105FF43D3BE4FCA55038BDE653733A402A5B9C0A117
        F3E4E11D99DA0660184D678994AB061626AA36067013040781FC1C992A7ADD8B
        86E01521F5A345D335A55C35D08207D8CD0A5EBB2925921167E168BA24961DCD
        8B1BFB6A738AAECD52AE1A380A0C719B83787B7FDA13570B7A4E14C4453DD1D2
        0F75BC57CA558316719BC33817B5B06438C7CE95301C9C2C46AA254D47A2A596
        9FB3302429655EC1C4DF3A5E1029CDB45B8E1AE2EC71D44A2D2C8C54EC61A416
        7B1B52EFB58339F12D4EBDAA78D1FCA1C9CFD9A8A24EB1D3DB0C767383485D6B
        E8147FE8D23DA6C413F6DB52AE1A70E40176B3820F61560C4C14C4D7BF15B4BB
        D0D58A41FAD49E0CBBDE4FD448B7941B00DC91E14C8933E0E755F875E988711A
        93B99237EDB9B5FF25A510874776EA39027D69ADEB2F3C1E640DF8F820A2E1C7
        F164495CB22E38D79FC01598C30D9B23CC159D630A1C7986DDECE37518861CC8
        993B71EDF51F04A9A33D36986107E809B46DFD8323683A1F4BB901C0E5058BA7
        AA3633A416ABC251B724BA31F0E80EB2F2785E1CC1D556057A39C1D9571163E2
        1BA93618F0F82DCE809F9446C720B81E6C40A3A04B1A673F8023526A08CA5119
        F36D6679F19749EFB45B0B56E01A7C1E660D6737887494924AC341AF6038232A
        D27BABCE5FF2221DE2130DBFAE5FF3DEA0E4ECE81075BC51CAD403BD1CE30C05
        F12C5C96AE4707A2C2A64B16BDA07B6128EB75AB9B70ABA469CFED8BC8A552A2
        26D0AFE1FD6EC6506B693A1D526104D090B4DC4355C65A45D31935FA459B5417
        116B9CF9F4AA9F353CCDD47A251408EF2D8BBBCA6F783A8923FC81DAA3E183D7
        CD105EEE414DA5E9FE6958930BA48C0681E64CF9C8AF7502A89B70A2CDB46F91
        4F6F02E0109DCD10A51DF4F28C155127BD746A782482B0DA6E8F7F6EDF0B875E
        C72F68E13CD44F0DC2233ED3777429C2FF5D88668A135D41A4AF57D88DAA89A6
        6045694EF95DB3F3091D00E1E43022BB0F4EAE87134BE144C799EDC00CFE1730
        8CBF014EA1CDC28AD36BA60000000049454E44AE426082
      }
      Proportional = True
      Stretch = True
    end
  end
  object Panel1: TPanel
    Left = 0
    Height = 241
    Top = 317
    Width = 1238
    Align = alBottom
    BevelOuter = bvLowered
    ClientHeight = 241
    ClientWidth = 1238
    TabOrder = 1
    object Panel2: TPanel
      Left = 1
      Height = 239
      Top = 1
      Width = 143
      Align = alLeft
      ClientHeight = 239
      ClientWidth = 143
      TabOrder = 0
      object plGradient1: TplGradient
        Left = 0
        Height = 24
        Top = 148
        Width = 142
        BevelWidth = 1
        BevelStyle = bvLowered
        Buffered = True
        Direction = gdDownRight
        ColorStart = 15066597
        ColorEnd = 11316396
        StepWidth = 1
        Style = gsHorizontal
      end
      object btnZaplanuj: TBitBtn
        Left = 8
        Height = 30
        Top = 8
        Width = 128
        Caption = 'Zaplanuj'
        Images = DM.ImageList1
        ImageIndex = 0
        OnClick = btnZaplanujClick
        TabOrder = 0
      end
      object btnUsun: TBitBtn
        Left = 8
        Height = 30
        Top = 48
        Width = 128
        Caption = 'Usuń'
        Images = DM.ImageList1
        ImageIndex = 44
        OnClick = btnUsunClick
        TabOrder = 1
      end
      object btnDrukuj: TBitBtn
        Left = 8
        Height = 30
        Top = 200
        Width = 128
        Caption = 'Drukuj wykaz ...'
        Images = DM.ImageList1
        ImageIndex = 4
        OnClick = btnDrukujClick
        TabOrder = 2
      end
      object lblNazwisko: TLabel
        Left = 16
        Height = 15
        Top = 152
        Width = 63
        Caption = 'lblNazwisko'
        Font.CharSet = EASTEUROPE_CHARSET
        Font.Color = clGray
        Font.Height = -12
        Font.Name = 'Segoe UI'
        Font.Pitch = fpVariable
        Font.Quality = fqDraft
        ParentColor = False
        ParentFont = False
      end
      object CheckBox1: TCheckBox
        Left = 16
        Height = 19
        Top = 128
        Width = 85
        Caption = 'Wybrany os.'
        OnChange = CheckBox1Change
        TabOrder = 3
      end
    end
    object RxDBGrid1: TRxDBGrid
      Left = 144
      Height = 239
      Top = 1
      Width = 1093
      ColumnDefValues.BlobText = '(blob)'
      TitleButtons = True
      AutoSort = True
      Columns = <      
        item
          Font.Color = clMaroon
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Data / Godzina'
          Width = 100
          FieldName = 'DataGodz'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Nazwisko'
          Width = 120
          FieldName = 'Nazwisko'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Imię'
          Width = 100
          FieldName = 'Imie'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Alignment = taCenter
          Font.Color = clGreen
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'POC'
          Width = 50
          FieldName = 'POC'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Osoba bliska'
          Width = 200
          FieldName = 'Osoba'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Alignment = taCenter
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Pokrewieństwo'
          Width = 100
          FieldName = 'Pokrewienstwo'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstBoth
          Footers = <>
        end      
        item
          Font.Color = 145
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Uwagi'
          Width = 350
          FieldName = 'Uwagi'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end      
        item
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'User'
          Width = 150
          FieldName = 'User'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Footers = <>
        end      
        item
          Title.Alignment = taCenter
          Title.Orientation = toHorizontal
          Title.Caption = 'Data zapisu'
          Width = 100
          FieldName = 'data_zap'
          EditButtons = <>
          Filter.DropDownRows = 0
          Filter.EmptyValue = '(Empty)'
          Filter.NotEmptyValue = '(Not empty)'
          Filter.AllValue = '(All values)'
          Filter.EmptyFont.Style = [fsItalic]
          Filter.ItemIndex = -1
          Filter.Style = rxfstManualEdit
          Footers = <>
        end>
      KeyStrokes = <      
        item
          Command = rxgcShowFindDlg
          ShortCut = 16454
          Enabled = True
        end      
        item
          Command = rxgcShowColumnsDlg
          ShortCut = 16471
          Enabled = True
        end      
        item
          Command = rxgcShowFilterDlg
          ShortCut = 16468
          Enabled = True
        end      
        item
          Command = rxgcShowSortDlg
          ShortCut = 16467
          Enabled = True
        end      
        item
          Command = rxgcShowQuickFilter
          ShortCut = 16465
          Enabled = True
        end      
        item
          Command = rxgcHideQuickFilter
          ShortCut = 16456
          Enabled = True
        end      
        item
          Command = rxgcSelectAll
          ShortCut = 16449
          Enabled = True
        end      
        item
          Command = rxgcDeSelectAll
          ShortCut = 16429
          Enabled = True
        end      
        item
          Command = rxgcInvertSelection
          ShortCut = 16426
          Enabled = True
        end      
        item
          Command = rxgcOptimizeColumnsWidth
          ShortCut = 16427
          Enabled = True
        end      
        item
          Command = rxgcCopyCellValue
          ShortCut = 16451
          Enabled = True
        end>
      FooterOptions.RowCount = 1
      FooterOptions.Style = tsNative
      FooterOptions.DrawFullLine = False
      SearchOptions.QuickSearchOptions = [loCaseInsensitive, loPartialKey]
      SearchOptions.FromStart = False
      OptionsRx = [rdgAllowDialogFind, rdgAllowQuickSearch, rdgAllowQuickFilter, rdgAllowFilterForm, rdgAllowSortForm, rdgAllowToolMenu, rdgCaseInsensitiveSort, rdgWordWrap]
      FooterRowCount = 1
      Align = alClient
      AlternateColor = 15268863
      AutoAdvance = aaNone
      AutoEdit = False
      Color = clWindow
      DrawFullLine = False
      FocusColor = clHighlight
      FixedHotColor = clNone
      SelectedColor = clHighlight
      GridLineStyle = psSolid
      DataSource = DSMemWidzenia
      DefaultRowHeight = 22
      FixedColor = clNone
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgHeaderHotTracking, dgHeaderPushedLook, dgAnyButtonCanSelect, dgDisableDelete, dgDisableInsert, dgCellHints, dgTruncCellHints, dgCellEllipsis, dgDblClickAutoSize]
      ParentShowHint = False
      ReadOnly = True
      ShowHint = True
      TabOrder = 1
      TitleStyle = tsNative
      OnDblClick = btnZaplanujClick
      OnPrepareCanvas = RxDBGrid1PrepareCanvas
    end
  end
  object YearPlanner1: TYearPlanner
    Left = 0
    Height = 262
    Top = 50
    Width = 1238
    Align = alClient
    DayFont.Color = 3355443
    DayFont.Height = -11
    DayFont.Name = 'Arial'
    GridPen.Color = 13158600
    HeadingColor = clWhite
    MonthColor = clWhite
    MonthFont.Color = 3355443
    MonthFont.Height = -11
    MonthFont.Name = 'Arial'
    NoDayColor = 15856113
    SelectionColor = 16750899
    SelectionFont.Color = 3355443
    SelectionFont.Height = -11
    SelectionFont.Name = 'Arial'
    Seperator = False
    ShowToday = True
    TextLayout = tlTop
    TodayCircleColour = 13999409
    TodayCircleFilled = True
    TodayFont.Color = clWhite
    TodayFont.Height = -11
    TodayFont.Name = 'Arial'
    WeekendColor = 14671839
    WeekendHeadingColor = 14671839
    WeekendFont.Color = clRed
    WeekendFont.Height = -11
    WeekendFont.Name = 'Arial'
    Year = 2018
    YearColor = 14671839
    YearFont.Color = 3355443
    YearFont.Height = -11
    YearFont.Name = 'Arial'
    OnDrawCell = YearPlanner1DrawCell
    OnSelectionEnd = YearPlanner1SelectionEnd
    OnYearChanged = YearPlanner1YearChanged
  end
  object Splitter1: TSplitter
    Cursor = crVSplit
    Left = 0
    Height = 5
    Top = 312
    Width = 1238
    Align = alBottom
    ResizeAnchor = akBottom
  end
  object DSMemWidzenia: TDataSource
    DataSet = MemWidzenia
    OnDataChange = DSMemWidzeniaDataChange
    Left = 258
    Top = 402
  end
  object MemWidzenia: TRxMemoryData
    Active = True
    FieldDefs = <    
      item
        Name = 'ID'
        DataType = ftInteger
        Precision = -1
      end    
      item
        Name = 'DataGodz'
        DataType = ftDateTime
        Precision = -1
      end    
      item
        Name = 'IDO'
        DataType = ftInteger
        Precision = -1
      end    
      item
        Name = 'Nazwisko'
        DataType = ftString
        Precision = -1
        Size = 45
      end    
      item
        Name = 'Imie'
        DataType = ftString
        Precision = -1
        Size = 45
      end    
      item
        Name = 'POC'
        DataType = ftString
        Precision = -1
        Size = 10
      end    
      item
        Name = 'Osoba'
        DataType = ftString
        Precision = -1
        Size = 100
      end    
      item
        Name = 'Pokrewienstwo'
        DataType = ftString
        Precision = -1
        Size = 100
      end    
      item
        Name = 'Uwagi'
        DataType = ftString
        Precision = -1
        Size = 100
      end    
      item
        Name = 'User'
        DataType = ftString
        Precision = -1
        Size = 60
      end    
      item
        Name = 'data_zap'
        DataType = ftDateTime
        Precision = -1
      end>
    PacketRecords = 0
    Left = 258
    Top = 344
  end
  object frReport1: TfrReport
    Dataset = frDBDataSet1
    InitialZoom = pzDefault
    Options = [roSaveAndRestoreBookmarks]
    PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
    DataType = dtDataSet
    Left = 456
    Top = 344
  end
  object frDBDataSet1: TfrDBDataSet
    DataSet = MemWidzenia
    OpenDataSource = False
    Left = 456
    Top = 402
  end
end