Paradox DB mit SQL über BDE ansteuern

[marabu]

Hallo Henrik,

verwende eine TDatabase-Komponente, um den Datenpfad festzulegen. Mit einem Doppelklick auf die Komponente öffnest du den property editor. Vergib einen Namen für die Datenbank und setze den Treiber auf STANDARD. Wenn du dann die Vorgaben abrufst, erhältst du einen leeren PATH-Eintrag. Den kannst du manipulieren, wie es dir gefällt - vorzugsweise zur Laufzeit beim Erzeugen deines Datenmoduls. Durch den Eintrag DEFAULT DRIVER = PARADOX kannst du auf die Erweiterung .db bei deinen Tabellen-Namen verzichten und es werden trotzdem nicht alle bekannten Erweiterungen gesucht.

Dein INSERT-Statement birgt die Gefahr, dass eine runtime exception geworfen wird, wenn in einer der Variablen (z.B. dbbemerkung) ein Apostroph vorkommt. Mach es besser so:

Delphi-Quellcode:

const
  ins = 'INSERT INTO %s VALUES(:datum, :uhrzeit, :bz, :be, :bolus, :bemerkung)';
var
  tn: String;
begin
  tn := 'tblname';  // hier dein Tabellen-Name
  with query1 do
  begin
    SQL.Text := Format(ins, [tableName]);
    Params.ParamValues['bemerkung'] := dbbemerkung;
    Params.ParamByName('datum').AsDateTime := dbdatum;
    // ...
    ExecSQL;
  end;

Grüße vom marabu