src/GUI/Functions.ps1
|
function Get-UIData { @{ inputFile = $Script:refs.CompileFileTextBox.Text outputFile = $Script:refs.OutputFileTextBox.Text CompilerOptions = $Script:refs.CompileParamsTextBox.Text TempDir = $Script:refs.TempDirTextBox.Text minifyer = $Script:refs.MinifyScriptTextBox.Text prepareDebug = $Script:refs.DebugInfoCheckBox.Checked architecture = if ($Script:refs.x64CheckBox.Checked) { 'x64' } elseif ($Script:refs.x86CheckBox.Checked) { 'x86' } else { 'anycpu' } lcid = $Script:refs.RegionIDTextBox.Text threadingModel = if ($Script:refs.SingleThreadCheckBox.Checked) { 'STA' } else { 'MTA' } noConsole = -not $Script:refs.ConsoleAppCheckBox.Checked UNICODEEncoding = $Script:refs.UnicodeEncodingCheckBox.Enabled -and $Script:refs.UnicodeEncodingCheckBox.Checked credentialGUI = $Script:refs.CredentialGUICheckBox.Enabled -and $Script:refs.CredentialGUICheckBox.Checked resourceParams = @{ iconFile = $Script:refs.IconFileTextBox.Text title = $Script:refs.TitleTextBox.Text description = $Script:refs.DescriptionTextBox.Text company = $Script:refs.CompanyTextBox.Text product = $Script:refs.ProductNameTextBox.Text copyright = $Script:refs.CopyrightInfoTextBox.Text trademark = $Script:refs.TrademarkInfoTextBox.Text version = $Script:refs.VersionTextBox.Text } configFile = $Script:refs.ConfigFileCheckBox.Checked noOutput = $Script:refs.DisableOutputStreamCheckBox.Checked noError = $Script:refs.DisableErrorStreamCheckBox.Checked noVisualStyles = $Script:refs.IgnoreVisualStylesCheckBox.Enabled -and $Script:refs.IgnoreVisualStylesCheckBox.Checked exitOnCancel = $Script:refs.ExitOnCancelCheckBox.Enabled -and $Script:refs.ExitOnCancelCheckBox.Checked DPIAware = $Script:refs.DPIAwareCheckBox.Enabled -and $Script:refs.DPIAwareCheckBox.Checked winFormsDPIAware = $Script:refs.WinFormsDPIAwareCheckBox.Enabled -and $Script:refs.WinFormsDPIAwareCheckBox.Checked requireAdmin = $Script:refs.RequestAdminCheckBox.Checked supportOS = $Script:refs.MoreOSFeaturesCheckBox.Checked virtualize = $Script:refs.EnableVirtualizationCheckBox.Checked longPaths = $Script:refs.LongPathSupportCheckBox.Checked } } function Set-UIData { param ( [Parameter(Mandatory = $true)] [hashtable]$UIData ) $Script:refs.CompileFileTextBox.Text = $UIData.inputFile $Script:refs.OutputFileTextBox.Text = $UIData.outputFile $Script:refs.CompileParamsTextBox.Text = $UIData.CompilerOptions $Script:refs.TempDirTextBox.Text = $UIData.TempDir $Script:refs.MinifyScriptTextBox.Text = $UIData.minifyer $Script:refs.DebugInfoCheckBox.Checked = $UIData.prepareDebug $Script:refs.x64CheckBox.Checked = $UIData.architecture -eq 'x64' $Script:refs.x86CheckBox.Checked = $UIData.architecture -eq 'x86' $Script:refs.AnyCPUCheckBox.Checked = $UIData.architecture -eq 'anycpu' $Script:refs.RegionIDTextBox.Text = $UIData.lcid $Script:refs.SingleThreadCheckBox.Checked = $UIData.threadingModel -eq 'STA' $Script:refs.MultiThreadCheckBox.Checked = $UIData.threadingModel -eq 'MTA' $Script:refs.ConsoleAppCheckBox.Checked = -not $UIData.noConsole $Script:refs.UnicodeEncodingCheckBox.Checked = $UIData.UNICODEEncoding $Script:refs.CredentialGUICheckBox.Checked = $UIData.credentialGUI $Script:refs.IconFileTextBox.Text = $UIData.resourceParams.iconFile $Script:refs.TitleTextBox.Text = $UIData.resourceParams.title $Script:refs.DescriptionTextBox.Text = $UIData.resourceParams.description $Script:refs.CompanyTextBox.Text = $UIData.resourceParams.company $Script:refs.ProductNameTextBox.Text = $UIData.resourceParams.product $Script:refs.CopyrightInfoTextBox.Text = $UIData.resourceParams.copyright $Script:refs.TrademarkInfoTextBox.Text = $UIData.resourceParams.trademark $Script:refs.VersionTextBox.Text = $UIData.resourceParams.version $Script:refs.ConfigFileCheckBox.Checked = $UIData.configFile $Script:refs.DisableOutputStreamCheckBox.Checked = $UIData.noOutput $Script:refs.DisableErrorStreamCheckBox.Checked = $UIData.noError $Script:refs.IgnoreVisualStylesCheckBox.Checked = $UIData.noVisualStyles $Script:refs.ExitOnCancelCheckBox.Checked = $UIData.exitOnCancel $Script:refs.DPIAwareCheckBox.Checked = $UIData.DPIAware $Script:refs.WinFormsDPIAwareCheckBox.Checked = $UIData.winFormsDPIAware $Script:refs.RequestAdminCheckBox.Checked = $UIData.requireAdmin $Script:refs.MoreOSFeaturesCheckBox.Checked = $UIData.supportOS $Script:refs.EnableVirtualizationCheckBox.Checked = $UIData.virtualize $Script:refs.LongPathSupportCheckBox.Checked = $UIData.longPaths } . $PSScriptRoot/../PSObjectToString.ps1 function Get-ps12exeArgsString { param( [hashtable]$Params ) $result = 'ps12exe' $Params.GetEnumerator() | ForEach-Object { $result += " -$($_.Key):$(PSObjectToString $_.Value -OneLine)" } $result } function Get-ps12exeArgs { $UIData = Get-UIData $result = $UIData.Clone() $result.minifyer = [System.Management.Automation.Language.Parser]::ParseInput($UIData.minifyer, [ref]$null, [ref]$null).GetScriptBlock() if ($ConfigFile) { # 若icon、inputFile、outputFile、TempDir为相对路径，转换为绝对路径 @('iconFile', 'inputFile', 'outputFile', 'TempDir') | ForEach-Object { if ($UIData.$_ -and -not [System.IO.Path]::IsPathRooted($UIData.$_)) { $UIData.$_ = [System.IO.Path]::GetFullPath((Join-Path -Path $ConfigFile -ChildPath $UIData.$_)) } elseif ($UIData.resourceParams.$_ -and -not [System.IO.Path]::IsPathRooted($UIData.resourceParams.$_)) { $UIData.resourceParams.$_ = [System.IO.Path]::GetFullPath((Join-Path -Path $ConfigFile -ChildPath $UIData.resourceParams.$_)) } } } $UIData.GetEnumerator() | Where-Object { $_.Value -eq '' } | ForEach-Object { $result.Remove($_.Key) } $result } $Script:ConfigFile = '' function SetCfgFile([string]$ConfigFile) { $Script:refs.CfgFileLabel.Text = $Script:LocalizeData.CfgFileLabelHead + $ConfigFile $script:ConfigFile = $ConfigFile } function LoadCfgFile([string]$ConfigFile) { if (!$ConfigFile) { $OpenCfgFileDialog.ShowDialog() | Out-Null $ConfigFile = $OpenCfgFileDialog.FileName } if ($ConfigFile) { SetCfgFile $ConfigFile $UIData = Import-Clixml $ConfigFile Set-UIData -UIData $UIData } } function SaveCfgFileAs([string]$ConfigFile) { if (!$ConfigFile) { $SaveCfgFileDialog.ShowDialog() | Out-Null $ConfigFile = $SaveCfgFileDialog.FileName } if ($ConfigFile) { SetCfgFile $ConfigFile $UIData = Get-UIData $UIData | Export-Clixml $ConfigFile } } function SaveCfgFile([string]$ConfigFile) { if (!$ConfigFile) { $ConfigFile = $Script:ConfigFile } SaveCfgFileAs $ConfigFile } function AskSaveCfg { [System.Windows.Forms.MessageBox]::Show($Script:LocalizeData.AskSaveCfg, $Script:LocalizeData.AskSaveCfgTitle, [System.Windows.Forms.MessageBoxButtons]::YesNo, [System.Windows.Forms.MessageBoxIcon]::Question) -eq 'Yes' } function PauseMusic { [ps12exeGUI.Win32]::mciSendString("pause ps12exeGUIBGM", $null, 0, 0) | Out-Null } function ResumeMusic { [ps12exeGUI.Win32]::mciSendString("resume ps12exeGUIBGM", $null, 0, 0) | Out-Null } |