Forum: Datenbanken
Delphi
by Delbor,
9. Sep 2017
Hi TigerLilly
Vielen Dank für den Tip!
Zurzeit arbeite ich an einem Testprogramm - nur dass ich da auch schon andere Dinge ausgetestet habe, wie zum Bleistift das Erstellen einer Hilfe.
Ich habe zur Zeit folgendes Konstrukt:
try
Forum: Datenbanken
Delphi
by Delbor,
8. Sep 2017
Hi nahpeds
Das dient eigentlich nur der Demonstration dessen, was im SQLString stehen muss, wenn ich ihn mit den Ergebnissen der einzelnen Funktionen zusammensetze.
Ja eben - und dies auch noch ohne Leerzeichen dazwischen.
Selbst wenn ExecSQL mehr als ein Statement ausführen könnte - wie soll er die unterscheiden, wenn weder ein Leerzeichen oder sonst ein bestimmtes Steuerzeichen...
Forum: Datenbanken
Delphi
by Delbor,
8. Sep 2017
Hi zusammen
Der Abruch erfolgt gleich im erstem Statementt: (Hier das 2.)
function TDMLSQLite.Createkategorien_tabelle:String;
var SQLString: String;
begin
SQLString := 'CREATE TABLE "ContentMasterData"."kategorien_tabelle"('+
'"Kath_ID" INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL CHECK("Kath_ID">=0),'+
'"Kategorie" VARCHAR(120)...
Forum: Datenbanken
Delphi
by Delbor,
7. Sep 2017
Hi jobo
Das sind die ersten Zeilen des Scripts, so wie es von Workbench exportiert wurde:
Davon wurden alle ausser der PRAGMA-Zeile Opfer meines 'Sauberkeitsfimmels'.
Das Script selbst findest du im Anhang.
Forum: Datenbanken
Delphi
by Delbor,
7. Sep 2017
Hi TigerLilly
Das explizite leeren des Parameters vor der Zuweisung hat auch nichts gebracht.
Gruss
Delbor
Forum: Datenbanken
Delphi
by Delbor,
7. Sep 2017
Hi zusammen
Die letzte gezeigte Fehlermeldung hatte eine Besonderheit: Das, was ich hier gepostet habe, war eine Kopie aus dem Editor, und da endete die Meldung mit einem '.
Nachdem ich die Meldung mit Fortsetzen qittiert hatte, erschien sie in einem Meldungsfenster auf meiner Programmoberfläche - aber diesmal ohne das Hochkomma am Schluss...
Nun ja, ich hab dann doch mal TigerLillys...
Forum: Datenbanken
Delphi
by Delbor,
5. Sep 2017
Hi zusammen
In meinem Testprogrämmchen hab ich in den letzten Tagen endlich mal auch das getestet, wofür es gedacht war: SQLite und das erstellen einer einfachen Datenbank:
procedure TDMLSQLite.CreateAndConnectDB(Sender: TObject);
var SQLSring: String;
begin
try
DMLSQLite.FDSQLiteConnection.Connected := false;
DMLSQLite.FDSQLiteConnection.Params.Values:='F:\SQLiteDatabases\'+...