Datenerfassung mit Firebird Datenbank

[Satty67]

Man möge micht korrigieren, wenn es falsch ist

Delphi-Quellcode:

// Entweder den String mit Variablen aufbauen
// QuotedStr halt die entsprechende Variable übergeben
Memo1.Text := 'INSERT INTO MB256PLUS ("LfdNr", "Datum", "Uhrzeit", "Ereignis", "Teilnehmer", "Bereich")
              VALUES('+
              QuotedStr('1234')+','+
              QuotedStr('12.12.2009')+','+
              QuotedStr('12:13:43')+','+
              QuotedStr('Extern Scharf')+','+
              QuotedStr('Schalteinrichtung')+','+
              QuotedStr('Verwaltung')+
              ')';

// oder gleich SQL.Text zuweisen.
// ExecSQL hinterher nicht vergessen 

// oder Field Eigenschaften von Query verwenden
Query.Insert;
Query.FieldByName('LfdNr').AsString := '1234';
Query.FieldByName('Datum').AsDate := StrToDate('12.12.2009');
[...]
Query.Post;