Código Delphi [-] var numv:integer; begin tabla.insert; numv:=mayornumero de la tabla+1; tabla.post; end;
var numv:integer; begin tabla.insert; numv:=mayornumero de la tabla+1; tabla.post; end;