Function TSWdColor();
Begin
	Uses TSDocxEnumerations;

	hash := array();
	hash[wdColorAqua()] := "33CCCC";
	hash[wdColorAutomatic()] := "auto";
	hash[wdColorBlack()] := "000000";
	hash[wdColorBlue()] := "0000FF";
	hash[wdColorBlueGray()] := "666699";
	hash[wdColorBrightGreen()] := "00FF00";
	hash[wdColorBrown()] := "993300";
	hash[wdColorDarkBlue()] := "000080";
	hash[wdColorDarkGreen()] := "003300";
	hash[wdColorDarkRed()] := "800000";
	hash[wdColorDarkTeal()] := "003366";
	hash[wdColorDarkYellow()] := "808000";
	hash[wdColorGold()] := "FFCC00";
	hash[wdColorGray05()] := "F3F3F3";
	hash[wdColorGray10()] := "E6E6E6";
	hash[wdColorGray125()] := "E0E0E0";
	hash[wdColorGray15()] := "D9D9D9";
	hash[wdColorGray20()] := "CCCCCC";
	hash[wdColorGray25()] := "C0C0C0";
	hash[wdColorGray30()] := "B3B3B3";
	hash[wdColorGray35()] := "A6A6A6";
	hash[wdColorGray375()] := "A0A0A0";
	hash[wdColorGray40()] := "999999";
	hash[wdColorGray45()] := "8C8C8C";
	hash[wdColorGray50()] := "808080";
	hash[wdColorGray55()] := "737373";
	hash[wdColorGray60()] := "666666";
	hash[wdColorGray625()] := "606060";
	hash[wdColorGray65()] := "595959";
	hash[wdColorGray70()] := "4C4C4C";
	hash[wdColorGray75()] := "404040";
	hash[wdColorGray80()] := "333333";
	hash[wdColorGray85()] := "262626";
	hash[wdColorGray875()] := "202020";
	hash[wdColorGray90()] := "191919";
	hash[wdColorGray95()] := "0C0C0C";
	hash[wdColorGreen()] := "008000";
	hash[wdColorIndigo()] := "333399";
	hash[wdColorLavender()] := "CC99FF";
	hash[wdColorLightBlue()] := "3366FF";
	hash[wdColorLightGreen()] := "CCFFCC";
	hash[wdColorLightOrange()] := "FF9900";
	hash[wdColorLightTurquoise()] := "CCFFFF";
	hash[wdColorLightYellow()] := "FFFF99";
	hash[wdColorLime()] := "99CC00";
	hash[wdColorOliveGreen()] := "333300";
	hash[wdColorOrange()] := "FF6600";
	hash[wdColorPaleBlue()] := "99CCFF";
	hash[wdColorPink()] := "FF00FF";
	hash[wdColorPlum()] := "993366";
	hash[wdColorRed()] := "FF0000";
	hash[wdColorRose()] := "FF99CC";
	hash[wdColorSeaGreen()] := "339966";
	hash[wdColorSkyBlue()] := "00CCFF";
	hash[wdColorTan()] := "FFCC99";
	hash[wdColorTeal()] := "008080";
	hash[wdColorTurquoise()] := "00FFFF";
	hash[wdColorViolet()] := "800080";
	hash[wdColorWhite()] := "FFFFFF";
	hash[wdColorYellow()] := "FFFF00";

	hash2 := hash;
	for k, v in hash do
		hash2[v] := k;
	hash2[nil] := TSDocxEnumerations.wdColorAutomatic();

	return hash2;

End;