Fórum IF e ELSE Banco de dados DBexpress delphi 7 #522094

Boa tarde!

Sou novo em programação e gostaria da ajuda dos colegas do forum no codigo abaixo
estou fazendo uma consulta no banco de dados e se este codigo que foi digitado pelo usario for achada no banco vou iserir no dbgrid se nao informo no lbInfoCaixa.Caption := 'Produto não encontrado - tente novamente!';

procedure TFrmPDV.VerificaProduto(Codigo: String);

begin
if Codigo = '10000' then
InserirProduto(1, 'Produto sem cadastro', StrToFloat(InputBox('Produto sem cadastro', 'Digite o valor', '')))
else
begin
F_Dados.sqlProdutos.Active := False;
F_Dados.sqlProdutos.SQL.Clear;
F_Dados.sqlProdutos.SQL.Add('SELECT * FROM PRODUTOS WHERE CODIGO_PRODUTO = ' + edtCodigo.Text);
F_Dados.sqlProdutos.Active := True;

if F_dados.sqlProdutos. ( o que devo progrmar aqui?????)
InserirProduto(F_dados.sqlProdutosID_PRODUTO.AsInteger,F_dados.sqlProdutosNOME_PRODUTO.AsString, F_Dados.sqlProdutosPRECO_PRODUTO.Value)
else
lbInfoCaixa.Caption := 'Produto não encontrado - tente novamente!';

end;
end;

Atenciosamente,
Flaviano Silva