如何从BPL代码中高效提取资源文件在Delphi中?