Ersten Wert in die DB schreiben und sofort abfragen, bevor andere geschrieben werden?

[Perlsau]

Naja, wenn man mit SQL arbeiten kann, sollte man eher so vorgehen:

Delphi-Quellcode:

MyQuery.SQL.Text := 'select * from Tabelle_Sprache where Sprache = ' + QuotedStr(Edit_Sprache.Text);
MyQuery.Open;
if MyQuery.RecordCount = 0 then
begin
  // Hier die Insert-Methode einfügen/aufrufen
end;

oder gleich mit Locate arbeiten: If Not MyQuery.Locate('Sprache',Edit_Sprache.Text,[] then ... Sonst hat man hinterher unzählige Einträge derselben Sprache in der Tabelle.

Leider hab ich keinen blassen Schimmer, wie der Zugriff über die SQLiteSimpleDelphi-Wrappers von Tim Anderson abläuft und kann daher nur spekulieren. Gibt es in diesem Wrapper die Möglichkeit, SQL einzusetzen?

[blawen]

Zitat von Perlsau:

Er möchte aber doch keine DB-Komponenten von Delphi verwenden ...

Woraus schliesst Du, dass es sich um Delphi-Komponenten handelt (Das Beispiel wurde u.a. um ein "z" gekürzt (zeos))?

Zitat von Perlsau:

Naja, wenn man mit SQL arbeiten kann, sollte man eher so vorgehen:

Delphi-Quellcode:

MyQuery.SQL.Text := 'select * from Tabelle_Sprache where Sprache = ' + QuotedStr(Edit_Sprache.Text);
MyQuery.Open;
if MyQuery.RecordCount = 0 then
begin
  // Hier die Insert-Methode einfügen/aufrufen
end;

In meinem Beispiel wurde nur der Insertteil aufgeführt. Die Frage von OrNEC bezieht sich ja lediglich auf das Feststellen der neuen Datensatznummer.

[Sir Rufo]

Nochmal an alle, die es in der Hitze der Diskussion nicht mitbekommen haben:

Der Zugriff auf SQLite erfolgt über SQLiteSimpleDelphi-Wrappers von Tim Anderson.
Da ist nix mit TDataSet, TDataSource, TDBEdit, TDBComboBox, TDB...