if语句 老是编译不通过

Delphi(Pascal) code

if(strToint(edit1.Text)<0 or strToint(edit1.text)>255) thenbegin  showmessage('有效值必须在0~255之间');  edit1.Text:=intTostr(0);end

这代码哪错了呢？

[解决办法]
少了括号
if(strToint(edit1.Text)<0) or (strToint(edit1.text)>255) then
[解决办法]
if (strToint(edit1.Text) < 0) or (strToint(edit1.text) > 255 ) then

布尔语句用括号括起