Tendrá que ser mezcal
Ahora, yo te recomiendo que, en lugar de armar tus consultas de esa forma, utilices parámetros ya que así obtienes códigos mucho más legibles. Por ejemplo:
Código Delphi
[-]
IBQuery1.SQL.Text := 'select max(item_comp) as mayor from subprod where cod_prod = :codigo';
IBQuery1.ParamByName('codigo').AsString := DBLookupComboBox1.KeyValue;
IBQuery1.Open;
Quizá no sientas mucha diferencia, pero cuando tengas que armar consultas en las que debas sustituir varios valores más, te pondrás verde nada más de ver la concatenación final.
// Saludos