Chip 1999 June/Chip_1999-06_cd.bin/tema/Diadema/Demo/setup.exe/Pantheon.csy/RCDATA/TODKOHOFORM/TODKOHOFORM.txt

Text File | 1999-04-22 | 3.7 KB | 156 lines

object OdKohoForm: TOdKohoForm
  Left = 331
  Top = 167
  BorderStyle = bsDialog
  Caption = 'Seznam u�ivatel�'
  ClientHeight = 231
  ClientWidth = 226
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object VyberteLabel: TLabel
    Left = 48
    Top = 8
    Width = 84
    Height = 13
    Caption = 'Vyberte u�i&vatele:'
    FocusControl = DBGrid
  end
  object Icon: TImage
    Left = 8
    Top = 8
    Width = 32
    Height = 32
    Picture.Data = {<image000.ico>}
  end
  object DBGrid: TDBGrid
    Left = 48
    Top = 24
    Width = 169
    Height = 169
    DataSource = UzivatelDS
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        FieldName = 'UserName'
        Title.Caption = 'U�ivatelsk� jm�no'
        Width = 147
      end>
  end
  object OKBtn: TButton
    Left = 144
    Top = 200
    Width = 75
    Height = 25
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 1
  end
  object CancelBtn: TButton
    Left = 64
    Top = 200
    Width = 75
    Height = 25
    Caption = 'Storno'
    ModalResult = 2
    TabOrder = 2
  end
  object UzivatelTbl: TTable
    Active = True
    DatabaseName = 'RealityDB'
    TableName = 'Uzivatel.DB'
    Left = 8
    Top = 64
    object UzivatelTblUserName: TStringField
      FieldName = 'UserName'
    end
    object UzivatelTblRights: TStringField
      FieldName = 'Rights'
    end
    object UzivatelTblCeleJmeno: TStringField
      FieldName = 'CeleJmeno'
      Size = 60
    end
    object UzivatelTblPassword: TStringField
      FieldName = 'Password'
    end
    object UzivatelTblParovaciMaska: TBlobField
      FieldName = 'ParovaciMaska'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblVelkaTlacitka: TBooleanField
      FieldName = 'VelkaTlacitka'
    end
    object UzivatelTblProdlevaNahledu: TFloatField
      FieldName = 'ProdlevaNahledu'
    end
    object UzivatelTblAutomatickyUkazNahled: TBooleanField
      FieldName = 'AutomatickyUkazNahled'
    end
    object UzivatelTblNeuplneHledani: TBooleanField
      FieldName = 'NeuplneHledani'
    end
    object UzivatelTblProhColumns: TBlobField
      FieldName = 'ProhColumns'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblProhAColumns: TBlobField
      FieldName = 'ProhAColumns'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblProhPColumns: TBlobField
      FieldName = 'ProhPColumns'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblProhZakColumns: TBlobField
      FieldName = 'ProhZakColumns'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblZakazkyMRUList: TBlobField
      FieldName = 'ZakazkyMRUList'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblMainPanelLayout: TBlobField
      FieldName = 'MainPanelLayout'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblWindowPositions: TBlobField
      FieldName = 'WindowPositions'
      BlobType = ftBlob
      Size = 240
    end
    object UzivatelTblTiskZakazniku: TBlobField
      FieldName = 'TiskZakazniku'
      BlobType = ftBlob
      Size = 240
    end
  end
  object UzivatelDS: TDataSource
    DataSet = UzivatelTbl
    Left = 8
    Top = 112
  end
end