Desktop Management スクリプト言語 › 関数 › MIF および Inv ファイル関数 › GetMIFString - 文字列属性値の取得

GetMIFString - 文字列属性値の取得

UNIX および Windows で有効です。

GetMIFString 関数は、MIF ファイルの特定の文字列属性の値を取得します。

この MIF および Inv ファイル関数の形式は、以下のとおりです。

GetMIFString(Filename as string, GroupName as string, AttrName as string) as string

GetMIFString(Filename as string, GroupID as integer, AttrID as integer) as string

GetMIFString(Filename as string, GroupName as string, GroupID as integer, AttrName as string, AttrID as integer) as string

Filename

MIF ファイル名を指定します。

GroupName

属性が属しているグループの名前を指定します。

GroupID

属性が属しているグループの ID を指定します。

AttrName

値を取得する属性の名前を指定します。

AttrID

値を取得する属性の ID を指定します。

指定された属性が MIF ファイルにある場合、GetMIFString はその属性値を表す文字列を返します。それ以外の場合は、空の文字列を返します。

例： GetMIFString 関数

以下に、GetMIFComponent、GetMIFInteger、GetMIFString、GetMIFValue、および SetMIFValue 関数の例を示します。

Dim file, gname, aname as string
Dim gid as integer

ClrScr()
file = "h:¥test¥miffus¥file.mif"

Print("Component of """ + file + """: """ + GetMIFComponent(file) + """")

gname = "Strings"
gId = 1
aname = "string_1"
Print(gname + "." + aname + " = " + GetMIFString(file, gname, gId, aname, 1))
aname = "string_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))

if SetMIFValue(file, gname, gId, aname, 2, "Text_new") then
	Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("1. SetMIFValue failed.")
	exit
endif

gname = "Numbers"
gId = 2
aname = "number_1"
Print(gname + "." + aname + " = " + Str(GetMIFInteger(file, gname, gId, aname, 1)))
aname = "number_2"
Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
if SetMIFValue(file, gname, gId, aname, 2, "999999") then

Print(gname + "." + aname + " = " + GetMIFValue(file, gname, gId, aname, 2))
else
	Print("2. SetMIFValue failed.")
	exit
endif