Procedure

TfrmODMeds.cboScheduleKeyUp

Module

fODMeds

Last Modified

7/15/2014 3:26:42 PM

Visibility

Public/Published

Owner

TfrmODMeds

Declaration

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


Source

5486  procedure TfrmODMeds.cboScheduleKeyUp(Sender: TObject; var Key: Word;
5487    Shift: TShiftState);
5488  begin
5489    inherited;
5490    if (Key = VK_BACK) and (cboSchedule.Text = '') then cboSchedule.itemindex:= -1;
5491  end;