Enumerate installed Packages in Windows 8+ with Delphi 10 -

-

delphi 10 comes windows rt headers translated pascal. based on this c++ code trying enumerate installed metro applications in windows 8+. problem is, don't know how iterator correctly, iiterable_1__ipackage. findpackages method of deployment_ipackagemanager called correctly, , can confirm scanning memory process (before , after method call). process memory contains strings microsoft.skypeapp etc. packages ready iterated. once set iiterator_1__ipackage first package, becomes invalid pointer value (on pc $3). wonder now, if has incorrect rt headers in delphi or me approaching iteration process wrong way (most likely). current code:

program packagesmanager;  {$apptype console}  {$r *.res}  uses   winapi.windows,   system.sysutils,   winapi.management,   winapi.applicationmodel,   winapi.winrt,   system.win.comobj;  var   lclassid: hstring;   pinspectable: iinspectable;   pact: iactivationfactory;   packagemanager: deployment_ipackagemanager;   pkgs: iiterable_1__ipackage;   piter: iiterator_1__ipackage;   hascurrent: boolean;   packageid: ipackageid;   package: ipackage; begin   // com/runtime object initialization   olecheck(roinitialize(ro_init_singlethreaded));    try     if succeeded(windowscreatestring(pwidechar(sdeployment_packagemanager),       length(sdeployment_packagemanager), lclassid))     begin       // activation factory       olecheck(rogetactivationfactory(lclassid, iactivationfactory,         pinspectable));        // activate or create instance activation factory       pact := pinspectable iactivationfactory;       pact.activateinstance(pinspectable);        // extract packagemanager via queryinterface       olecheck(pinspectable.queryinterface(deployment_ipackagemanager,         packagemanager));        // `iiterable` collection of packages       //       // after below call, process memory contains strings package names       // i.e. microsoft.skypeapp, means findpackages called       // confirmed scanning process memory known strings,       // before , after findpackages call       pkgs := packagemanager.findpackages;        // iterator iiterable       piter := pkgs.first; // piter $00000003...        hascurrent := piter.hascurrent; // access violation       while hascurrent       begin         package := piter.current;         packageid := package.id;         hascurrent := piter.movenext;       end;     end;       rouninitialize;   end; end.

i'm not looking read registry or set ntfs access in %programfiles\windowsapps solution, because base project functionality expanded. being able list packages in elegant & microsoft designed way great start.


Comments

Post a Comment

Popular posts from this blog

c++ - llvm function pass ReplaceInstWithInst malloc -

-
#include "llvm/pass.h" #include "llvm/ir/module.h" #include "llvm/ir/function.h" #include "llvm/support/raw_ostream.h" #include "llvm/ir/legacypassmanager.h" #include "llvm/ir/instrtypes.h" #include "llvm/transforms/ipo/passmanagerbuilder.h" #include "llvm/ir/irbuilder.h" #include "llvm/transforms/utils/basicblockutils.h" using namespace llvm; namespace { struct replacepass : public functionpass { static char id; replacepass() : functionpass(id) {} virtual bool runonfunction(function &f) { allocainst* insttoreplace = ??? basicblock::iterator ii(insttoreplace); replaceinstwithinst(insttoreplace->getparent()->getinstlist(), ii, new allocainst(type::int32ty, 0, insttoreplace)); return true; } }; } char replacepass::id = 0; static void registerreplacepass(const passmanagerbuilder &, legacy::passmanagerbase &pm) { pm.add(new re...
Read more

Cross-Compiling Linux Kernel for Raspberry Pi - ${CCPREFIX}gcc -v does not work -

-
i'm trying follow this guide . i'm running both ubuntu 12.04.5 lts (gnu/linux 3.13.0-74-generic x86_64) on "real" hardware , 14.04.1 via virtualbox on mac. problem don't past step 1: hoffmann@angl99:~$ export ccprefix=/home/hoffmann/tools/arm-bcm2708/gcc-linaro-arm-linux-gnueabihf-raspbian/bin/arm-linux-gnueabihf- hoffmann@angl99:~$ ${ccprefix}gcc -v i'm getting following error: -bash: /home/hoffmann/tools/arm-bcm2708/gcc-linaro-arm-linux-gnueabihf-raspbian/bin/arm-linux-gnueabihf-gcc: no such file or directory however, file i'm told missing there: hoffmann@angl99:~$ less /home/hoffmann/tools/arm-bcm2708/gcc-linaro-arm-linux-gnueabihf-raspbian/bin/arm-linux-gnueabihf-gcc "/home/hoffmann/tools/arm-bcm2708/gcc-linaro-arm-linux-gnueabihf-raspbian/bin/arm-linux-gnueabihf-gcc" may binary file. see anyway? this result of basic error/misconception. suggest solution? thanks! sebastian ok - i've worked out (with of person po...
Read more

java.lang.NoClassDefFoundError When Creating New Android Project -

-
i've tried installing (and re-installing) android studio several times now, , each time, studio isn't able create new android project. when attempt initial android studio window (ie. basic 'create', 'open', 'import' etc options), i'm asked of questions in wizard, brief progress dialog, followed nothing @ all. if open incomplete project process creates choosing 'open' list, can try choosing create new android project menu. this has same issue, error message in output console time... java.lang.noclassdeffounderror: com/sun/xml/internal/bind/v2/model/annotation/annotationreader (wrong name: com/sun/xml/internal/bind/v0/model/qnnotation/annotationreader) note: when installed android studio, installed incompatible jdk (1.8, not 1.7). have had go default project settings change jdk uses 1.8. does know how can avoid this? there place should downloading jxb classes? missing in java paths? this appears have been caused cor...
Read more