🚀 go-pugleaf

Probably because you didn't include the shlobj.h header file
Also modify GetPaths() as shown below

Get rid of CoTaskMemFree function since you did not allocate with neither
CoTaskMemAlloc nor CoTaskMemRealloc functions.


#define NO_WIN32_LEAN_AND_MEAN
#include <shlobj.h>
#include <vcl.h>

#pragma hdrstop

#include "SHGetSpecialFolderLocation.h"
//--------------------------------------------------------------------------
-
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//--------------------------------------------------------------------------
-
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//--------------------------------------------------------------------------
-

AnsiString GetPaths(int Folder)
{
     LPITEMIDLIST List = NULL;

     char Path[MAX_PATH + 1] = {0};

     if (!SHGetSpecialFolderLocation(0, Folder, &List))
        if (SHGetPathFromIDList(List, Path))
           return String(Path);

     return "";  // return an empty AnsiString in case of error
}
...

Rodolfo


"Safari" <Safari@alloymail.com> wrote in message
news:3F425543.9040507@alloymail.com...
> Hello,
> Error! Why?
> I use "ShlOBJ.hpp" & "ShellApi.hpp" but return me error!
> Error: E2451 Undefined symbol 'LPITEMIDLIST'
>
> AnsiString __fastcall GetPaths(int Folder)
> {
>      LPITEMIDLIST List = NULL;
>      char Path[MAX_PATH + 1] = {0};
>      if (SHGetSpecialFolderLocation(0, Folder, &List) == NOERROR)
>      {
>         if (SHGetPathFromIDList(List, Path))
>         return Path;
>         CoTaskMemFree(List);
>      }
> }
>
> Thanks,
> Safari
>