Procedure

TfrmODBBank.cboReasonsExit

Module

fODBBank

Last Modified

7/15/2014 3:26:40 PM

Visibility

Public/Published

Owner

TfrmODBBank

Declaration

procedure cboReasonsExit(Sender: TObject);


Source

2447  procedure TfrmODBBank.cboReasonsExit(Sender: TObject);
2448  begin
2449    inherited;
2450    if Length(cboReasons.Text) > 0 then
2451      uReason := cboReasons.Text;
2452  end;