Ignore:
Timestamp:
Feb 18, 2009, 3:22:51 PM (15 years ago)
Author:
Kevin Toppenberg
Message:

Fixed missing TDKLang. Class, Added email demographic, Fixed field error in demographis

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/fPtDemoEdit.dfm

    r495 r496  
    11object frmPtDemoEdit: TfrmPtDemoEdit
    2   Left = 196
    3   Top = 145
     2  Left = 322
     3  Top = 116
    44  Width = 684
    55  Height = 498
     
    129129      end
    130130      object SexLabel: TLabel
    131         Left = 66
     131        Left = 62
    132132        Top = 176
    133         Width = 18
    134         Height = 13
    135         Caption = 'Sex'
     133        Width = 21
     134        Height = 13
     135        Caption = 'Sex:'
    136136      end
    137137      object DegreeLabel: TLabel
    138         Left = 378
    139         Top = 160
     138        Left = 505
     139        Top = 137
    140140        Width = 35
    141141        Height = 13
     
    143143        Caption = 'Degree'
    144144        Visible = False
     145      end
     146      object Label1: TLabel
     147        Left = 58
     148        Top = 133
     149        Width = 26
     150        Height = 13
     151        Caption = 'DOB:'
     152      end
     153      object Label2: TLabel
     154        Left = 59
     155        Top = 156
     156        Width = 25
     157        Height = 13
     158        Caption = 'SSN:'
     159      end
     160      object Label3: TLabel
     161        Left = 379
     162        Top = 172
     163        Width = 29
     164        Height = 13
     165        Caption = 'EMail:'
    145166      end
    146167      object CombinedNameEdit: TEdit
     
    183204        Left = 415
    184205        Top = 136
    185         Width = 135
     206        Width = 66
    186207        Height = 21
    187208        Anchors = [akTop, akRight]
     
    513534      end
    514535      object DegreeEdit: TEdit
    515         Left = 415
    516         Top = 160
    517         Width = 136
     536        Left = 542
     537        Top = 137
     538        Width = 67
    518539        Height = 21
    519540        Anchors = [akTop, akRight]
     
    554575        end
    555576      end
     577      object EMailEdit: TEdit
     578        Left = 415
     579        Top = 168
     580        Width = 218
     581        Height = 21
     582        Anchors = [akLeft, akTop, akRight]
     583        TabOrder = 13
     584        OnChange = SSNumEditChange
     585      end
    556586    end
    557587  end
     
    561591    LangData = {
    562592      0D0066726D507444656D6F45646974010100000001000000070043617074696F
    563       6E013500000005004F4B42746E010100000002000000070043617074696F6E00
     593      6E013900000005004F4B42746E010100000002000000070043617074696F6E00
    564594      090043616E63656C42746E010100000003000000070043617074696F6E000800
    565595      4170706C7942746E010100000004000000070043617074696F6E000B00506167
     
    605635      000027000000070043617074696F6E000B0050686F6E654E756D477270010100
    606636      00002800000005004974656D73000C0050686F6E654E756D4564697401010000
    607       002900000004005465787400}
     637      00290000000400546578740006004C6162656C3101010000002A000000070043
     638      617074696F6E0006004C6162656C3201010000002B000000070043617074696F
     639      6E0006004C6162656C3301010000002C000000070043617074696F6E00090045
     640      4D61696C456469740000}
    608641  end
    609642end
Note: See TracChangeset for help on using the changeset viewer.