TreeView, Record, FileStream

[JoLan]

Доброе утро.

Есть TreeView с некой структурой, которое в последующем экспортируется в StringList:

Узел1-Ветка1
Узел1-Ветка2-Элемент1
...

Есть структура в виде записи:

Type
...
Struct = record
  Path,Question,Var1,Var2,Var3,Var4:ShortString;
  Correct:Byte;
end;

в Path записываются строки, экспортированные из TreeView, но только те, которые имеют все 3 уровня (Узел1-Ветка2-Элемент1).

Вопрос: как сделать запись в файл и список путей, и записи? Или может я изначально реализовываю геморройным путём?

[Stilet]

Не то чтобы неверным путем... Если нужно то можно

var i,p:TTreeNode;s:string;
begin
 i:=TreeView1.TopItem;
 while i<>nil do begin
  if i.Level=2 then begin
   s:='';//i.Text;
   p:=i; while p<>nil do begin s:=p.Text+'-'+s; p:=p.Parent; end;
   ListBox1.Items.Add(s);
  end;
  i:=i.getNext;
 end;
end;

[JoLan]

Сообщение от Stilet

Не то чтобы неверным путем... Если нужно то можно

var i,p:TTreeNode;s:string;
begin
 i:=TreeView1.TopItem;
 while i<>nil do begin
  if i.Level=2 then begin
   s:='';//i.Text;
   p:=i; while p<>nil do begin s:=p.Text+'-'+s; p:=p.Parent; end;
   ListBox1.Items.Add(s);
  end;
  i:=i.getNext;
 end;
end;

Спасибо огромное за экспорт списка, но он уже реализован (правда кода в 4 раза больше). Когда я спрашивал, то имел ввиду: как можно записать в файл список, который уже хранится в StringList + массив записей?

[Stilet]

как можно записать в файл список, который уже хранится в StringList + массив записей?

Ну дык в цикле подобавляй в StringList этот массив, а потом SaveToFile

[JoLan]

Можно, конечно, сохранить весь список в текстовый файл, а массив записей потоком в другой, но хотелось бы в один файл. Это возможно?

[Stilet]

Это возможно?

Да. Допиши просто каждую запись в одну строку через некий разделитель.

StringList.Add(Path+','+Question+','...)

А потом сохраняй это. Но если ты пишешь тесты, то лучше используй INI файлы, не забыв зашифровать тест, или вообще базу данных.

[JoLan]

Вы, видимо, не так поняли. Мне нужно сохранить список путей и структуру, которую я описал ранее.

А по поводу Ini-файлов: вообще раньше я думал создать рядом с программой папку, в которой была бы такая структура:

/struct
/struct/Subject1
/struct/Subject1/Theme1
/struct/Subject1/Theme1/Var1.ini

Но, по-моему, экспорт потоком в файл будет более безопасней в плане посмотреть какой вопрос-ответ.

[SNUPY]

^__^ помниться можно делать так f: file of Struct.... но он будет ругаться т.к. ему подавай статические массивы, т.е. для string надо будет зафиксировать размер...

[JoLan]

ув. товарищ SNUPY, если пришли говорить не по теме - лучше не говорите. Поставлен конкретный вопрос: как записать StringList и Array of Record в 1 файл. Либо, если этот вопрос глуп с точки зрения реализации, предложите лучшее решение.

[Stilet]

Вы, видимо, не так поняли.

Да уж... Трудно понять того кто сам не оч. понимает что хочет...
А SNUPY между прочим дело говорит. Структуры в текстовые файлы сохранять не удобно. Так что ты определись что тебе нужно.
Если посчитаешь это флудом то вот тебе конструктив: Сохраняй то что в StringList в текстовый файл, а то что в Array of Record в другой методом SNUPY, не забыв образмерить или финализировать строки в записи. не смешивай все в кучу - пожалеешь

Удачи.