Query aus DBEdit-Fledern bauen...

[mkinzler]

Delphi-Quellcode:

procedure TVocabEingabe.Button1Click(Sender: TObject);
begin
    QRY_InsertVocab.SQL.Text := 'INSERT INTO TabVokabeln (Vok_Deutsch, Vok_Englisch, Datum) VALUES (:Vok_Deutsch, :Vok_Englisch, :Datum);'; //Wie gesagt könnte dies auch statisch gesetzt werden

    QRY_InsertVocab.Parameters.ParamByName('Vok_Deutsch').Value := Vok_Deutsch.Text;
    QRY_InsertVocab.Parameters.ParamByName('Vok_Englisch').Value := Vok_Englisch.Text;
    QRY_InsertVocab.Parameters.ParamByName('Datum').Value := Now; //Oder auch ein anderes Datum/Timestamp
    QRY_InsertVocab.ExecSQL;
end;