SQL-Befehl mit Edit-Text

[tylix]

Hallo zusammen,

ich habe folgendes Problem

Code:

  qry_tmp.SQL.Clear;
    qry_tmp.SQL.Add ('SELECT mer_pad_id  ');
    qry_tmp.SQL.Add ('from DBADMIN.MERKMALE MERKMAL');
    qry_tmp.SQL.Add ('where mer_merkmal in (''017'',''018'',''019'',''020'',''034'')');
    qry_tmp.SQL.Add ('and MER_merkMal = '+ (edit1.text));
    qry_tmp.Active := true;

Obiger Code funktioniert.

Nun muss ich aber das soweit umbiegen, dass diese Zeile

Code:

 qry_tmp.SQL.Add ('and MER_merkMal = '+ (edit1.text));

abgeändert wird und zwar,

and mer_dat < (edit1.text);

nur wenn ich das so einsetze zwar mit richtiger klammersetzung, schreibt er invalid End of SQL statement.
Ich habe gar keinen Plan, wie ich das jetzt noch umbiegen soll, damit er nur nach dem Datum kleiner als Edit1.Text sucht.

Könnt ihr mir helfen, wäre echt supi.

Danke, tylix