Check RTF font information inside clipboard with Windows Powreshell

fontchecker.ps1

function Get-ClipboardFontInfo {
    Add-Type -AssemblyName System.Windows.Forms
    $cb = [System.Windows.Forms.Clipboard]::GetData([System.Windows.Forms.DataFormats]::Rtf)
    if (-not $cb) {
        "フォント情報がコピーされていません……" | Write-Host
        return
    }
    $rtb = [System.Windows.Forms.RichTextBox]::new()
    $rtb.Rtf = $cb
    $font = $null
    for ($i = 0; $i -lt $rtb.Text.length; $i++) {
        $rtb.Select($i, 1)
        $t = $rtb.SelectedText
        $u = [Convert]::ToInt32($t -as [char]).ToString("X4")
        $font = $rtb.SelectionFont
        [PSCustomObject]@{
            "Text"             = $t;
            "Codepoint"        = $u;
            "OriginalFontName" = $font.OriginalFontName;
            "Size"             = $font.SizeInPoints;
            "Style"            = $font.Style;
        } | Write-Output
        $font | Clear-Variable -ErrorAction SilentlyContinue
    }
    $rtb | Clear-Variable -ErrorAction SilentlyContinue
}

Get-ClipboardFontInfo | Format-Table