[[oscarac]]

Empezado por Alejandro73

Estimado

el codigoventa.caption recibe string, si lo pasas como integer debes aplicar un IntToStr antes, ya que de lo contrario te indicara error en el tipo de dato.

Saludos

Código Delphi [-]
Query2.Close; 
Query2.SQL.Clear; 
Query2.SQL.Text:='SELECT (Max(Cod_Ventas) +1) as CV FROM Libreria_Venta'; 
Query2.Open; 
CodigoVenta.Caption := InttoStr(query2.FieldByName('CV').AsInteger) ;