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

Location:
cprs/branches/tmg-cprs/CPRS-Chart/Encounter
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • cprs/branches/tmg-cprs/CPRS-Chart/Encounter/fEncounterFrame.dfm

    r453 r496  
    6464    OnExit = TabControlExit
    6565  end
    66   object DKLanguageController1: TDKLanguageController
    67     Left = 304
    68     Top = 208
    69     LangData = {
    70       110066726D456E636F756E7465724672616D6501010000000100000007004361
    71       7074696F6E01040000000600426576656C3100000A0053746174757342617231
    72       00000700706E6C5061676500000A00546162436F6E74726F6C0000}
    73   end
    7466end
  • cprs/branches/tmg-cprs/CPRS-Chart/Encounter/fEncounterFrame.pas

    r453 r496  
    7878    Bevel1: TBevel;
    7979    TabControl: TTabControl;
    80     DKLanguageController1: TDKLanguageController;
    8180
    8281    procedure tabPageChange(Sender: TObject; NewTab: Integer;
  • cprs/branches/tmg-cprs/CPRS-Chart/Encounter/fPCEBase.dfm

    r453 r496  
    4545    NumGlyphs = 2
    4646  end
    47   object DKLanguageController1: TDKLanguageController
     47  object DKLanguageController2: TDKLanguageController
    4848    Left = 552
    4949    Top = 48
  • cprs/branches/tmg-cprs/CPRS-Chart/Encounter/fPCEBase.pas

    r453 r496  
    2424    btnOK: TBitBtn;
    2525    btnCancel: TBitBtn;
    26     DKLanguageController1: TDKLanguageController;
     26    DKLanguageController2: TDKLanguageController;
    2727    procedure FormCreate(Sender: TObject);
    2828    procedure btnCancelClick(Sender: TObject);
Note: See TracChangeset for help on using the changeset viewer.