[Mihon]

Доброго времени суток! У меня имеется база данных содержащая название музеи и кол-во посетителей. Я хочу найти где больше всего посетителей и вывести название этого музея в Edit. Делаю это так:

Код:

 max:=0;
 AdoDataset1.First;
 While AdoDataSet1.Eof<>true do begin
 If AdoDataSet1Posit.AsInteger>max then begin
 max:=AdoDataSet1Posit.AsIneger;
 Edit1.Text:=AdoDataSet1Nazv.AsString;
 AdoDataSet1.Next; end; end;

lmikle: Пользукмся тегами!!!

Но программа зависает на второй строке в таблице. А если убрать строчку
max:=AdoDataSet1Posit.AsIneger;, то программа просто просматривает все строчки и выводит название последнего музея, что довольно логично=) Помогите, плиз, понять в чем загвостка!