Quelltext Insert

Einleitung
Der Artikel  Firebird SQL Insert mit Freepascal ist Teil einer Artikelserie. Die mit Links versehenen Wörter sind Verweise auf vorige Artikel in denen diese Programm Prozeduren erstellt wurden.

Für ein Insert mit Benutzeroberfläche benötigst du nur drei Funktionen. In deiner Datenbank Unit erstellst du die erste Prozedur die, die Daten in die Datenbank einfügt. Für das Neu anlegen von Daten benötigst du einen Button mit der Prozedur „Neu Eintragen“ und einen Speichern Button. Der Neu Eintragen Button leert alle Editfelder und setzt die im letzten Artikel beschriebene Hilfsvariable isInsertOrUpdate auf „0“. Dies bedeutet das du beim Drücken auf speichern ein Insert durchführen willst. Nachfolgend die Insert Funktion.

(mehr …)

Einleitung – FirefirdSQL DB Select Abfrage

TListView Beispiel Software

Für eine FirefirdSQL DB Select Abfrage mit einer Benutzeroberfläche, benötigst du einige Hilfsprozeduren. Du benötigst eine Prozedur um Daten zur Komponente TListView hinzuzufügen. Die Daten müssen beim starten des Programms geladen werden. Hierfür wirst du eine Prozedur erstellen die durch ein Ereignis des Form1 angelegt wird. Für den späteren Verlauf setzt du eine globale Hilfsvariable. Diese wird später für den Speichern Button benötigt. Denn legst du neue Daten an, benötigst du eine Insert Prozedur. Für das speichern bereits vorhandener Inhalte eine Update Prozedur. Die Variable wird später gesetzt, wenn der User das Programm aufruft und auf den Button Neu anlegen klickt. Eine weitere Prozedur für die Datenabfrage benötigst du, wenn der User die ListView anklickt und einen neuen oder noch nicht ausgewählten Eintrag auswählt. Die Daten müssen in diesem Fall neu in die Editfelder geladen werden. Zum Schluss hast du dann noch die eigentliche Prozedur, die die Daten aus der Datenbank abfragt. Diese wird durch die einzelnen Ereignis Prozeduren mehrfach aufgerufen und wird daher, in eine eigene Prozedur geschrieben. Ich werde mit der Prozedur AddToListView beginnen und danach die SelectAbfrage in einer eigenen Prozedur erstellen. Alle andren Prozeduren kommen dann später hinzu, da diese von diesen beiden Prozeduren abhängig sind.

(mehr …)

TListView Beispiel Software

TListView Allgemeines

Die TListView Komponente findest du unter Common Controls und es ist die vierte Komponente von Links. Wenn du die Komponente in das Form1 ziehst wird diese mit dem Namen ListView1 angelegt. Wir erstellen in diesem Artikel ein kleines Beispiel Programm. Lade dir das kleine Beispiel Programm herunter [Download Link]. Damit kannst du die Erklärungen besser nachvollziehen.

(mehr …)