vor

Beispiele für Routinen

weiter

Datenbank 2

Als Grundlage für viele verschiedene Anwendungen soll eine Datenbank erstellt werden. Alle Informationen sollen in einer Textdatei gespeichert werden. Die ersten drei Zeilen sind für Titel, Bemerkungen und Primärschlüssel vorbehalten. Dann sollen jeweils die Inhalte der 20 Zellen eines Datensatzes in 20 Zeilen der Textdatei folgen. So sind durch die Zeilennummer eindeutig die Datensatznummer und das Feld bestimmt.

Der Inhalt der Datei soll in einer ListBox zwischengespeichert werden und dann in ein zweidimensionales Array einsortiert werden. Zum Speichern wird das Array wieder zu den Zeilen der ListBox umgewandelt und in der Datei gesichert. (Diese Methode erscheint mir einfacher zu programmieren als die etwas professionellere Methode, bei der jeder Datensatz in einer Zeile steht und die Felder durch Trennzeichen abgegrenzt sind. So kann man z. B. die Datei im *.csv-Format mit anderen Systemen austauschen, aber man muss zusätzlich noch eine Routine programmieren, die nach den Trennzeichen sucht und die einzelnen Felder aus der gesamten Zeile heraus löst.)

Man soll Änderungen speichern können, neue Datensätze hinzufügen und ausgewählte Datensätze löschen können.

Über besondere Schalter soll man durch die Datenbank blättern können.

Der Primärschlüssel (die Personalnummer) soll automatisch vergeben werden und unwiederholbar sein.

Die Datenbank soll offen sein für Ergänzungen und Anpassungen.
einfache Datenbank
Komponente Eigenschaft Wert Bemerkungen
Form1 Caption ‘Datenbank’ Überschrift in der Kopfleiste des Programmfensters
ListBox1 visible false temporäre Darstellung des Dateiinhalts
Label1 - Label20 Caption Feldname alle 20 Feldnamen
Edit1 - Edit20 Text ' ' Felder für die Informationen, anfangs leer
Label21 Caption ' ' Platz für die Bezeichnung der Datenbank
Label22 Caption ' ' Platz für Bemerkungen zur Datenbank
Button1 Caption ‘neu’ Schalter für neuen Datensatz
SpeedButton1 Caption ‘|<’ Schalter für ersten Datensatz
SpeedButton2 Caption ‘<’ Schalter für vorherigen Datensatz
Edit21 Text 0 Feld für die Datensatz-Nummer, anfangs 0
SpeedButton3 Caption ‘>’ Schalter für nächsten Datensatz
SpeedButton4 Caption ‘>|’ Schalter für letzten Datensatz
Button2 Caption ‘speichern’ speichern des aktuellen Datensatzes
Button3 Caption ‘löschen’ Löschen des aktuellen Datensatzes und aufrücken der folgenden
BitBtn1 Caption ‘&Ende’ Beenden des Projekts
Lösung
vor

Inhaltsverzeichnis

weiter