Fórum data como parametros em sql... #283976

Estou fazendo a seguinte sintaxe sql.

Banco de dados Sql Server 7

Update Cliente
Set CodCliente =:Clie
Where DataVencimento =:DataVencto

ParamByname(´Clie´).AsString := EdCliente.Text;
ParamByName(´DataVencto´).AsDateTime := StrToDate(EdDataVencto.Text);

Nesse caso com os parâmetros declarados previamente, gostaria de saber como criar uma situação para qdo o EdDataVencto for branco passar o parâmetro ´DataVencto´.

Tentei assim:

if EdDataVencto.Text <>´´ then
ParamByName(´DataVencto´).AsDateTime := StrToDate(EdDataVencto.Text)
else
ParamByName(´DataVencto´).AsDateTime := null;