如何在执行过程中，出现了错误，出现自己给定的中文提示。

Question

如何在执行过程中，出现了错误，出现自己给定的中文提示。如不是数值型等：‘’is not a valid integer value.

Answer 1

try
   ...   //你的代码
   ...
except
  Application.MessageBox('输错啦','提示',MB_OK+MB_IconStop);  //中文提示
end;

Answer 2

try
   ...   //你的代码
   ...
except
  on E: EConvertError do
      ShowMessage(写出你想给出的中文提示。);end;
...

Answer 3

要直接执行可运行程序（project保存的地方打开），效果才符合var
  i:Integer;
begintry
  i:=StrToInt(Edit1.Text);
except
  ShowMessage('不是整数型'); 
end;
end;