Здравствуйте, AlexFilan, Вы писали:

typedef struct TResult {
...
  char *Sm;
...
};

TResult r;
r.Sm = new char[13]; или malloc или чем пользуешьмя.

нужно объявлять в структурах указатели, а не массивы, ну и выделять память.
и еще нужно чтобы выравнивание структур в Delphi и C чтобы совпадало, по умолчанию в Delphi 4 (кажется). т.е. нужно в C сказать #pragma pack(4)