CloseActionExecute method

Applies to
TDUnitDialog

Declaration
Procedure CloseActionExecute(Sender: TObject);

Implementation

procedure TDUnitDialog.CloseActionExecute(Sender: TObject);
begin
  if FTestResult <> nil then
     FTestResult.stop;
  self.ModalResult := mrCancel;
  Close;
End;


HTML generated by Time2HELP
http://www.time2help.com