Procedure

TfrmARTAllergy.calObservedDateExit

Module

fARTAllgy

Last Modified

7/15/2014 3:26:36 PM

Visibility

Public/Published

Owner

TfrmARTAllergy

Declaration

procedure calObservedDateExit(Sender: TObject);


Source

695   procedure TfrmARTAllergy.calObservedDateExit(Sender: TObject);
696   var
697     x: string;
698   begin
699     inherited;
700     calObservedDate.Validate(x);
701     calObservedDate.FMDateTime := calObservedDate.FMDateTime;
702   end;