错误提示是：
[Error]Unit1.pas[74]:Statement expected but 'PROCEDURE' found
[Error]Unit1.pas[88]:"expected but" found
[Error]Unit1.pas[90]:declaration expected but end of file found
[Fatal Error]Project2.dpr[5]:Could not compile used unit 'Unit1.pas'

要么你试试这个
if messagedlg('真的要删除该记录吗?',mtconfirmation,[mbYes,mbNo],0)=mryes then
begin

end
else
begin

end;

你這個錯誤不再是那個語句的問題了

谢谢两位的回复。我也觉得不再是那个老问题了，是新问题，出在别处，但不知是哪里，请有时间帮我再看看。

估计是以下问题，拼写的问题

Error]Unit1.pas[74]:Statement expected but 'PROCEDURE' found
74行前面少了个(end;)
[Error]Unit1.pas[88]:"expected but" found
88行附近看看那里用了双引号的
[Error]Unit1.pas[90]:declaration expected but end of file found
单元末尾 的结束符号 (end.)上面了少了个 (end;)

推荐两个辅助工具 cnsWizards codeRush(这个建议去掉它的代码自动完成功能，太烦)

mb_ysenocanel

直接在网上把那个源文件找出来吧