PC go! 1996 December/PC_GO.ISO/demo/docman/_setup.1/VORGANG.DFM/VORGANG.txt

Text File | 1996-03-25 | 7.7 KB | 357 lines

object FormVorgang: TFormVorgang
  Left = 0
  Top = 0
  Width = 640
  Height = 480
  ActiveControl = Panel1
  Caption = 'Vorgang'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PixelsPerInch = 96
  Position = poScreenCenter
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 396
    Width = 632
    Height = 41
    Align = alBottom
    BevelInner = bvLowered
    TabOrder = 0
    object DBNavigator: TDBNavigator
      Left = 16
      Top = 8
      Width = 421
      Height = 25
      DataSource = DataSourceVorgang
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 0
    end
    object ButtonAnsehen: TButton
      Left = 480
      Top = 8
      Width = 89
      Height = 25
      Caption = 'Ansehen'
      TabOrder = 1
      OnClick = ButtonAnsehenClick
    end
  end
  object TabbedNotebook1: TTabbedNotebook
    Left = 0
    Top = 0
    Width = 632
    Height = 396
    Align = alClient
    TabsPerRow = 7
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 1
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Vorgang'
      object Label2: TLabel
        Left = 448
        Top = 120
        Width = 47
        Height = 13
        Caption = 'ErfasstAm'
        FocusControl = EditErfasstAm
      end
      object Label1: TLabel
        Left = 40
        Top = 16
        Width = 11
        Height = 13
        Caption = 'Nr'
        FocusControl = EditNr
      end
      object Label3: TLabel
        Left = 40
        Top = 64
        Width = 28
        Height = 13
        Caption = 'Name'
        FocusControl = EditName
      end
      object Label5: TLabel
        Left = 40
        Top = 120
        Width = 51
        Height = 13
        Caption = 'ErfasstVon'
        FocusControl = EditErfasstVon
      end
      object Label4: TLabel
        Left = 216
        Top = 16
        Width = 58
        Height = 13
        Caption = 'VorgangsArt'
        FocusControl = EditVorgArt
      end
      object Label7: TLabel
        Left = 40
        Top = 208
        Width = 53
        Height = 13
        Caption = 'DRUCKER'
        FocusControl = EditDRUCKER
      end
      object Label9: TLabel
        Left = 40
        Top = 304
        Width = 79
        Height = 13
        Caption = 'DEFWVGRUND'
        FocusControl = EditDEFWVGRUND
      end
      object Label16: TLabel
        Left = 40
        Top = 160
        Width = 32
        Height = 13
        Caption = 'DATEI'
        FocusControl = EditDATEI
      end
      object Label18: TLabel
        Left = 40
        Top = 256
        Width = 69
        Height = 13
        Caption = 'DEFBETREFF'
      end
      object DBText1: TDBText
        Left = 104
        Top = 136
        Width = 329
        Height = 17
        DataField = 'NAME'
        DataSource = DataSourceUser
      end
      object EditNr: TDBEdit
        Left = 40
        Top = 32
        Width = 50
        Height = 19
        DataField = 'Nr'
        DataSource = DataSourceVorgang
        MaxLength = 0
        TabOrder = 0
      end
      object EditErfasstAm: TDBEdit
        Left = 448
        Top = 144
        Width = 50
        Height = 19
        DataField = 'ErfasstAm'
        DataSource = DataSourceVorgang
        MaxLength = 0
        TabOrder = 1
      end
      object EditName: TDBEdit
        Left = 40
        Top = 80
        Width = 545
        Height = 19
        DataField = 'Name'
        DataSource = DataSourceVorgang
        MaxLength = 40
        TabOrder = 2
      end
      object EditErfasstVon: TDBEdit
        Left = 40
        Top = 136
        Width = 50
        Height = 19
        DataField = 'ErfasstVon'
        DataSource = DataSourceVorgang
        MaxLength = 0
        TabOrder = 3
      end
      object EditVorgArt: TDBEdit
        Left = 216
        Top = 32
        Width = 50
        Height = 19
        DataField = 'VorgArt'
        DataSource = DataSourceVorgang
        MaxLength = 0
        TabOrder = 4
      end
      object EditDATEI: TDBEdit
        Left = 40
        Top = 176
        Width = 457
        Height = 19
        DataField = 'DATEI'
        DataSource = DataSourceVorgang
        MaxLength = 250
        TabOrder = 5
      end
      object EditDRUCKER: TDBEdit
        Left = 40
        Top = 224
        Width = 457
        Height = 19
        DataField = 'DRUCKER'
        DataSource = DataSourceVorgang
        MaxLength = 80
        TabOrder = 6
      end
      object EditDEFWVGRUND: TDBEdit
        Left = 40
        Top = 320
        Width = 288
        Height = 19
        DataField = 'DEFWVGRUND'
        DataSource = DataSourceVorgang
        MaxLength = 100
        TabOrder = 7
      end
      object DBEdit8: TDBEdit
        Left = 40
        Top = 272
        Width = 288
        Height = 19
        DataField = 'DEFBETREFF'
        DataSource = DataSourceVorgang
        MaxLength = 100
        TabOrder = 8
      end
      object DBLookupCombo1: TDBLookupCombo
        Left = 280
        Top = 31
        Width = 305
        Height = 22
        DataField = 'VorgArt'
        DataSource = DataSourceVorgang
        LookupSource = DataSourceVorgArt
        LookupDisplay = 'Bezeichnung'
        LookupField = 'Nr'
        TabOrder = 9
      end
      object ButtonDateiSuchen: TButton
        Left = 512
        Top = 168
        Width = 89
        Height = 33
        Caption = 'Suchen'
        TabOrder = 10
        OnClick = ButtonDateiSuchenClick
      end
      object ButtonDrucker: TButton
        Left = 512
        Top = 216
        Width = 89
        Height = 33
        Caption = 'Drucker'
        TabOrder = 11
        OnClick = ButtonDruckerClick
      end
    end
    object TTabPage
      Left = 5
      Top = 26
      Caption = 'Notiz'
      object DBMemo1: TDBMemo
        Left = 0
        Top = 0
        Width = 622
        Height = 365
        Align = alClient
        TabOrder = 0
      end
    end
  end
  object Header1: THeader
    Left = 0
    Top = 437
    Width = 632
    Height = 18
    Align = alBottom
    AllowResize = False
    Enabled = False
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = 'Courier New'
    Font.Style = []
    ParentFont = False
    Sections.Sections = (
      #0'271'#0'Datensatz ........ von ........'
      #0'104'#0'inaktiv     '
      #0'248'#0'??????tag: 00.00.00 - 00:00:00')
    TabOrder = 2
  end
  object DataSourceVorgang: TDataSource
    AutoEdit = False
    DataSet = TableVorgang
    OnStateChange = DataSourceVorgangStateChange
    OnDataChange = DataSourceVorgangDataChange
    Left = 536
    Top = 40
  end
  object TableVorgang: TTable
    Active = True
    DatabaseName = 'AvsDvs'
    TableName = 'vorgang.db'
    Left = 536
    Top = 8
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 584
    Top = 16
  end
  object TableVorgArt: TTable
    Active = True
    DatabaseName = 'AvsDvs'
    ReadOnly = True
    TableName = 'VORGART.DB'
    Left = 504
    Top = 8
  end
  object DataSourceVorgArt: TDataSource
    AutoEdit = False
    DataSet = TableVorgArt
    Left = 504
    Top = 40
  end
  object OpenDialog1: TOpenDialog
    DefaultExt = 'RTF'
    Filter = 'RichText Datei|*.RTF|Text Datei|*.TXT'
    Options = [ofFileMustExist]
    Title = 'Vorgangsdatei ausw�hlen'
    Left = 384
    Top = 16
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 352
    Top = 16
  end
  object TableUser: TTable
    DatabaseName = 'AvsDvs'
    IndexFieldNames = 'Nr'
    MasterFields = 'ErfasstVon'
    MasterSource = DataSourceVorgang
    TableName = 'USER.DB'
    Left = 464
    Top = 8
  end
  object DataSourceUser: TDataSource
    AutoEdit = False
    DataSet = TableUser
    Left = 464
    Top = 40
  end
end