Показать сообщение отдельно
  #5  
Старый 01.10.2010, 02:01
Аватар для Uniq!
Uniq! Uniq! вне форума
Местный
 
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
По умолчанию

Ну с точки зрения циклических переборов и драйверов я всё сделал правильно. Во многом разобрался. 6ть баз отправилось в Table'цы ,без потерь.

Еду Дальше. ОТ циклов надо переходить к SQL-запросам. Но логики пока не хватает.

Исходные данные:

Cтруктура:

Первый столбик таблицы - Артикулы(уникальные)
Структура 4буквы+4цифры. (АААА0001)

Пользователь вводит только буквы, а прога просчитывает номер артикула сама.

У меня алгоритм такой:
1)Фильтрую базу по первым 4ём буквам остаётся например
АААА0001
АААА0002
АААА0003
Надо добавить АААА0004

2)Спускаюсь к последнему полю(АААА0003), (маленький алгоритмик по получению строки 'АААА0004': копирую последние 4ре('0003') -> в int -> +1 -> в '0004' -> 'АААА0004');

3) Добавляю запись путём ZQuery1.FieldByName...

Вопрос:
Как используя SQL запрос, добавляли бы вы новую запись?
Ответить с цитированием