Hola juangabriel1786, hay varias maneras de hacerlo una de ellas es como propones, llegado ese punto puedes preguntar si devolvio algún valor a sea si el query no está vacío, esto sería:
Código Delphi
[-]
Query1.open;
Query1.close;
Query1.ParamByName('buscar').AsInteger:=Strtoint(Edit1.Text);
Query1.open;
if not query1.IsEmpty then ShowMessage('El código ya existe');
Saludos