несовсем пойму смысл SHGetMalloc в этой функции.
Для чего она тут?
Заменить её можно через CoTaskMemAlloc и CoTaskMemFree.
Но хотелось бы разобраться зачем она тут вообще.
Да всё просто: ты раскопал говно мамонта времён Windows 95.
В Windows 95 была функция SHGetMalloc, которая возвращала менеджер памяти по умолчанию. Именно так и работает код: получает менеджер памяти, а потом вызывает уже его функции.
В Windows 2000 решили, что это дело можно упростить, и ввели функции-обёртки CoTaskMemAlloc и CoTaskMemFree, которые просто вызывают соответствующую функцию у менеджера памяти по умолчанию. Ну т.е. на псевдокоде:
1.
2.
3.
4.
5.
procedure CoTaskMemFree(APtr: Pointer);
begin
SHGetMalloc(Allocator);
Allocator.Free(APtr);
end;
Таким образом, начиная с Windows 2000 можно вызывать CoTaskMemAlloc и/или CoTaskMemFree и это будет эквивалентно SHGetMalloc + вызов методов полученного менеджера памяти. Разницы при этом не будет никакой.
