• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

как мне записать переменную типа TList в файл

  • Автор темы Автор темы Guest
  • Дата начала Дата начала
Статус
Закрыто для дальнейших ответов.
G

Guest

Есть функция WriteComponentResFile, которая записывает переменную типа TComponent (или наследника) в файл. А как мне записать переменную типа TList в файл?
 
Искренне сочувствую, но класс TList не унаследован не от TPersistent ни от
TStream, поэтому, без написания кода вам не обойтись. Наиболее разумный спо
соб
я вижу в создании класса TStreamList, работая в СИ я бы обошелся следующей
конструкцией
class TStreamList : public TList, TStreamList
{
...
public:
...
bool SaveToStream(TStream& stream);
bool ReadFromStream(TStream& stream, int& nCount);
...
};
и реализовал бы эти два метода.

но Object Pascal не позволяет делать множественного наследования, поэтому
вы можете действовать, следующим способом
TStreamList = class(TStream)
private
FList : TList;
public
...
bool SaveToStream(TStream stream);
bool ReadFromStream(TStream AStream; Var int ACount);
...
end;
реализуете нужную функциональнось.
Способов много, и вам выбирать!!!
 
Начнем с того что выясним что за TList ? Список ли строк ? Объектов ? Чего ? Разные ответы дадут разные результаты.

Если список строк как мне кажется :)) почему то....то TStringList и все дела...там все уже есть.

Если что то свое - то вышеприведенный способ с добавками TReader/TWriter - советую изучить.

И вообще к чему использовать TList - киньте в меня камень но не пойму. Есть TCollection в котором
все сделано элегантнее на порядок и ошибки сделать сложнее.
 
А посмотри еще здесь
 
У меня фак и прога для просмотра слита, если кому, что вышлю...
 
Чего тут такого сложного! Если TList символов, строк и дт. тп. тогда пиши так!
var List:Tlist;
begin
******************
List.Items.SaveToFile('*.*');
******************
end;
Вот и все!
:)
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab