[Delphi] Baza danych i sereg problemów

Witam!

Postawiłem sobie za zadanie napisanie prostej bazy danych do mojego użytku, jednak napotkałem szrek komplikacji większość wynika z tego że programowałem jak potrafiłem a potrafię niewiele:) jest to moja pierwsza tego typu aplikacja wiec proszę o wyrozumiałość.

oto moja praca
http://www.gulkey.yoyo.pl/plik2.html

Program ma zapisywać klientów (do pliku tekstowego) oraz mieć opcje dodawania kolejnych wizyt, wydruku zawartości bazy, itd, w miarę osiągnąłem swój cel ale nie umiem sobie poradzić z kilkoma problemami

• jak zrobić aby wizyty z wpisana wcześniejsza datą zapisywały sie w pliku tekstowym pod wizytami z datą późniejszą?
• czy w polu edit (pesel) można włączyć podpowiedzi (wpisane wczesniej w to pole wyrazy) tak jak np podpowiedzi na www.google.pl
  -co zrobić aby utworzone pliki tekstowe miały rozszerzenie .txt a nie zapisywały sie bez rozszerzenia (jak próbuje to zrobić po swojemu to program nie chce później otwierać plików)
• czy folder baza mógłby tworzyć sie w folderze z programem?

Jeżeli widzicie jakieś rażące błędy to byłbym wdzięczny za ich poprawienie! Z góry dzięki!

To w końcu bazy danych, czy obsluga plików ?

Ad1. wyszukac przed dodaniem najbliższą pozniejszą datę i wstawić nową po niej - zwykłe operacje na plikach

Ad2. zamiast edit skozystaj z comobox masz tam rozwijana liste. jak dodajesz nowy pesel sprawdzasz czy juz jest na liscie jak go nie ma to dodajesz

Ad3. Memo1.Lines.LoadFromFile('C:\Program\Baza' + Edit7.Text) wczytujesz bez rozszeżenia
zmień na

Memo1.Lines.LoadFromFile('C:\Program\Baza\' + Edit7.Text + '.txt')
Memo1.Lines.SaveToFile('C:\Program\Baza\' + Edit7.Text + '.txt')

Ad4.

FileExists('C:\Program\Baza\' + Edit7.Text)

zamień na:

FileExists(AppDir+ Edit7.Text)

gdzie AppDir to zmienna String, przypisz do niej najlepiej w OnCreate Formy:

AppDir := ExtractFilePath(Application.ExeName) + 'Baza\';
ForceDirectories(AppDir); //na wypadek gdyby folder nie istniał