|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
в чем ошибка в коде
Подскажите пожалйста в чем ошибка
массиву присваивается результат Запроса adoquery верхняя граница массива взята просто так, элементы не превышают его. код такой, это часть, именно с присвоением массиву полученных данных одного столбца ошибка Код:
procedure TForm8.BitBtn2Click(Sender: TObject); var mass: array[1..30] of integer; i, n, a: integer; c: real; s: string; begin ADOQuery2.Active:=False; ADOQuery2.Parameters.ParamByName('a').Value:=edit1.text; ADOQuery2.Parameters.ParamByName('b').Value:=edit2.text ADOQuery2.Active:=True; ADOQuery2.First; while not ADOQuery2.Eof do begin mass[i]:=ADOQuery2.FieldValues['Dx'].asinteger; почему то здесь fieldbyName не показывается, а должна была эта функция использоваться ADOQuery2.Next; end; Последний раз редактировалось M.A.D.M.A.N., 23.05.2014 в 07:51. |
#2
|
||||
|
||||
Цитата:
И еще счетчик не забывай инкрементировать. И инициализировать его, счетчик, тоже надо. Предвосхищая следущий вопрос: счетчик у тебя - переменная i. Некоторые программисты настолько ленивы, что сразу пишут рабочий код. Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты. |
#3
|
||||
|
||||
Цитата:
Не стоит путать форумы с богадельнями. © Bargest |