MySQL Query eine Spalte Leer bzw. Null, Abfrage ?

[Sir Rufo]

Delphi-Quellcode:

SQLSUCH := 
  'SET @SUCH_STATUS = :SUCH_STATUS;'#13#10 +
  'SELECT * from tbl_kunde WHERE ( @SUCH_STATUS IS NULL AND KD_STATUS IS NULL OR KD_STATUS = @SUCH_STATUS );';
dataM.ZQueryKUNDE.SQL.Text := SQLSUCH;
dataM.ZQueryKUNDE.ParamByName('KD_STATUS').Clear;

// Das geht jetzt auch
// dataM.ZQueryKUNDE.ParamByName('KD_STATUS').Value := 'ROT';

dataM.ZQueryKUNDE.Active := true;