get icon fra .url

jeg bruger denne til at finde url fra en .url fil :

function URLFromShortcut(const dotURL: string): string;
begin
  with TIniFile.Create(dotURL) do
  try
    try
      Result := ReadString('InternetShortcut', 'URL', '') ;
    except;
      Result := '';
    end;
  finally
    Free;
  end;
end;

Hvordan får jeg fat i iconet fra den pågældende .URL fil ??

(Den skal vises i et Image, og derefter gemmes som en .ICO fil)