Сборник статей на Дельфи

← →
Bizz (2004-02-05 09:43) [0]

у меня вопрос тут возник: Я хочу сделать на дельфи эдакий сборник статей. Они должны храниться в одном файле.
Программа загружаетя->Пользователь выбирает пункт из списка статей и стаья появляется в memo.
Как мне лучше это сделать ?
Напишите подробнее плиз...

Я сегодня сделал кое-какие наработки, но если я буду продолжать в том же духе, я скоро сам запутаюсь 8) Уверен, что это можно сделать проще...

-----------------------------------
procedure TForm1.FormCreate(Sender: TObject);

var
F: TextFile;
s: TStringList;
a, title: string;
ps, ps2: integer;

begin

s:=TStringList.Create;

assignfile (F, "Data.dat");
Reset (F);
while not EOF (F) do
begin
readln(f, a);
ps := pos ("!#.<begin>", a);
ps2 := pos ("!#.<end>", a);
if ps <> 0 then
begin
title := copy (a, 11 , length (a)-10);
listbox1.items.add (title);
while ps2<>0 do
begin
readln (F,a);
s.Add (a);
end;
end;
end;
end;
-----------------------------------

← →
serge (2004-02-05 09:46) [1]

Используй лучше какую нить утилитку для хелп файлов - и сделай chm хелп - это проще наверно.

← →
Stas (2004-02-05 09:54) [2]

Сделай на БД.

← →
Gero (2004-02-05 10:49) [3]

Имхо лучше всего будет chm

← →
TUser (2004-02-05 11:25) [4]

Лучше БД - это все-таки нормальный способ хранения инфы. Посмотри как реализован FAQMaker у А.Подгорецкого.

Сборник статей на Дельфи Найти похожие ветки