pascalscript - Inno Setup Set Uninstallable directive based on custom checkbox value -

-

i want know, how use uninstallable directive, when don't have tasks or components:

[setup] uninstallable:not if iscomponentselected ('comp1 comp2')

i don't have tasks or components created. created checkboxes "portable" option, want add uninstallable option, when 1 checked:

[code]  var   component: twizardpage;   portable,installer: tnewradiobutton;  copmp: tlabel;   function install: boolean;  begin    result := installer.checked;  end;   function portab: boolean;  begin    result := portable.checked;  end;   procedure initializewizard();  begin   component :=    createcustompage(      wpselectdir, 'component selection',      'which types , components install?');   comppanel := tpanel.create(wizardform);   comppanel   begin     parent := component.surface;     left := scalex(0);     top := scaley(0);     width := scalex(417);     height := scaley(100);     bevelouter := bvnone;    end;   copmp := tlabel.create(wizardform);    copmp    begin     parent := comppanel;     caption := 'type , components:';     left := scalex(0);     top := scaley(5);     width := scalex(150);     height := scaley(13);   end;   portable := tnewradiobutton.create(wizardform);   portable   begin     parent := comppanel;     left := scalex(5);     top := scaley(25);     width := scalex(200);     height := scaley(17);     caption := 'unpacking';     onclick:=@copmpclick;   end;   installer :=  tnewradiobutton.create(wizardform);   installer   begin     parent := comppanel;     left := scalex(5);     top := scaley(45);     width := scalex(200);     height := scaley(17);     caption := 'install';     onclick:=@copmpclick;     checked:=true;   end;

just implement custom function:

function isuninstallable: boolean; begin   result := installer.checked; end;

and use in uninstallable directive:

[setup] uninstallable=isuninstallable

Comments

Post a Comment

Popular posts from this blog

ios - MKAnnotationView layer is not of expected type: MKLayer -

-
Image
so code works fine logger riddled message. there way rid of or suppress it? postannotation.swift class postannotation: mkpointannotation { //mark: properties let post: post //mark: initialization init(post: post) { self.post = post super.init() self.coordinate = cllocationcoordinate2d(latitude: post.latitude, longitude: post.longitude) self.title = post.title self.subtitle = post.timestring() } } adding annotation let annotation = postannotation(post: post) self.map.addannotation(annotation) func mapview func mapview(_ mapview: mkmapview, viewfor annotation: mkannotation) -> mkannotationview? { if annotation mkuserlocation { return nil } var annotationview = mapview.dequeuereusableannotationview(withidentifier: "pin") as? mkpinannotationview if annotationview == nil { annotationview = mkpinannotationview(annotation: annotation, reuseidentifier: "pin")
Read more

ZeroMQ on Windows, with Qt Creator -

-
i have installed zmq link given below on windows 7. http://zeromq.org/distro:microsoft-windows 1) have c++ project in qt-creator , i'm using zmq c++ binding (zhelpers.hpp etc). 2) have added .lib installed zmq folder qtcreator 3) while compiling, compiler looks _imp__zmq_verion, in .dll files present in .lib have __imp_zmq_version. 4) causing undefined reference zmq_version. anyone else faced problem , has solution ?
Read more

unity3d - Unity SceneManager.LoadScene quits application -

-
i have 2 different scenes 1 named 'main' , other 'game' both added scenes in load. when use scenemanager.loadscene("game"); works no problem when tried return main scene code if (input.getkeydown (keycode.escape)) { scenemanager.loadscene("main"); } strangely game quits. thanks. sorry interruption. somewhere on other script found code. if (input.getkeydown (keycode.escape)) { application.quit (); } that's bad, know...
Read more