Query mit Parametern vorbereiten

[barnti]

Hi r_kerber,

Doch das ist schon so gemeint. Ich möchte alle variablen Werte in Parametern abbilden.

Zitat:

Hast Du schon mal überprüft, was in Edit.Text drin steht? Wenn das leer ist, dann ist die Fehlermeldung völlig klar!

Statement: siehe oben.

Noch einmal zum Verständnis:

Ich möchte die aktuelle Tabelle mit dem aktuellen Wert noch eimal in der DB abrufen:

Tablename: Kunde

Delphi-Quellcode:

    Query.Close;
    Query.Prepared := True;

    Query.SQL.Add('SELECT *');
    Query.SQL.Add('FROM Table');

    Query.SQL.Add('and :KeyName=:KeyValue');
    Query.SQL.Add('FOR UPDATE');
    Query.SQL.Text;

                                                    // Hier steht mein Feldname: 'Kunde_ID'
    Query.Params.ParamByName('KeyName').AsString:=  Grid.DataSource.DataSet.Fields[0].FieldName;
                                                    // Hier steht mein Wert des Feldes 'Kunde_ID'  
    Query.Params.ParamByName('KeyValue').AsString:= Grid.DataSource.DataSet.Fields[0].AsString;
                                                    // Hier steht der Tabellenname 'Table'  
    Query.Params.ParamByName('Table').AsString:=    Grid.DataSource.Name