Procedure

TfrmODRad.cboAvailModKeyDown

Module

fODRad

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmODRad

Declaration

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

Calls Hierarchy


TfrmODRad.cboAvailModKeyDown
 └TfrmODRad.cboAvailModMouseClick
   └TfrmODRad.ControlChange
     ├TResponses.Clear
     ├TResponses.Update
     │ ├TResponses.FindResponseByName
     │ └TResponses.IENForPrompt
     ├TEncounter.GetLocationName
     │ └TEncounter.UpdateText
     │   └GetEncounterText
     └TResponses.GetOrderText
       ├TResponses.NextInstance
       ├TResponses.FindResponseByName
       ├TResponses.FormatResponse
       │ └TResponses.FindResponseByIEN
       └TResponses.AppendChildren
         ├TResponses.FindPromptByIEN
         ├TResponses.FindResponseByIEN
         └TResponses.FormatResponse...

Calls

Name Declaration Comments
TfrmODRad.cboAvailModMouseClick procedure cboAvailModMouseClick(Sender: TObject); -


Source

715   procedure TfrmODRad.cboAvailModKeyDown(Sender: TObject; var Key: Word;
716     Shift: TShiftState);
717   begin
718     inherited;
719     if Key = VK_RETURN then cboAvailModMouseClick(Self);
720   end;