Código Delphi [-] Label1.Caption := IntToStr(Query.RectNo); //o Label1.Caption := IntToStr(TStringGrid(DBGrid).Row);
Label1.Caption := IntToStr(Query.RectNo); //o Label1.Caption := IntToStr(TStringGrid(DBGrid).Row);