UTFTOASCII
構文
Text_Ascii = UtfToAscii(Address_Text_Unicode)
Function UTFTOASCII(ByVal text As WString Ptr) As String
説明
Unicode の文字列を、ASCIIの文字列に変換します。
オプション
Address_Text_Unicode - Unicode の文字列を含むバッファのアドレス
プラットホーム
Windows
例
#Include "window9.bi"
Dim As WString Ptr pwStr
Dim As String String_="Hello World!"
? String_
pwStr = ASCIITOUTF(String_)
? *pwStr
? UTFTOASCII(pwStr)
Sleep
DeAllocate(pwStr)
結果
Hello world!
Hello world!
Hello world!
旧例:
#Include "window9.bi"
Dim UnicodeMojiretsuPtr As WString Ptr
Dim AsciiMojiretsu As String
AsciiMojiretsu = "Здравствуй мир! (こんにちは世界!)"
? AsciiMojiretsu
UnicodeMojiretsuPtr = AsciiToUtf(AsciiMojiretsu)
? *UnicodeMojiretsuPtr
? UtfToAscii(UnicodeMojiretsuPtr)
Sleep
DeAllocate(UnicodeMojiretsuPtr)
http://mneniya.ucoz.ru/
ロシア語オリジナル:https://users.freebasic-portal.de/freebasicru/window9lib/window9.html
ページ歴史:2022-04-15
日本語翻訳:WATANABE Makoto