|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Проблема с БД на Access
Здраствуйте, помогите начинающему. Есть код на делфи
Код:
Form2.DataSetProvider1.DataSet.Open; Form2.ADOTable1.Insert; Form2.ADOTable1.FieldByName('Строка').AsString:=Edit2.Text; Form2.ADOTable1.FieldByName('Счетчик').AsInteger:=i; Form2.ADOTable1.Post; Посоветуйте как сделать так, чтобы при вводе одинаковой "строки" у меня счетчик увеличивался на 1 и записывался в счетчик , а если строки отличаются то был равен i.Пробывал такой вариант, но мне не помогает. Код:
form2.ADOTable1.First; for k:= 1 to form2.ADOTable1.RecordCount do begin if Form2.ADOTable1.FieldByName('Строка').AsString=Edit2.Text then begin Form2.DataSetProvider1.DataSet.Open; form2.ADOTable1.Edit; Form2.ADOTable1.FieldByName('Счетчик').AsInteger:=i; end; i:=i+1; Form2.ADOTable1.next; end; Последний раз редактировалось Pomidori, 31.03.2010 в 22:32. |