if (form1.Edit1.Text ='')and (form1.Edit2.Text ='')and (form1.Edit3.Text ='')and (form1.Edit4.Text ='')and (form1.Edit5.Text ='') then begin Showmessage('请一定输入一项内容!'); end;
应为: if (form1.Edit1.Text =''and form1.Edit2.Text =''and form1.Edit3.Text ='') and (form1.Edit4.Text =''and form1.Edit5.Text ='') then begin Showmessage("请一定输入一项内容!"); end;
应该用or!!!if (form1.Edit1.Text ='') or (form1.Edit2.Text ='') or (form1.Edit3.Text ='') or (form1.Edit4.Text ='') or (form1.Edit5.Text ='') then begin Showmessage('请一定输入一项内容!'); end;
begin
Showmessage("请一定输入一项内容!");
end;
begin
Showmessage('请一定输入一项内容!');
end;
begin
Showmessage("请一定输入一项内容!");
end;
begin
Showmessage('请一定输入一项内容!');
end;
——开发人员指南
begin
Showmessage('请一定输入一项内容!');
end;