projectdetailsunit.dfm

Gantt source file example to use in delphi 7

object EditProjectForm: TEditProjectForm
  Left = 414
  Top = 55
  BorderStyle = bsDialog
  Caption = 'Task Details'
  ClientHeight = 347
  ClientWidth = 669
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 669
    Height = 26
    Align = alTop
    Caption = 'Create / Edit Task'
    Color = clMoneyGreen
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
  end
  object Panel2: TPanel
    Left = 0
    Top = 313
    Width = 669
    Height = 34
    Align = alBottom
    TabOrder = 1
    object Button1: TButton
      Left = 358
      Top = 5
      Width = 75
      Height = 25
      Caption = '&Cancel'
      ModalResult = 2
      TabOrder = 0
    end
    object Button2: TButton
      Left = 277
      Top = 5
      Width = 75
      Height = 25
      Caption = '&Ok'
      Default = True
      ModalResult = 1
      TabOrder = 1
    end
  end
  object GroupBox1: TGroupBox
    Left = 14
    Top = 37
    Width = 637
    Height = 78
    Caption = 'Task Information'
    TabOrder = 2
    object Label1: TLabel
      Left = 30
      Top = 40
      Width = 45
      Height = 13
      Caption = 'Task Title'
    end
    object TitleEdit: TEdit
      Left = 84
      Top = 37
      Width = 511
      Height = 21
      TabOrder = 0
      Text = 'New Task'
    end
  end
  object GroupBox2: TGroupBox
    Left = 15
    Top = 121
    Width = 635
    Height = 170
    Caption = 'Resource One Details'
    TabOrder = 3
    object Label2: TLabel
      Left = 33
      Top = 58
      Width = 100
      Height = 13
      Caption = 'Task Resource Name'
    end
    object Label4: TLabel
      Left = 49
      Top = 32
      Width = 84
      Height = 13
      Caption = 'Task Resource ID'
    end
    object Label5: TLabel
      Left = 28
      Top = 85
      Width = 105
      Height = 13
      Caption = 'Resource Department'
    end
    object Label6: TLabel
      Left = 19
      Top = 109
      Width = 114
      Height = 13
      Caption = 'Resource Email Address'
    end
    object Label7: TLabel
      Left = 40
      Top = 135
      Width = 93
      Height = 13
      Caption = 'Resource Company'
    end
    object Res1Edit: TEdit
      Left = 148
      Top = 55
      Width = 380
      Height = 21
      TabOrder = 0
      Text = 'Resource'
    end
    object IDEdit: TEdit
      Left = 148
      Top = 30
      Width = 121
      Height = 21
      TabOrder = 1
      Text = '0'
    end
    object DEPTEdit: TEdit
      Left = 148
      Top = 81
      Width = 314
      Height = 21
      TabOrder = 2
      Text = 'None'
    end
    object emailEdit: TEdit
      Left = 148
      Top = 107
      Width = 314
      Height = 21
      TabOrder = 3
    end
    object companyEdit: TEdit
      Left = 148
      Top = 133
      Width = 314
      Height = 21
      TabOrder = 4
    end
  end
end