I have a small delphi DLL that looks like this

library Project1;

uses
  SysUtils,
  Classes,
  Dialogs,
  Windows;

{$R *.res}

function cShowMessage(thing:string) :integer ; export;
begin
  ShowMessage(thing);
  cGetVersion := 0;
end;

exports cGetVersion;
begin
end.

And then inside my wix application I have

<Binary Id="projectdll" SourceFile="c:\projects\Project1\Project1.dll" />
<CustomAction Id="project" Return="check" BinaryKey="projectdll"
DllEntry="cShowMessage" Execute="deferred"  />
<CustomAction Id="project.SetValue" Return="check"  Property ="project"
Value ="/installtype=notransaction" />

Finally
<InstallExecuteSequence>
<Custom Action="Wca.SetValue" Before="InstallFiles" />
<Custom Action="Wca" After="Wca.SetValue" >NOT
Installed</Custom>
</InstallExecuteSequence>

But when I run the application, the message box that gets displayed comes up
empty. What am I doing wrong, and is there a better way to do this using
Delphi? (I have to use delphi for it)

Thanks,

Dezzles
------------------------------------------------------------------------------
vRanger cuts backup time in half-while increasing security.
With the market-leading solution for virtual backup and recovery, 
you get blazing-fast, flexible, and affordable data protection.
Download your free trial now. 
http://p.sf.net/sfu/quest-d2dcopy1
_______________________________________________
WiX-users mailing list
WiX-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/wix-users

Reply via email to