Get-PSReadLineOption | 
    Get-Member -MemberType Property | 
    Where-Object Name -like "*Color" | 
    ForEach-Object { 
        $name = $_.Name 
        $value = (Get-PSReadLineOption).$name 
        
        return "{0,-40} {1}sample`e[0m" -f $name, $value 
    }