object frmGenerowanieFiszek: TfrmGenerowanieFiszek Left = 0 Top = 0 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Generowanie fiszek' ClientHeight = 391 ClientWidth = 630 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Scaled = False OnCreate = FormCreate PixelsPerInch = 120 TextHeight = 16 object GroupBox1: TGroupBox Left = 0 Top = 0 Width = 630 Height = 385 Align = alTop TabOrder = 0 object Label1: TLabel Left = 6 Top = 11 Width = 90 Height = 16 Caption = 'Nazwa skryptu:' end object cmdLeft: TSpeedButton Left = 368 Top = 18 Width = 30 Height = 31 GroupIndex = 1 Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 04000000000068000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000A00000000AAAA000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000A00000000AAAA000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000A00000000AAAA000AAAAAAAAAAAA A000} OnClick = cmdLeftClick end object cmdCenter: TSpeedButton Left = 397 Top = 18 Width = 31 Height = 31 GroupIndex = 1 Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 04000000000068000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAAA00000AAAA000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAA0000000AAA000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAAA00000AAAA000AAAAAAAAAAAA A000} OnClick = cmdCenterClick end object cmdRight: TSpeedButton Left = 427 Top = 18 Width = 31 Height = 31 GroupIndex = 1 Glyph.Data = { DE000000424DDE0000000000000076000000280000000D0000000D0000000100 04000000000068000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAAA00000000A000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAAA00000000A000AAAAAAAAAAAA A000A00000000000A000AAAAAAAAAAAAA000AAAA00000000A000AAAAAAAAAAAA A000} OnClick = cmdRightClick end object cmdBold: TSpeedButton Left = 465 Top = 18 Width = 31 Height = 31 AllowAllUp = True GroupIndex = 2 Glyph.Data = { CE000000424DCE0000000000000076000000280000000B0000000B0000000100 04000000000058000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAA0 0000A00000000AA00000AA000AA000A00000AA000AA000A00000AA000AA000A0 0000AA0000000AA00000AA000AA000A00000AA000AA000A00000AA000AA000A0 0000A00000000AA00000AAAAAAAAAAA00000} OnClick = cmdBoldClick end object cmdUnderline: TSpeedButton Left = 497 Top = 18 Width = 31 Height = 31 AllowAllUp = True GroupIndex = 2 Glyph.Data = { EE000000424DEE0000000000000076000000280000000B0000000F0000000100 04000000000078000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00AAAAAAAAAAA0 0000A000000000A00000AAAAAAAAAAA00000AAA00000AAA00000AA00AAA00AA0 0000AA00AAA00AA00000AA00AAA00AA00000AA00AAA00AA00000AA00AAA00AA0 0000AA00AAA00AA00000AA00AAA00AA00000A0000A0000A00000AAAAAAAAAAA0 0000AAAAAAAAAAA00000AAAAAAAAAAA00000} OnClick = cmdUnderlineClick end object labNazwaSkryptu: TStaticText Left = 6 Top = 28 Width = 341 Height = 19 AutoSize = False BorderStyle = sbsSunken Caption = 'labNazwaSkryptu' TabOrder = 0 end object cmdAkceptuj: TBitBtn Left = 544 Top = 129 Width = 79 Height = 25 Caption = 'Akceptuj' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = cmdAkceptujClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333388F3333333333000033334224333333333333 338338F3333333330000333422224333333333333833338F3333333300003342 222224333333333383333338F3333333000034222A22224333333338F338F333 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224 33333338F83338F338F33333000033A33333A222433333338333338F338F3333 0000333333333A222433333333333338F338F33300003333333333A222433333 333333338F338F33000033333333333A222433333333333338F338F300003333 33333333A222433333333333338F338F00003333333333333A22433333333333 3338F38F000033333333333333A223333333333333338F830000333333333333 333A333333333333333338330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object cmdPomin: TBitBtn Left = 544 Top = 156 Width = 79 Height = 25 Caption = 'Pomi�' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = cmdPominClick Glyph.Data = { 42010000424D4201000000000000760000002800000013000000110000000100 040000000000CC000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDD00000DDDDDDA0000DDDDDDDD00000DDDDDDA2220DDDDDDDD00000DDDD DDA2220DDDDDDDD00000DDDDDDA2220DDDDDDDD00000DDDDDDAAAAADDDDDDDD0 0000DDDDDDDDDDDDDDDDDDD00000DDDDDDDDDDDDDDDDDDD00000DDDDDDDDDDDD 444444D00000DA444DDDDDDA222224D00000DA224DDDDDDDA22224D00000DDA2 24DDDDD4422224D00000DDA222444442222224D00000DDDA2222222222AA24D0 0000DDDDAA222222AADDADD00000DDDDDDAAAAAADDDDDDD00000DDDDDDDDDDDD DDDDDDD00000} end object rtFiszka: TDBRichEdit Left = 7 Top = 56 Width = 530 Height = 323 DataField = 'Fiszka' DataSource = dsFiszki Font.Charset = EASTEUROPE_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 OnSelectionChange = rtFiszkaSelectionChange end object panLogo: TPanel Left = 344 Top = 58 Width = 191 Height = 156 BevelOuter = bvNone Color = clWindow TabOrder = 4 Visible = False object imgLogo: TImage Left = 0 Top = 0 Width = 191 Height = 156 Align = alClient Stretch = True end end end object cmdPrzerwij: TBitBtn Left = 544 Top = 188 Width = 79 Height = 25 Caption = 'Przerwij' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = cmdPrzerwijClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333333333000033338833333333333333333F333333333333 0000333911833333983333333388F333333F3333000033391118333911833333 38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333 911118111118333338F3338F833338F3000033333911111111833333338F3338 3333F8330000333333911111183333333338F333333F83330000333333311111 8333333333338F3333383333000033333339111183333333333338F333833333 00003333339111118333333333333833338F3333000033333911181118333333 33338333338F333300003333911183911183333333383338F338F33300003333 9118333911183333338F33838F338F33000033333913333391113333338FF833 38F338F300003333333333333919333333388333338FFF830000333333333333 3333333333333333333888330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object cmdOk: TBitBtn Left = 544 Top = 300 Width = 79 Height = 25 Caption = 'Ok' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 Visible = False Kind = bkOK end object cmdAnuluj: TBitBtn Left = 544 Top = 326 Width = 79 Height = 25 Caption = 'Anuluj' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 Visible = False Kind = bkCancel end object cmdPokazKsiazke: TBitBtn Left = 544 Top = 18 Width = 79 Height = 45 Caption = 'Poka� ksi��k�' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = cmdPokazKsiazkeClick Glyph.Data = { EE000000424DEE000000000000007600000028000000100000000F0000000100 04000000000078000000CE0E0000C40E00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00EEEEEE000EEE EEEEEEEEE0C0800EEEEEEEEE0CC0FFF00EEEEEE0CCC08FFFF00EEE0CCCC7008F FF00E0CCCC7CCC008F8E0CCCC7CCCCCC008E0CCC7CCCCCCCCC000CC7CCCCCCCC CC0E0C7CCCCCCCCCC0EE07CCCCCCCCCC0EEEE00CCCCCCCC0EEEEEEE00CCCCC0E EEEEEEEEE00CC0EEEEEEEEEEEEE00EEEEEEE} Layout = blGlyphTop end object cmdPomoc: TBitBtn Left = 544 Top = 352 Width = 79 Height = 25 Caption = 'Pomoc' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = cmdPomocClick Kind = bkHelp end object sqlKsiazkiDoFiszek: TQuery DatabaseName = 'Biblioteka' Left = 96 Top = 164 end object tableFiszki: TTable DatabaseName = 'Biblioteka' TableName = 'Fiszki.DB' Left = 64 Top = 166 end object dsFiszki: TDataSource DataSet = tableFiszki Left = 38 Top = 166 end end