IMHO.WS - Delphi: Создание динамического с record, который содержит AnsiString

IMHO.WS (https://www.imho.ws/index.php)

- Программирование (https://www.imho.ws/forumdisplay.php?f=40)

Delphi: Создание динамического с record, который содержит AnsiString

Проблема в следующем.
Есть такая запись:

Код:

  TMyDBEvents = record

           Color: LongWord;

           ID: LongWord;

           Flags: LongWord;

           Title: AnsiString;

           Text: AnsiString;

           DateStart: TDateTime;

           DateType: LongWord;

           DateDays: LongWord;

           DateRemind: TDateTime;

  end;

  PMyDBEvents = ^TMyDBEvents;

  TMyDBase = class

  private

  ... ... ...

В результате вся проблемма в том что я не могу в динамический массив положить ни одной записи, т.к. длина AnsiString не фиксирована.
Как решить эту проблему, подскажите, срочно нужно.
Спасибо.

Можно просто динамически выделять в памяти обекты типа TMyDBEvents и класть указатели на них в TList.

Спасибо... :)

Не поверишь была такая мысль.... тут с коллегой утро общались и он предложил именно такой вариант... Но как то геморно...

Пока ждал ответ... переписал в функции выделения памяти следующую строчку:

Код:

GetMem(NP, Index * sizeof(TMyDBEvents));

на

Код:

NP := AllocMem(Index * sizeof(TMyDBEvents));

И все заработало... незнаю как и почему но он стал нормально ложить данные... и все пока пашет... бредок...

Щас буду тестить с реальным массивом данных... понаблюдаю...