BCB 取程序的路径
---------------------------------------------------------------------------
ExtractFilePath(ParamStr(0)); //这个是标准一点的VCL
ExtractFilePath(Application->ExeName)
BCB 取程序的路径
---------------------------------------------------------------------------
ExtractFilePath(ParamStr(0)); //这个是标准一点的VCL
ExtractFilePath(Application->ExeName)