Implemented DuplicateIcon().

dlls/shell32/shell32.spec

@@ -335,7 +335,7 @@ import kernel32.dll
 @ stdcall DoEnvironmentSubstA(str str)DoEnvironmentSubstA
 @ stdcall DoEnvironmentSubstW(wstr wstr)DoEnvironmentSubstW
 @ stub DragQueryFileAorW
-@ stub DuplicateIcon
+@ stdcall DuplicateIcon(long long) DuplicateIcon
 @ stdcall ExtractAssociatedIconA(long ptr long)ExtractAssociatedIconA 
 @ stub ExtractAssociatedIconExA 
 @ stub ExtractAssociatedIconExW 

dlls/shell32/shell32_main.c

@@ -298,6 +298,29 @@ DWORD WINAPI SHGetFileInfoAW(
 }
 
 /*************************************************************************
+ * DuplicateIcon			[SHELL32.188]
+ */
+HICON WINAPI DuplicateIcon( HINSTANCE hInstance, HICON hIcon)
+{
+    ICONINFO IconInfo;
+    HICON hDupIcon = NULL;
+
+    TRACE("(%04x, %04x)\n", hInstance, hIcon);
+
+    if(GetIconInfo(hIcon, &IconInfo))
+    {
+        hDupIcon = CreateIconIndirect(&IconInfo);
+
+        /* clean up hbmMask and hbmColor */
+        DeleteObject(IconInfo.hbmMask);        
+        DeleteObject(IconInfo.hbmColor);        
+    }
+ 
+    return hDupIcon;
+}
+    
+
+/*************************************************************************
  * ExtractIconA				[SHELL32.133]
  *
  * fixme