Subversion Repositories winbugtracker

Rev

Rev 3 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3 daniel-mar 1 
object frmLogin: TfrmLogin
2 
  Left = 0
3 
  Top = 0
4 
  BorderIcons = [biSystemMenu]
5 
  BorderStyle = bsDialog
6 
  Caption = 'ViaThinkSoft Bugtracker f'#252'r Windows'
7 
  ClientHeight = 385
8 
  ClientWidth = 298
9 
  Color = clBtnFace
10 
  Font.Charset = DEFAULT_CHARSET
11 
  Font.Color = clWindowText
12 
  Font.Height = -11
13 
  Font.Name = 'Tahoma'
14 
  Font.Style = []
15 
  OldCreateOrder = False
16 
  Position = poMainFormCenter
17 
  PixelsPerInch = 96
18 
  TextHeight = 13
19 
  object Label1: TLabel
20 
    Left = 32
21 
    Top = 24
22 
    Width = 233
23 
    Height = 33
24 
    AutoSize = False
25 
    Caption = 'Wilkommen'
26 
    Font.Charset = DEFAULT_CHARSET
27 
    Font.Color = clWindowText
28 
    Font.Height = -27
29 
    Font.Name = 'Tahoma'
30 
    Font.Style = [fsBold, fsItalic]
31 
    ParentFont = False
32 
  end
33 
  object GroupBox1: TGroupBox
34 
    Left = 32
35 
    Top = 80
36 
    Width = 233
37 
    Height = 105
38 
    Caption = 'Wer sind Sie?'
39 
    TabOrder = 0
40 
    object Label2: TLabel
41 
      Left = 98
42 
      Top = 59
43 
      Width = 103
44 
      Height = 13
45 
      Cursor = crHandPoint
46 
      Alignment = taRightJustify
47 
      Caption = 'Mitarbeiter verwalten'
48 
      Font.Charset = DEFAULT_CHARSET
49 
      Font.Color = clHotLight
50 
      Font.Height = -11
51 
      Font.Name = 'Tahoma'
52 
      Font.Style = [fsUnderline]
53 
      ParentFont = False
54 
      OnClick = Label2Click
55 
    end
56 
    object cbxMitarbeiter: TDBLookupComboBox
57 
      Left = 24
58 
      Top = 32
59 
      Width = 177
60 
      Height = 21
61 
      KeyField = 'id'
62 
      ListField = 'name'
63 
      ListSource = frmBugtracker.dsMitarbeiter
64 
      TabOrder = 0
65 
    end
66 
  end
67 
  object GroupBox2: TGroupBox
68 
    Left = 32
69 
    Top = 200
70 
    Width = 233
71 
    Height = 105
72 
    Caption = 'An was m'#246'chten Sie arbeiten?'
73 
    TabOrder = 1
74 
    object Label3: TLabel
75 
      Left = 110
76 
      Top = 59
77 
      Width = 91
78 
      Height = 13
79 
      Cursor = crHandPoint
80 
      Alignment = taRightJustify
81 
      Caption = 'Projekte verwalten'
82 
      Font.Charset = DEFAULT_CHARSET
83 
      Font.Color = clHotLight
84 
      Font.Height = -11
85 
      Font.Name = 'Tahoma'
86 
      Font.Style = [fsUnderline]
87 
      ParentFont = False
88 
      OnClick = Label3Click
89 
    end
90 
    object cbxProjekt: TDBLookupComboBox
91 
      Left = 24
92 
      Top = 32
93 
      Width = 177
94 
      Height = 21
95 
      KeyField = 'id'
96 
      ListField = 'projekt'
97 
      ListSource = frmBugtracker.dsProjekte
98 
      TabOrder = 0
99 
    end
100 
  end
101 
  object Button1: TButton
102 
    Left = 94
103 
    Top = 327
104 
    Width = 115
105 
    Height = 36
106 
    Caption = 'Los geht'#39's'
5 daniel-mar 107 
    Default = True
3 daniel-mar 108 
    TabOrder = 2
109 
    OnClick = Button1Click
110 
  end
111 
end