🚀 go-pugleaf

Hello
I have created an application running with XP but now I must change the code 
because my application creates folders and subfolders with files IFor the 
user for the exemple it is me "Patrick"
I use this code :
/////////////////////////////////////////////////////////////////////////////////
LPITEMIDLIST List=NULL;
AnsiString Full,Fi,FN;

char Path[MAX_PATH+1]={0};
if(!SHGetSpecialFolderLocation(0,CSIDL_APPDATA,&List))
        {
        if(SHGetPathFromIDList(List,Path))
                {Fi=Path;
                FN=societe;
                Full=Fi+FN;
                strcpy(Path,Full.c_str());
                CreateDir(Full);
                }
        }
ChVista=Full
/////////////////////////////////////////////////////////////////
It is ok I have
Document and setting\Patrick\Application Data in ChVista
But when I launch my application it put the folders and subfolders in
Document and setting\Patrick\Application Data\Roaming
And my application dont find the folders.
I have look on halp for LPITEMIDLIST and SHGetSpecialFolderLocation and on 
the net I have past long time to find and try to understand but nothing, I 
don't arrive to do it correctly.
If somebody can help me or somebody have had the same problem to modify the 
code help me please
I don't understand why it add this subfolder Roaming because in ChVista it 
stop at application data or it is a wrong CSIDL?but I have look.
I don't understand how to do.
I thank you very very much for your help in advance
Patrick
PS:Excuse my English