Показать сообщение отдельно
  #1  
Старый 31.03.2010, 22:15
Pomidori Pomidori вне форума
Прохожий
 
Регистрация: 31.03.2010
Сообщения: 1
Репутация: 10
По умолчанию Проблема с БД на 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;
Admin: Пользуемся тегами!
Ответить с цитированием