Problema con consulta SQL sencilla

[sac]

Tengo un problema pero no veo cuál es...
en un sql agrego éste texto:

Query2.Close;
Query2.SQL.Clear;
Query2.SQL.Text:='SELECT Max(Cod_Ventas) +1 as CV FROM Libreria_Venta';
Query2.Open;
CodigoVenta.Caption := query2.FieldByName('CV').AsString ;

Sin embargo cuando corro el programa me dice que el "field cv" no lo reconoce...

...?