Delphi之通过报错地址或崩溃地址找出源代码的出错行

一 什么是MAP文件 
什么是 MAP 文件？简单地讲， MAP 文件是程序的全局符号、源文件和代码行号信息的唯一的文本表示方法，它可以在任何地方、任何时候使用，不需要有额外的程序进行支持。而且，这是唯一能找出程序崩溃的地方的救星。 
如果要查找代码行号，需要使用下面的公式做一些十六进制的减法运算： 
崩溃行偏移 = 崩溃地址（Crash Address） - 基地址（ImageBase Address） - 0x1000 
为什么要这样做呢？我们得到的崩溃地址都是由 偏移地址+ 基地址得来的，所以在计算行号的时候要把基地址减去，一般情况下，基地址的值是 0x00400000 。另外，由于一般的 PE 文件的代码段都是从 0x1000 偏移开始的，所以也必须减去 0x1000 。 
二 Delphi 下生成MAP文件的方法 
1. project -> options -> Linker -> Map file 选择detailed. 
三 例子 
代码 
procedure TForm1.Button1Click(Sender: TObject); 
var 
I, J: Integer; 
p: PChar; 
begin