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

get url and add instance to a model with prefilled foreign key :django admin -

Image
i have page in each contest shown in row. each row contains contest id , link other model names have foreign key contest. news model: class news(models.model): title = models.charfield(max_length=50, null=true) description = models.textfield() time = models.timefield( default= datetime.datetime.now().time()) contest = models.foreignkey(contest) i want use admin adding , changing these models. want when user clicks on 'news' has foreign key contest id=1, shows list of news value foreign key. use {% instance in instances %} <tr class="{% cycle 'row1' 'row2' %}"> <td>{{ instance.title }}</td> <td>{{ instance.starttime }}</td> <td>{{ instance.timespan }}</td> <td>{{ instance.date }}</td> <td><a href="/adm...
Read more

css - Make div keyboard-scrollable in jQuery Mobile? -

from can tell, although jquery-mobile-powered pages can contain divs overflow set scroll or auto, , these divs can scrolled one-screen bar or mouse wheel, cannot scrolled using arrow keys, page-up/page-down, or home/end. instead, official "page" div (with data-role="page") absorbs input. perhaps other divs can't acquire focus, i'm not sure. is there way around this? edit: jsfiddle of simple example: https://jsfiddle.net/qogz0shx/ <script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.4/jquery.min.js"></script> <script src="https://ajax.googleapis.com/ajax/libs/jquerymobile/1.4.5/jquery.mobile.min.js"> </script> <link rel="stylesheet" href="https://code.jquery.com/mobile/1.4.5/jquery.mobile-1.4.5.css"/> <style> #outer { overflow:scroll; height: 50vh; width: 50vw; } #inner { height: 500vh; width: 500vw; } ...
Read more

ruby on rails - Seeing duplicate requests handled with Unicorn -

recently upgraded our ec2 instances c3.large in order boost more unicorn workers handle increased traffic our site. (6xworkers per machine - 2 ec2 instances). when did this, started seeing duplicate records being created! looks somehow, maybe 2 unicorn workers attempting process same request? in nginx logs see 1 [post] request particular rails controller - yet 2 records being created in database. i'm hitting kind of race condition issue - have no idea how debug this. doesn't happen time, when it's frustrating well. noticed 2 database records within 5 seconds of each other. (and yes disable button when user clicks submit button). unicorn 4.8.2 ruby 1.9.3 rails 3.2.14 any great! thanks! although may not fix problem, upgrade ruby 2.0.0. there blog mentioning idea upgrade ruby 2.0.0 if using unicorn. for example: https://www.digitalocean.com/community/articles/how-to-optimize-unicorn-workers-in-a-ruby-on-rails-app specifically: if using ruby 1.9, ...
Read more