I ended up doing appriximately the same. I modified slightly BrowseDlg with
custom action written in C,
to validate selected shortcuts localtion. But still, it does not look good
enough for production software.
I saw Windows Installer setups where it was done quite nicely. I just wonder
how?
Igor
Gareth at Serif wrote:
>
> Quite. I wrote one a while back, something like this...
>
> Dialog Id="ShortcutsDlg" Width="376" Height="266"
> Title="$(loc.DIALOG_GENERIC_Title)" NoMinimize="yes">
> <Control Id="BannerBitmap" Type="Bitmap" X="0" Y="0" Width="376"
> Height="45" TabSkip="no" Text="DlgBanner" />
> <Control Id="Title" Type="Text" X="15" Y="6" Width="280" Height="15"
> Transparent="yes" NoPrefix="yes"
> Text="{\FontTitle}$(loc.DIALOG_ShortcutsDlg_CONTROL_txt1)" />
> <Control Id="Description" Type="Text" X="15" Y="20" Width="195"
> Height="30" Transparent="yes" NoPrefix="yes"
> Text="{\FontNormal}$(loc.DIALOG_ShortcutsDlg_CONTROL_txt2)" />
> <Control Id="Icon" Type="Icon" X="30" Y="65" Width="24" Height="24"
> ToolTip="$(loc.DIALOG_TOOLTIP_FolderIcon)" FixedSize="yes" IconSize="32"
> Text="FolderIcon" />
> <Control Id="TargetText" Type="Text" X="58" Y="65" Width="240"
> Height="20" Transparent="yes" NoPrefix="yes" Property="_BrowseProperty"
> Text="$(loc.DIALOG_ShortcutsDlg_CONTROL_TargetText)" />
> <Control Id="Target" Type="Text" X="65" Y="80" Width="220" Height="20"
> Transparent="yes" NoPrefix="yes" Property="_BrowseProperty"
> Text="PROGRAMGROUP" />
> <Control Id="Browse" Type="PushButton" X="300" Y="70" Width="56"
> Height="17" Text="[ButtonText_Change]">
> <Publish Event="SpawnDialog" Value="BrowseDlg">1</Publish>
> <Publish Property="_BrowseProperty"
> Value="PROGRAMGROUP">1</Publish>
> </Control>
> <Control Id="Separator" Type="GroupBox" X="35" Y="140" Width="306"
> Height="75" />
> <Control Id="Description2" Type="Text" X="45" Y="150" Width="260"
> Height="20" Transparent="yes" NoPrefix="yes"
> Text="$(loc.DIALOG_ShortcutsDlg_CONTROL_Description)" />
> <Control Id="DesktopSC" Type="CheckBox" X="55" Y="168" Width="150"
> Height="17" Property="DESKTOPSC" CheckBoxValue="1"
> Text="$(loc.DIALOG_ShortcutsDlg_CONTROL_DesktopSC)">
> <Condition Action="disable">Version9X</Condition>
> </Control>
> <Control Id="QuickLaunchSC" Type="CheckBox" X="55" Y="188" Width="150"
> Height="17" Property="QUICKLAUNCHSC" CheckBoxValue="1"
> Text="$(loc.DIALOG_ShortcutsDlg_CONTROL_QuickLaunchSC)">
> <Condition Action="disable">Version9X</Condition>
> </Control>
> <Control Id="BottomLine" Type="Line" X="3" Y="234" Width="372"
> Height="0"
> />
> <Control Id="Back" Type="PushButton" X="180" Y="243" Width="56"
> Height="17" Text="[ButtonText_Back]">
> <Publish Event="NewDialog" Value="CustomizeDlg">1</Publish>
> </Control>
> <Control Id="Next" Type="PushButton" X="236" Y="243" Width="56"
> Height="17" Default="yes" Text="[ButtonText_Next]">
> <Publish Event="AddLocal"
> Value="ShortcutsDesktop"><![CDATA[DESKTOPSC =
> 1]]></Publish>
> <Publish Event="Remove"
> Value="ShortcutsDesktop"><![CDATA[DESKTOPSC <>
> 1]]></Publish>
> <Publish Event="AddLocal"
> Value="ShortcutsQuickLaunch"><![CDATA[QUICKLAUNCHSC = 1]]></Publish>
> <Publish Event="Remove"
> Value="ShortcutsQuickLaunch"><![CDATA[QUICKLAUNCHSC <> 1]]></Publish>
> <Publish Event="NewDialog"
> Value="InstallDlgWithBrowse">1</Publish>
> </Control>
> <Control Id="Cancel" Type="PushButton" X="304" Y="243" Width="56"
> Height="17" Cancel="yes" Text="[ButtonText_Cancel]">
> <Publish Event="SpawnDialog" Value="CancelDlg">1</Publish>
> </Control>
> </Dialog>
>
--
View this message in context:
http://www.nabble.com/Dialog-to-let-user-select-%22Program-Menu%22-folder-tf3640577.html#a10187328
Sent from the wix-users mailing list archive at Nabble.com.
-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
WiX-users mailing list
WiX-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/wix-users
