PC World Komputer 1999 mARCH/PCWK3A99.iso/Polskie/Malabibl/_SETUP.1/biblio.exe/0/RCDATA/TFRMIMPORTCREATOR/TFRMIMPORTCREATOR.txt

Text File | 1998-07-13 | 11KB | 351 lines

object frmImportCreator: TfrmImportCreator
  Left = 8
  Top = 5
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Import bazy danych'
  ClientHeight = 414
  ClientWidth = 622
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  Scaled = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 16
  object Bevel1: TBevel
    Left = 6
    Top = 361
    Width = 605
    Height = 9
    Shape = bsBottomLine
  end
  object cmdImportuj: TBitBtn
    Left = 507
    Top = 375
    Width = 107
    Height = 31
    Caption = 'Importuj'
    TabOrder = 4
    OnClick = cmdImportujClick
  end
  object cmdNastepna: TBitBtn
    Left = 509
    Top = 375
    Width = 105
    Height = 31
    Caption = 'Nast�pna'
    TabOrder = 1
    OnClick = cmdNastepnaClick
    Glyph.Data = {
      06010000424D060100000000000076000000280000000C000000120000000100
      0400000000009000000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      0000844888888888000084648888888800008466488888880000846664888888
      0000846666488888000084666664888800008466666648880000846666666488
      0000846666666E88000084666666E88800008466666E88880000846666E88888
      000084666E88888800008466E88888880000846E88888888000088E888888888
      00008888888888880000}
    Layout = blGlyphRight
  end
  object Notebook: TNotebook
    Left = 0
    Top = 0
    Width = 622
    Height = 361
    Align = alTop
    TabOrder = 0
    object TPage
      Left = 0
      Top = 0
      Caption = 'pFilename'
      object Image1: TImage
        Left = 30
        Top = 37
        Width = 80
        Height = 60
        AutoSize = True
        Picture.Data = {<image000.bmp>}
      end
      object Image2: TImage
        Left = 126
        Top = 29
        Width = 19
        Height = 28
        AutoSize = True
        Picture.Data = {<image001.bmp>}
        Transparent = True
      end
      object Label1: TLabel
        Left = 165
        Top = 28
        Width = 444
        Height = 52
        AutoSize = False
        Caption =
          'Wpisz r�cznie lub u�ywaj�c przycisku z rysunkiem foldera wyszuka' +
          'j na dysku pliku z importowan� baz� danych. Plik powinien mie� r' +
          'ozszerzenie DB, DBF lub TXT.'
        WordWrap = True
      end
      object cmdFindFile: TSpeedButton
        Left = 564
        Top = 98
        Width = 35
        Height = 29
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000CE0E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
          DDDDDDD0000000000000DD88888888888800DD8FB7B7B7B7B800D8FB7B7B7B7B
          7080D8F7B7B7B7B780808F7B7B7B7B7B08808FFFFFFFFFF80780888888888888
          8B80D8F7B7B7B7B7B780D8FB7B7B7FFFFF80D8F7B7B7F888888DDD8FFFFF8DDD
          DDDDDDD88888DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD}
        OnClick = cmdFindFileClick
      end
      object Label2: TLabel
        Left = 165
        Top = 84
        Width = 187
        Height = 16
        Caption = 'Plik importowanej bazy danych:'
      end
      object Image3: TImage
        Left = 131
        Top = 207
        Width = 19
        Height = 28
        AutoSize = True
        Picture.Data = {<image002.bmp>}
        Transparent = True
      end
      object Label5: TLabel
        Left = 165
        Top = 204
        Width = 435
        Height = 41
        AutoSize = False
        Caption =
          'Wska� rodzaj informacji jakie chcesz importowa�: ksi��ki, u�ytko' +
          'wnicy czy wypo�yczenia (czyli informacje o wypo�yczonych ksi��ka' +
          'ch).'
        WordWrap = True
      end
      object tbFilename: TEdit
        Left = 165
        Top = 101
        Width = 396
        Height = 24
        TabOrder = 0
      end
      object groRodzajInformacji: TRadioGroup
        Left = 168
        Top = 251
        Width = 437
        Height = 55
        Caption = 'Rodzaj informacji imporotwanych: '
        Columns = 2
        Items.Strings = (
          'Ksi��ki'
          'U�tkownicy')
        TabOrder = 1
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'pFields'
      object Label3: TLabel
        Left = 16
        Top = 107
        Width = 92
        Height = 16
        Caption = 'Dost�pne pola:'
      end
      object Label4: TLabel
        Left = 222
        Top = 109
        Width = 188
        Height = 16
        Caption = 'Odpowiadaj�ce sobie pary p�l:'
      end
      object cmdMoveToLeft: TSpeedButton
        Left = 183
        Top = 213
        Width = 31
        Height = 31
        Glyph.Data = {
          BE000000424DBE0000000000000076000000280000000B000000090000000100
          04000000000048000000CE0E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777747777770
          0000777447777770000077444444444000007444444444400000444444444440
          0000744444444440000077444444444000007774477777700000777747777770
          0000}
        OnClick = cmdMoveToLeftClick
      end
      object cmdMoveToRight: TSpeedButton
        Left = 183
        Top = 181
        Width = 31
        Height = 31
        Glyph.Data = {
          BE000000424DBE0000000000000076000000280000000B000000090000000100
          04000000000048000000CE0E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777477770
          0000777777447770000044444444477000004444444444700000444444444440
          0000444444444470000044444444477000007777774477700000777777477770
          0000}
        OnClick = cmdMoveToRightClick
      end
      object cmdMoveUp: TSpeedButton
        Left = 582
        Top = 126
        Width = 30
        Height = 30
        Glyph.Data = {
          CE000000424DCE000000000000007600000028000000090000000B0000000100
          04000000000058000000CE0E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00774444477000
          0000774444477000000077444447700000007744444770000000774444477000
          0000774444477000000044444444400000007444444470000000774444477000
          000077744477700000007777477770000000}
        OnClick = cmdMoveUpClick
      end
      object cmdMoveDown: TSpeedButton
        Left = 582
        Top = 158
        Width = 31
        Height = 30
        Glyph.Data = {
          CE000000424DCE000000000000007600000028000000090000000B0000000100
          04000000000058000000CE0E0000C40E00001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777747777000
          0000777444777000000077444447700000007444444470000000444444444000
          0000774444477000000077444447700000007744444770000000774444477000
          000077444447700000007744444770000000}
        OnClick = cmdMoveDownClick
      end
      object Image4: TImage
        Left = 20
        Top = 7
        Width = 112
        Height = 94
        AutoSize = True
        Picture.Data = {<image003.bmp>}
        Transparent = True
      end
      object Image5: TImage
        Left = 148
        Top = 7
        Width = 19
        Height = 28
        AutoSize = True
        Picture.Data = {<image004.bmp>}
        Transparent = True
      end
      object Label6: TLabel
        Left = 179
        Top = 7
        Width = 430
        Height = 68
        AutoSize = False
        Caption =
          'Pos�uguj�c si� przyciskami ze strza�kami dobierz odpowiadaj�ce s' +
          'obie pola tabeli importowanej i rodzimej. W danej parze powinny ' +
          'wyst�powa� pola, kt�re zawieraj� identyczn� informacj� np. tytu�' +
          ' ksi��ki, mimo �e ich nazwy mog� si� r�ni�.'
        WordWrap = True
      end
      object lstDostepnePola: TListBox
        Left = 16
        Top = 124
        Width = 156
        Height = 228
        ItemHeight = 16
        TabOrder = 0
      end
      object grdParyPol: TStringGrid
        Left = 222
        Top = 127
        Width = 355
        Height = 225
        ColCount = 2
        DefaultColWidth = 100
        DefaultRowHeight = 15
        FixedCols = 0
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing]
        ScrollBars = ssVertical
        TabOrder = 1
        ColWidths = (
          134
          123)
        RowHeights = (
          15
          15
          15
          15
          15)
      end
    end
  end
  object cmdPoprzednia: TBitBtn
    Left = 399
    Top = 375
    Width = 105
    Height = 31
    Caption = 'Poprzednia'
    Enabled = False
    TabOrder = 2
    OnClick = cmdPoprzedniaClick
    Glyph.Data = {
      06010000424D060100000000000076000000280000000B000000120000000100
      0400000000009000000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888885
      555F888888884485555F888888846485555F888888466485555F888884666485
      555F888846666485555F888466666485555F884666666485555F846666666485
      555F8E6666666485555F88E666666484444C888E6666648000088888E6666480
      000088888E6664800000888888E6648000008888888E6480000088888888E681
      00108888888888800000}
  end
  object BitBtn3: TBitBtn
    Left = 7
    Top = 375
    Width = 93
    Height = 31
    Caption = 'Anuluj'
    TabOrder = 3
    Kind = bkCancel
  end
  object cmdPomoc: TBitBtn
    Left = 104
    Top = 375
    Width = 93
    Height = 31
    Caption = 'Pomoc'
    TabOrder = 5
    OnClick = cmdPomocClick
    Kind = bkHelp
  end
  object OpenDialog: TOpenDialog
    Filter =
      'Obs�ugiwane bazy danych (*.dbf *.db *.txt) |*.db;*.dbf;*.txt|Wsz' +
      'ystkie pliki (*.*)|*.*'
    Left = 26
    Top = 124
  end
  object tableZadaniowa: TTable
    Left = 46
    Top = 246
  end
end