[lmikle]

Да пожалуйста, одно другому не мешает. Используй введенное в ComboBox как имя файла.

[Maks19]

Код:

 IncludeTrailingPathDelimiterIncludeTrailingPathDelimiter

Это опечатка я так понимаю?
А как передать через комбобокс?

Код:

ComboBox1.Items.

А дальше ?

[lmikle]

Видимо, задублировалось.
Читать из ComboBox1.Text. А вот потом надо сделать проверку и добавить в Items, если там такого имени нет.

[Maks19]

Подскажите код в сообщении от 05.07.что делает?
Что за файлы надо читать в список?

[lmikle]

Код находит все файлы в подпапке Data программы по маске *.dat и пытается загрузить их как модель. Если получается, то добавляет ее в список.

[Maks19]

А в папку data файлы как попадут? Папку data надо создать в папке с проектом?

[lmikle]

Да, надо создать. Ну или создавать ее при сохранении данных.
Например, сделать кнопку сохранения и/или при закрытии программы принудительно сохранять. Поможет ForceDirectories:

Код:

ForceDirectories(IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName))+'Data');