VS:GetLocalizedPluginName/ja

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

プラグインの名前からローカライズ後の名前を返します。

FUNCTION GetLocalizedPluginName(
                 inPluginName   :STRING;
                 VAR outName    :STRING) : BOOLEAN;

def vs.GetLocalizedPluginName(inPluginName):
    return (BOOLEAN, outName)

Parameters

inPluginName		STRING		プラグインの名前
outName		STRING		ローカライズ後の名前

Return Value

TRUE：プラグインが存在しました。

FALSE：プラグインが存在しませんでした。

Example

PROCEDURE Example;
TYPE
	plugin = STRUCTURE
		universalName :STRING;
		localizedName :STRING;
		params :ARRAY[1..99,1..2] OF STRING;
		popups :ARRAY[1..99,1..99] OF STRING;
	END;
VAR
	plugins :ARRAY[1..99] OF plugin;
	cnt1, cnt2, cnt3, pluginCnt :INTEGER;
	str1, str2, str3, str4 :STRING;
	boo :BOOLEAN;
	int1, int2 :INTEGER;
	
PROCEDURE GetInfo(h :HANDLE);
VAR
	recHand :HANDLE;
	recName :STRING;
BEGIN
	recHand := GetRecord(h, NumRecords(h));
	recName := GetName(recHand);
	FOR cnt1 := 1 TO pluginCnt DO 
		IF recName = plugins[cnt1].universalName 
			THEN cnt1 := pluginCnt + 2;
	IF cnt1 < pluginCnt + 2 THEN BEGIN
		boo := GetLocalizedPluginName(recName, str2);
		pluginCnt := pluginCnt + 1;
		plugins[pluginCnt].universalName := recName;
		plugins[pluginCnt].localizedName := str2;
		FOR cnt2 := 1 TO NumFields(recHand) DO BEGIN
			str1 := GetFldName(recHand, cnt2);
			int1 := GetFldType(recHand, cnt2);
			boo := GetLocalizedPluginParameter(recName, str1, str2);
			plugins[pluginCnt].params[cnt2, 1] := str1;
			plugins[pluginCnt].params[cnt2, 2] := str2;
			IF int1 = 8 THEN BEGIN
				FOR cnt3 := 1 TO NumCustomObjectChoices(recName, str1) DO BEGIN
					str3 := GetCustomObjectChoice(recName, str1, cnt3);
					boo := GetPluginChoiceIndex(recName, str1, str3, int2);
			  		boo := GetLocalizedPluginChoice(recName, str1, int2, str4);
			  		plugins[pluginCnt].popups[cnt2, cnt3] := Concat(str3, Chr(9), str4);
				END;
			END;
		END;
	END;
END;

BEGIN
	pluginCnt := 0;
	ForEachObject(GetInfo, (T=86));
	FOR cnt1 := 1 TO pluginCnt DO BEGIN
		WriteLn(plugins[cnt1].universalName, Chr(9), plugins[cnt1].localizedName);
		cnt2 := 1;
		WHILE plugins[cnt1].params[cnt2, 1] <> '' DO BEGIN
			WriteLn('    ', plugins[cnt1].params[cnt2, 1], Chr(9), plugins[cnt1].params[cnt2, 2]);
			cnt3 := 1;
			WHILE plugins[cnt1].popups[cnt2, cnt3] <> '' DO BEGIN
				WriteLn('        ', plugins[cnt1].popups[cnt2, cnt3]);
				cnt3 := cnt3 + 1;
			END;
			cnt2 := cnt2 + 1;
		END;
	END;
END;
RUN(Example);

Version

利用可能バージョン: VectorWorks10.0

See Also

関連関数:

VS:GetLocalizedPluginParameter | VS:GetLocalizedPluginChoice

関連関数:

[[VS:GetLocalizedPluginParameter]]

| [[VS:GetLocalizedPluginChoice]]