Ruby是很强大,可以利用附加库dl/win32的Win32API模块直接呼叫win32API

Win32API.new
参数1 字符串 呼叫dll名称
参数2 字符串 dll中dllexport的名称
参数3 字符串数组 表示每个参数的类型 L代表Long P代表Point I代表Int V代表Void (在实际使用的时候HResult和各种Handle都是Long,字符串是P)
参数4 字符串 表示返回值类型 同上

ruby的魅力:直接呼叫Win32APIrequire "dl/win32"
ruby的魅力:直接呼叫Win32API
ruby的魅力:直接呼叫Win32APIFindWindow 
= Win32API.new 'user32.dll''FindWindow'%w(L P), 'L'
ruby的魅力:直接呼叫Win32APISetWindowText 
= Win32API.new 'user32.dll''SetWindowText'%W(L P), 'I'
ruby的魅力:直接呼叫Win32API
ruby的魅力:直接呼叫Win32API
if ARGV.length == 0 then
ruby的魅力:直接呼叫Win32API  puts 
"使用说明:"
ruby的魅力:直接呼叫Win32API  puts 
"一个参数时,是根据窗体标题查看窗体ID"
ruby的魅力:直接呼叫Win32API  puts 
"两个参数时,是根据参数1的标题查找窗体,然后更改为参数2的标题"
ruby的魅力:直接呼叫Win32APIelsif ARGV.length 
> 0 then
ruby的魅力:直接呼叫Win32API
ruby的魅力:直接呼叫Win32API  win 
= FindWindow.call(0,ARGV.shift)
ruby的魅力:直接呼叫Win32API  puts win
ruby的魅力:直接呼叫Win32API
ruby的魅力:直接呼叫Win32API  
if win != 0 then
ruby的魅力:直接呼叫Win32API    bSet 
= SetWindowText.call(win, ARGV.shift)
ruby的魅力:直接呼叫Win32API    
if bSet == 1 then
ruby的魅力:直接呼叫Win32API      puts 
"Success!"
ruby的魅力:直接呼叫Win32API    
else
ruby的魅力:直接呼叫Win32API      puts 
"Fail!"
ruby的魅力:直接呼叫Win32API    end
ruby的魅力:直接呼叫Win32API  end
ruby的魅力:直接呼叫Win32API  
ruby的魅力:直接呼叫Win32APIend

相关文章: