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#a10184771
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

Reply via email to