BPL 가져 오기 파일 이름

Question

BPL 내에서 자체 파일 이름을 가져올 수 있습니까? 예 : C : \ foo는 \ bar.bpl

(가 중요한 경우 동적으로로드 delphi7)

Answer 1

전화 GetModuleFileName. 모듈 핸들의 경우 SysInit.HInstance을 사용하십시오. 0을 전달하면 호스트 EXE의 파일 이름 (ParamStr(0))이 전달됩니다. 하여 GetModuleFileName의

Answer 2

사용 예 :

function DLLFileName : string; 
begin 
    SetLength(Result,MAX_PATH); 
    GetModuleFileName(HInstance,PCHar(Result),MAX_PATH); 
    SetLength(Result,StrLen(PChar(Result))); 
end;