실행버턴을 눌렸을때
어떤 조건이 되면
실행 이벤트를 완료하지 않고 중간에 완전히 빠져오는 방법이 있는지요?
예를 들어
procedure TJAJE22IF.OpenDataByColumn(aField: TField);
var
Year : String;
begin
btbSearch_Click := False;
//아래 조건이 되면 openDataByColumn 루틴을 강제 빠져나오고 싶습니다
전체 아래 문장을 if else 문을 쓰면 되는 데 그러면 소스가 깨끗하지 못해서요...
if (mskSDate.Text <> ' . . ') and (mskEDate.Text <> ' . . ') then
......
.....
end;
if (a=1 ) then Exit; <-- 이거 말씀하시는건지..