프로그램 내에서 특정 모듈(dll 또는 bpl)의 경로를 알고 싶으면?

//--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) {    String sModule="vcl140.bpl";    HINSTANCE__ * hModlule=GetModuleHandleW(sModule.c_str());    if(hModlule)    {      wchar_t buf[256];       GetModuleFileNameW(hModlule,buf,255);       ShowMessage(String(buf));    } } //---------------------------------------------------------------------------