Código Delphi [-] var Nivel: integer; ... .... Query.Open; Nivel := Query.FieldByname('Nivel').AsInteger;
var Nivel: integer; ... .... Query.Open; Nivel := Query.FieldByname('Nivel').AsInteger;