Добрый день, у меня есть форма на которой расположены поля в которые должна выводиться информация о выбранном человеке в списке TListBox1, так же есть тип record в котором у меня поля: name, phone и т.д.
Во первых хочу спросить как добавить нового человека в базу, а во вторых как сохранить базу при выходе из программы и сделать загрузку базы при старте программы.

Просто кинь на форму кнопку и по нажатии на нее пиши в файл последнюю запись, при страте проги в процедуре onCreate или еще хде считывай все записи из файла и тд...
Если хошь пиши я те исходником помогу так проше будет намного))

Майк, что же вы так поиском не пользуетесь http://forum.vingrad.ru/index.php?showtopic=56260&hl=name не хорошо забывать свои собственные темы

Вообще не очень понятно что за база имеется ввиду
стандартно - изучай TTable и что с ней связано
если хочешь самописно через файлы посмотри
http://forum.vingrad.ru/index.php?showtopic=57496

Почему бы не использовать BDE или SQL ? Там проще чем с файлами, и скорость больше. А для работы с файлами пиши свои процедуры записи и чтения.

Цитата(SoWa @ 4.7.2005, 17:59)

Почему бы не использовать BDE или SQL ? Там проще чем с файлами, и скорость больше. А для работы с файлами пиши свои процедуры записи и чтения.

Нужно время на изучение... если особо скорость не нужна, то проще и с обычным файлом...

Цитата(Pakshin @ 4.7.2005, 17:01)

Нужно время на изучение... если особо скорость не нужна, то проще и с обычным файлом...

Оно конечно проще и быстрее, если ... задачи особо нет
А если начинать реализовывать индексы, связи и тд - ой, в конце концов пожалеешь что поленился BDE почитать, а уж если до сетевых вариантов дойдешь - вообще застрелишься. Вот только если задача реальная - все равно через небольшое время придешь к проблеме усложения БД и <читай предложение выше>

Цитата(Pakshin @ 4.7.2005, 20:01)

Нужно время на изучение... если особо скорость не нужна, то проще и с обычным файлом...

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

Цитата(Pegas @ 5.7.2005, 01:17)

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

но ведь реально это делать ;) Старые диваны только так и можно чинить.




Майк, сделай для каждого человека свой файл и при выборе его в ListBox'e загружай. Проще через Memo1.Lines.LoadFromFiles('C:\file.doc'); а потом разбирай строки по нужным записям.
Еще вешай код сохранения текущих полей в какой нибудь отдельный файл, и потом при старте предлагай загрузить его или нет (т.е. как в Word'e когда он предлагает восстановить не сохраненный документ).

Майк
Создай обычный текстовый файл... например, вот такой:

Код

@Eugeni +79147010000 Arsenyev @Coder forum.vingrad.ru

т.е. по строкам: имя, телефон, адрес
@ - идентификатор имени!

далее кодишь (смотри на события)

Код

procedure TForm1.FormCreate(Sender: TObject); var   i : integer; begin   list:=TStringList.Create; // по листу поиски идут быстрее чем по файлу   list.LoadFromFile('C:\base.dat'); // загружаем БД   for i:=0 to list.Count-1 do      begin        bf:=list.Strings[i];        try  // защита от пустых полей          if bf[1]='@' then            listbox1.AddItem(copy(bf,2,length(bf)),nil);  // отсекаем @        except end;      end; end; procedure TForm1.ListBox1Click(Sender: TObject); var   i : integer; begin    Dname:=ListBox1.Items.Strings[ListBox1.ItemIndex];    Dname:='@'+Dname;    //  list.Find();    for i:=0 to list.Count-1 do      if list.Strings[i]=Dname then        begin          edit1.Text:=copy(Dname,2,length(Dname)); // отсекаем '@'          edit2.Text:=list.Strings[i+1]; // телефон          edit3.Text:=list.Strings[i+2]; // адрес        end; end; procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin // сохраняем   list.SaveToFile('C:\base.dat'); end;

переменные:

Код

var   Dname, bf : string;   list : TStringList;

такой метод очень даже не плох еси не знаешь других баз и если база у тебя небольшая.

2 Майк
Да собственно, простототы необыкновенной эта проблема. Просто нужно реализовать процедуры/функции: загрузка, сохранение, удаление записей из файла. Затем для простоты создать типизированый файл на основе любой структуры:

Код

type   rec = record     Name: array[1..20] of char; // если на основе String, то Name: ShortString;     Phone: array[1..10] of char; end; { ... } var   f: file of rec; { ... }

А потом просто реализовать вышеописаные методы и всё Но как их реализовывать не буду говорить, т.к. считаю, что если не умеешь с файлами работать, то надо что то почитать, например FAQ.
Добавлено @ 07:32
Стандартная задача при изучении языка. Встречалась, наверное любому стденту кто изучал программирование