Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Лишняя запись в БД и ошибка (Pascal)


Страницы:   1 2

zigzac ©   (2014-05-24 11:05:00) 

Всем привет!!!!!!!!!!!!!!
У меня 2 вопроса:
1. Почему ответ следующего столбика добавляется в запись на строчку ниже, а не в одну запись(строчку)?
Проблема в том , что получается нужны ответ в другой записи и цикл его не считает.

Так я зачисляю в ячейки значения :

procedure TForm1.Button1Click(Sender: TObject);
var
A:Integer;
begin
if edit1.Text='' then
exit ;
A:=StrToInt(Edit1.Text);

if A=4 then
begin
ADOTable1.Open;
ADOTable1.Insert;
 ADOTable1.FieldByName('1').AsString:='2';
ADOTable1.Post;
ADoTable1.Close;
form1.Hide;
form2.Show;
end
else
 begin

form1.Hide;
form2.Show
 end;
end;



И вот так :


procedure TForm5.Button1Click(Sender: TObject);
var
A:String;
begin
 if edit1.Text='' then
exit ;

if edit1.Text='чемодан' then
begin
ADOTable1.Open;
ADOTable1.Append;
 ADOTable1.FieldByName('3').AsString:='2';
ADOTable1.Post;
form5.Hide;
form6.Show;
end
else
 begin

form5.Hide;
form6.Show
 end;
end;


2. Такая ошибка :

.............could not convert variant of type null into type integer.

Это когда цикл суммирует ответы(они не нулевые)(но лесенкой)(в каждой строке по ячейке=2,остальные =0)


procedure TForm43.Button1Click(Sender: TObject);
var
k,i:integer;

begin
k:=0;
for I := 1 to 40 do k:=k+adotable1.Fields.Fields[i].Value;
label2.caption:=IntToStr(k)

end;

end.


Спасибо.


  (2015-10-20 20:36:00) [1]

Удалено модератором


  (2015-10-20 17:00:00) [2]

Удалено модератором


junglecat   (2014-05-27 17:10:00) [3]

Удалено модератором


Dennis I. Komarov   (2014-05-27 17:00:00) [4]

Удалено модератором


Дмитрий   (2014-05-26 15:45:00) [5]

На каждой форме свой вопрос нарисован?
На одной форме отображать никак?


junglecat   (2014-05-25 00:53:00) [6]

> когда дедушки (бородатые) так именуют - расстрел через повешание

а дедушкам уже ничего не страшно o)


> номеру вопроса, ну не "F3", так "Answer3"

"AnswerNumberOne"


Inovet   (2014-05-25 00:42:00) [7]

> [19] turbouser ©   (25.05.14 00:21)

Кто бы спорил, я там следующим пунктом наметил возможный пересмотр структуры. А в существующей только так и именовать - по номеру вопроса, ну не "F3", так "Answer3", но тогда уж как раз "A3".


turbouser   (2014-05-25 00:21:00) [8]


> Inovet ©

просто человеки, которые студенты - им простительно, а вот когда дедушки (бородатые) так именуют - расстрел через повешание. плавали, знаем :(


turbouser   (2014-05-25 00:18:00) [9]


> novet ©   (24.05.14 23:22) [17]
>
> > [16] turbouser ©   (24.05.14 23:17)
> > особенно за  "F3"
>
> "3" лучше?
>

лучше имена раздовать адекватно.


Inovet   (2014-05-24 23:22:00) [10]

> [16] turbouser ©   (24.05.14 23:17)
> особенно за  "F3"

"3" лучше?


turbouser   (2014-05-24 23:17:00) [11]


> Inovet ©   (24.05.14 20:38) [12]


> Кстати, имена полей типа "3" как-то не того, хотя бы "F3"
> назвать.

поубивал бы(с) особенно за  "F3"


zigzac   (2014-05-24 22:10:00) [12]

спасибо ребят. я уже разобрался.
диалог прикольный.
я и не старался умным показаться. я ж не на экзамене.(это про высшее образование зацепило).
может по ходу еще вопросы будут напишу.
СПАСИБО!


Антоха   (2014-05-24 21:53:00) [13]

Сорок форм с вопросами это сильно.... Чувствую профи писал прогу ;)


Palladin   (2014-05-24 21:12:00) [14]


> Inovet ©   (24.05.14 20:05) [10]

Это возможно уже даже из глонасс-5
Секретная разработка
Еще не все получается


Inovet   (2014-05-24 20:38:00) [15]

> [11] junglecat   (24.05.14 20:16)

Навигация поездов и самолётов. Тоже неплохо.

Кстати, имена полей типа "3" как-то не того, хотя бы "F3" назвать.
Про то что лучше: ответы в одной записи в разных полях хранить или в разных записях с номером задания, можно потом обсудить.


junglecat   (2014-05-24 20:16:00) [16]

судя по слову 'чемодан', это что-то связанное с поездами или самолетами...


Inovet   (2014-05-24 20:05:00) [17]

> [9] Palladin ©   (24.05.14 19:49)
> наверное уже разрабатывает )

Хочешь сказать, это приведён кусок кода из Глонасс-4?


Palladin   (2014-05-24 19:49:00) [18]

наверное уже разрабатывает )


Palladin   (2014-05-24 19:49:00) [19]

образование высшее )


Palladin   (2014-05-24 19:48:00) [20]


> я зачисляю в ячейки значения

откуда это слово "зачисляю"

с форматированием кода беда

в башке беда

просьба помочь сдать и отвязаться

через три года будет разрабатывать глонасс 4


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо