hola caro
ya lo revise y para probar el codigo que me facilitaste le puse la salida asi y nada no me muestra nada...
Código Delphi
[-]
procedure TForm5.Button1Click(Sender: TObject);
var
nuevonumero:string;
begin
Query1.Active := False;
Query1.SQL.Text := 'Select Max(num_veh) +1 AS num_veh from vehiculos.db';
Query1.Active :=True;
NuevoNumero := Query1.FieldByName('num_veh').AsString;
edit1.Text:=nuevonumero;
end;
gracias por tu paciencia
