Código Delphi [-]if Trim(edit1.text) = '' then showmessage ('Esta vacio') else showmessage ('No esta vacio');
if Trim(edit1.text) = '' then showmessage ('Esta vacio') else showmessage ('No esta vacio');