Implemented StrRChrA.

dlls/shell32/shellord.c

diff --git a/dlls/shell32/shellord.c b/dlls/shell32/shellord.c
index bb46174..451ec00 100644
--- a/dlls/shell32/shellord.c
+++ b/dlls/shell32/shellord.c
@@ -1228,6 +1228,28 @@
 	return 1;
 }
 /*************************************************************************
+ * StrRChrA					[SHELL32.346]
+ *
+ */
+LPSTR WINAPI StrRChrA(LPCSTR lpStart, LPCSTR lpEnd, DWORD wMatch)
+{
+    	if (!lpStart)
+	    return NULL;
+
+	/* if the end not given, search*/
+	if (!lpEnd)
+	{ lpEnd=lpStart;
+	  while (*lpEnd) 
+	    lpEnd++;
+	}
+
+	for (--lpEnd;lpStart <= lpEnd; lpEnd--)
+	    if (*lpEnd==(char)wMatch)
+		return (LPSTR)lpEnd;
+
+	return NULL;
+}
+/*************************************************************************
  * StrRChrW					[SHELL32.320]
  *
  */

dlls/shell32/shlwapi.spec

diff --git a/dlls/shell32/shlwapi.spec b/dlls/shell32/shlwapi.spec
index 2e07eff..f149fdb 100644
--- a/dlls/shell32/shlwapi.spec
+++ b/dlls/shell32/shlwapi.spec
@@ -346,7 +346,7 @@
 343	stub	StrNCatW
 344	stub	StrPBrkA
 345	stub	StrPBrkW
-346	stub	StrRChrA
+346	stdcall	StrRChrA (str str long) StrRChrA
 347	stub	StrRChrIA
 348	stub	StrRChrIW
 349	stdcall	StrRChrW (wstr wstr long) StrRChrW