#pragma start 和 #pragma exit

#pragma startup  function-name  <priority>

表示在调用main()函数之前先调用 function-name 这个函数（类似于Delphi中 initialization节）

 

#pragma exit    function-name  <priority> （类似于Delphi中finalization节）

表示在调用_exit()函数退出程序之前先调用 function-name 这个函数

 

function-name要求是不携带参数且无返回值的函数

其中的priority这个表示优先级，属于可选参数，但是必须在[64, 255]这个闭区间内。[1, 63]这个区间的优先级是用作ISO的startup和shutdown机制使用的，不要将优先级定义在此区间内。如果不设定优先级，则默认设置为100。你可以用#pragma  startup指定编译优先级，如果使用了#pragma  package(smart_init)，BCB就会根据优先级的大小顺序先后编译。