パスにマルチバイト文字が含まれているかどうか判定 | Codetter（こーどったー）

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// マルチバイト文字が含まれているパスかどうか判定 by akk026
#uselib "kernel32.dll"
#func MultiByteToWideChar "MultiByteToWideChar" int, int, sptr, int, sptr, int
#define CP_ACP 0
path = dirinfo(1)
MultiByteToWideChar CP_ACP, 0, varptr(path), -1, 0, 0
if (stat - 1) < strlen(path) {
    mes "パスにマルチバイト文字が含まれています"
} else {
    mes "パスにマルチバイト文字は含まれていません"
}
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX