Delphi XE3 - Если строка edit1 пуст...

Question

Как реализовать в код:
Если строка sEdit1 пустая, то ошибка (ShowMessage), если строка заполнена то продолжается выполнение кода после проверки на пустоту!

Мансур Султонов · Accepted Answer

if Edit1.Text='' then
raise Exception.Create('No way!');

Сергей Концедалов · Answer

if trim(sEdit1.text)= '' then begin ShowMessage('error'); exit end else begin
//тут продолжение кода

end;