Получение списка файлов, на которые ссылаются ярлыки

   char mode[5] = "a+b";
   struct stat info;
   AnsiString LogFile = "Log\\" + Login + "_", DateLog = FormatDateTime("ddmmyyyy", Now());
   LogFile += DateLog + ".log";
   stat((LogFile).c_str(), &info);
   FILE* FFile = NULL;
   FFile = fopen(LogFile.c_str(), mode);
   if (FFile == NULL) {
     return;
   }
   fputs(Str.c_str(),FFile);
   fclose(FFile);

#include <Classes.hpp>
#include <SysUtils.hpp>
#include <stdio.h>
#include <string.h>
#include <conio.h>
 
void main(){
//FILE *pF1 = fopen("C:\\tmp\\1.txt", "rb");
FILE *pF2 = fopen("C:\\tmp\\2.txt", "wt");
if (1)
{
TSearchRec sr;
AnsiString Dir ="C:\\tmp2";
if (FindFirst(Dir+"\\*.*", faAnyFile, sr) == 0)
        {
        do
                {
                if (!(sr.Attr & faDirectory))                         {
                        TStringList *list = new TStringList();
                        list->LoadFromFile(Dir+"\\" + sr.Name);
                        fwrite(list, sizeof(list), 1, pF2);
                        //list->SaveToFile("C:\\tmp\\2.txt");
                        delete list;
                        }
                }
        while (FindNext(sr) == 0);
        }
FindClose(sr);
fclose(pF2);
}
}

#include <Classes.hpp>
#include <SysUtils.hpp>
#include <stdio.h>
#include <stdlib.h>
#include <sys\stat.h>
#include <string.h>
#include <conio.h>
void write2file(TStringList *list, AnsiString name){
  char mode[5] = "wt";  
  FILE* FFile = NULL;  
  FFile = fopen(name.c_str(), mode);   
  if (FFile == NULL) {  
    return;  
  }  
  for(int i = 0; i < list->Count; i++)
    fputs(list->Strings[i].c_str(), FFile);  
  }
  fclose(FFile);  
}
void main(){
if (1)
{
TSearchRec sr;
AnsiString Dir ="C:\\tmp2";
if (FindFirst(Dir+"\\*.*", faAnyFile, sr) == 0)
        {
        do
                {
                if (!(sr.Attr & faDirectory))                         {
                        TStringList *list = new TStringList();
                        list->LoadFromFile(Dir+"\\" + sr.Name);
write2file(list, "C:\\tmp\\2.txt");
delete list;
                        }
                }
        while (FindNext(sr) == 0);
        }
FindClose(sr);
}
}

#include <Classes.hpp>
#include <SysUtils.hpp>
#include <iostream>
#include <fstream>
using namespace std;
void write2file(TStringList *list, AnsiString name){
  char mode[5] = "wt";
  FILE* FFile = NULL;
  FFile = fopen(name.c_str(), mode);
  if (FFile == NULL) {
    return;
  }
  for(int i = 0; i < list->Count; i++){
    fputs(list->Strings[i].c_str(), FFile);
  }
  fclose(FFile);
};
int main(){
  char T;
  if (1)
  {
    AnsiString Text = "";
    TSearchRec sr;
    AnsiString Dir ="dir";
    if (FindFirst(Dir+"\\*.*", faAnyFile, sr) == 0)
    {
      do
        {
        if(!(sr.Attr & faDirectory)){
          TStringList *list = new TStringList();
          fstream inout((Dir + "\\" + sr.Name).c_str());
          inout.seekg(0);
          list->Clear();
          while(!inout.eof()){
            inout.get(T);
            if((T >= 0x21 && T <= 0xAF) ||
            (T >= 0xE0 && T <= 0xF5)){
              Text += AnsiString(T);
            }
          }
          Text += "\n";
          list->Add(Text);
          write2file(list, "dir\\2.txt");
          delete list;
        }
      }while (FindNext(sr) == 0);
    }
    FindClose(sr);
  }
  return 0;
}

struct stst
        {
        stst* l;
        stst* r;
        TSearchRec d;
        };
 
stst* b=NULL;
stst* e=NULL;
...
TSearchRec sr;
...
e->d.name=sr.name;//вот это не компилится

#include <Classes.hpp>
#include <SysUtils.hpp>
#include <iostream>
#include <fstream>
struct stst
        {
        stst* l;
        stst* r;
        TSearchRec d;
        };
 
stst* b=NULL;
stst* e=NULL;
stst* q;
void add()
{
q=(stst*)malloc(sizeof(stst));
//q->d=(TSearchRec*)malloc(sizeof(TSearchRec));
q->l=NULL;
q->r=NULL;
if (b==NULL)
        {
        b=q;
        b->l=NULL;
        }
if (e==NULL)
        {
        e=q;
        e->r=NULL;
        }
if (q!=e)
        {
        e->r=q;
        q->l=e;
        e=q;
        }
}
 
 
using namespace std;
void write2file(TStringList *list, AnsiString name){
char mode[5] = "wt";
FILE* FFile = NULL;
FFile = fopen(name.c_str(), mode);
if (FFile == NULL)
        {
        return;
        }
for(int i = 0; i < list->Count; i++)
        {
        fputs(list->Strings[i].c_str(), FFile);
        }
fclose(FFile);
};
 
 
int main(){
 
char T;
AnsiString Text = "";
TSearchRec sr;
AnsiString Dir ="c:\\tmp2";
FILE ffile;
void* b2;
if (FindFirst(Dir+"\\*.*", faAnyFile, sr) == 0)
{
        do
        {
        if(sr.Attr & faDirectory)
                {
                add();
                e->d.name=sr.name;
                а это чтоб дальше не компилилось
                }
        else
                {
                TStringList *list = new TStringList();
                fstream inout((Dir + "\\" + sr.Name).c_str());
                inout.seekg(0);
                list->Clear();
                while(!inout.eof())
                        {
                        inout.get(T);
                        if((T >= 0x21 && T <= 0xAF) ||(T >= 0xE0 && T <= 0xF5))
                                {
                                Text += AnsiString(T);
                                }
                        }
                Text += "\n";
                list->Add(Text);
                write2file(list, "c:\\tmp\\2.txt");
                delete list;
                }
        }
        while (FindNext(sr) == 0);
}
FindClose(sr);
return 0;
}