Procedure

TfrmODMedIV.cboAddFreqKeyDown

Module

fODMedIV

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmODMedIV

Declaration

procedure cboAddFreqKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);

Calls Hierarchy


TfrmODMedIV.cboAddFreqKeyDown
 └TfrmODMedIV.cboAddFreqCloseUp
   └TfrmODMedIV.ControlChange
     ├TfrmODMedIV.loadExpectFirstDose
     │ ├TfrmODMedIV.DisplayDoseNow
     │ ├LoadAdminInfo
     │ └FMToday
     │   └FMNow
     ├TResponses.FindResponseByName
     ├TResponses.Clear
     ├TResponses.Update
     │ ├TResponses.FindResponseByName
     │ └TResponses.IENForPrompt
     ├IsNumericRate
     └TResponses.GetOrderText
       ├TResponses.NextInstance
       ├TResponses.FindResponseByName
       ├TResponses.FormatResponse
       │ └TResponses.FindResponseByIEN
       └TResponses.AppendChildren
         ├TResponses.FindPromptByIEN
         ├TResponses.FindResponseByIEN
         └TResponses.FormatResponse...

Calls

Name Declaration Comments
TfrmODMedIV.cboAddFreqCloseUp procedure cboAddFreqCloseUp(Sender: TObject); -


Source

1447  procedure TfrmODMedIV.cboAddFreqKeyDown(Sender: TObject; var Key: Word;
1448    Shift: TShiftState);
1449  begin
1450    inherited;
1451    if (Key = VK_RETURN) or (Key = VK_Tab) then
1452    begin
1453      cboAddFreqCloseUp(cboAddFreq);
1454      Key := 0;
1455    end;
1456  end;