Procedure

TfrmODMeds.RestoreDefaultButton

Module

fODMeds

Last Modified

7/15/2014 3:26:42 PM

Visibility

Private

Owner

TfrmODMeds

Declaration

procedure RestoreDefaultButton;

Called-By Hierarchy


TfrmODMeds.RestoreDefaultButton
      TfrmODMeds.grdDosesExit┤ 
    TfrmODMeds.cboXDosageExit┤ 
     TfrmODMeds.cboXRouteExit┤ 
  TfrmODMeds.pnlXScheduleExit┤ 
  TfrmODMeds.pnlXDurationExit┤ 
    TfrmODMeds.pnlMessageExit┤ 
  TfrmODMeds.cboXSequenceExit┘ 

Called-By

Name Declaration Comments
TfrmODMeds.cboXDosageExit procedure cboXDosageExit(Sender: TObject); -
TfrmODMeds.cboXRouteExit procedure cboXRouteExit(Sender: TObject); -
TfrmODMeds.cboXSequenceExit procedure cboXSequenceExit(Sender: TObject); -
TfrmODMeds.grdDosesExit procedure grdDosesExit(Sender: TObject); -
TfrmODMeds.pnlMessageExit procedure pnlMessageExit(Sender: TObject); -
TfrmODMeds.pnlXDurationExit procedure pnlXDurationExit(Sender: TObject); -
TfrmODMeds.pnlXScheduleExit procedure pnlXScheduleExit(Sender: TObject); -


Source

5149  procedure TfrmODMeds.RestoreDefaultButton;
5150  begin
5151    if Assigned(FDisabledDefaultButton) then begin
5152      FDisabledDefaultButton.Default := True;
5153      FDisabledDefaultButton := nil;
5154    end;
5155  end;