Das Auslesen der Informationen aus der Ressource PACKAGEINFO geht auch mit TJclPePackageInfo (Beispiel s.u.), aber sollten die enthaltenen Units nicht im DPK stehen und wenn nicht, dann sollte es eine Warnung (
W1033) geben?
Schon mal das Compilieren mit dem Parameter "--depends" probiert? ("
Unit-Abhängigkeitsinformationen ausgeben" in the Projektoptionen in der
IDE)
Delphi-Quellcode:
program PePackageInfoTest;
{$APPTYPE CONSOLE}
uses
Windows, JclPEImage;
var
I: Integer;
PkgHandle: THandle;
PePackageInfo: TJclPePackageInfo;
begin
PkgHandle := LoadLibrary('
c:\Program Files (x86)\Embarcadero\RAD Studio\8.0\bin\designide150.bpl');
if PkgHandle <> 0
then
begin
PePackageInfo := TJclPePackageInfo.Create(PkgHandle);
try
WriteLn('
ContainsCount: ', PePackageInfo.ContainsCount);
for I := 0
to PePackageInfo.ContainsCount - 1
do
WriteLn(PePackageInfo.ContainsNames[I]);
finally
PePackageInfo.Free;
end;
end;
ReadLn;
end.