こんばんは、ZnZです。

On [Tue, 7 Dec 1999 20:32:37 +0900]
Ataru NAKATA <anakata / vector.co.jp> wrote:
>   def GetText
>     result = ""
>     if $OpenClipboard.Call(0) != 0
>       if (h = $GetClipboardData.Call(CF_TEXT)) != 0
>         if (p = $GlobalLock.Call(h)) != 0
>           result = p;
>           $GlobalUnlock.Call(h);
>         end
>       end
>       $CloseClipboard.Call;
>     end
>     return result;

ここは
     return result.gsub("\r\n", "\n")
にして、

>   end
>   
>   def SetText(text)
>     if (text == nil) || (text == "")
>       return
>     end

この直後あたりに
     text = text.gsub("\n", "\r\n")
があった方がいいのではないでしょうか?


--- 
ZnZ(ゼット エヌ ゼット)
西山和広(Kazuhiro Nishiyama)
mailto:nishiyama / mx1.tiki.ne.jp