[Resolvido] Como calcular o primeiro código?

olá

Pessoal achei este código para calcular o próximo código aqui no fórum, mas se eu não possuir nenhum registro no banco ocorre o segintye erro

"Could not convert variant of tipe (null) into type (String)"

pelo que entedi o valor que resulta do banco não posso usar para fazer esta operação,

Como faço para que se o valor for nulo isto é, não possua nehum valor ele preencha meu BDEit com o valor '1'.

Obrigado

Meu código é

Query2.Active := False; Query2.Sql.Clear; Query2.Sql.Add('Select Max(id) as Ultimo'); Query2.Sql.Add('From horariotarde'); Query2.Active := True; DBEdit6.text := Query2.Fields[0].Value + 1;