Windows平台Ruby实现原生文件对话框遇CLSID解析问题求助

你的代码存在几个关键问题导致CO_E_CLASSSTRING错误，以下是具体修正点和完整代码：

核心错误点 #

• SysAllocString参数类型错误：该API要求传入const OLECHAR*（即UTF-16LE宽字符指针），但你定义的函数参数是const char*，导致API无法正确识别字符串。
• CLSIDFromString参数传递错误：第一个参数必须是BSTR类型（由SysAllocString返回的指针），而你直接传入了原始的UTF-16字符串指针。
• CLSID缓冲区初始化错误：CLSID是固定16字节的二进制结构，不需要用长字符串初始化，直接分配16字节的内存即可。

修正后的代码 #

require 'fiddle'
require 'fiddle/import'
require 'fiddle/types'

include Fiddle
include Fiddle::CParser

# 生成UTF-16LE编码的CLSID字符串（带宽字符终止符）
clsid_str = "{DC1C5A9C-E88A-4dde-A5A1-60F82A20AEF7}"
wide_str = clsid_str.encode('UTF-16LE') + "\x00\x00" # Windows平台必须用UTF-16LE

oleaut_dll = Fiddle.dlopen 'OleAut32'
# 修正SysAllocString的参数与返回值类型
sysallocstring = Function.new(
  oleaut_dll['SysAllocString'],
  [TYPE_VOIDP],
  TYPE_VOIDP
)
bstr = sysallocstring.call(wide_str)

if bstr.null?
  puts "SysAllocString分配BSTR失败"
  exit 1
end

ole_dll = Fiddle.dlopen 'Ole32'
# 正确定义CLSIDFromString的函数签名
clsidfromstring = Function.new(
  ole_dll['CLSIDFromString'],
  [TYPE_VOIDP, TYPE_VOIDP],
  TYPE_LONG
)

# 分配16字节缓冲区存储CLSID（CLSID固定为16字节）
clsid_buf = Pointer.malloc(16, Fiddle::RUBY_FREE)
hr = clsidfromstring.call(bstr, clsid_buf)

begin
  case hr
  when 0 # NOERROR
    puts "CLSID获取成功"
    # 格式化输出标准格式的CLSID
    clsid_bytes = clsid_buf[0, 16].unpack('H*')[0]
    formatted_clsid = "#{clsid_bytes[0..7]}-#{clsid_bytes[8..11]}-#{clsid_bytes[12..15]}-#{clsid_bytes[16..19]}-#{clsid_bytes[20..31]}"
    puts "CLSID: #{formatted_clsid}"
  when -2147221005 # CO_E_CLASSSTRING
    raise "CO_E_CLASSSTRING: 无效的CLSID字符串格式"
  when -2147024808 # E_INVALIDARG
    raise "E_INVALIDARG: 参数无效"
  else
    raise "未知错误，错误码: #{hr}"
  end
ensure
  # 释放BSTR资源
  sysfreestring = Function.new(
    oleaut_dll['SysFreeString'],
    [TYPE_VOIDP],
    TYPE_VOID
  )
  sysfreestring.call(bstr) unless bstr.null?
end

额外说明 #

• {DC1C5A9C-E88A-4dde-A5A1-60F82A20AEF7}确实是IFileOpenDialog接口的CLSID，用于创建Windows原生文件打开对话框。
• 后续创建对话框实例时，需要先调用CoInitialize初始化COM环境，再通过CoCreateInstance创建接口实例。

内容的提问来源于stack exchange，提问作者Zachary