Перенос данных из одной таблицы в другую до определенной даты

@Kir12 · Регистрация: 01.12.2015

Студворк — интернет-сервис помощи студентам

Всем привет)
Есть кнопка перенести товар после её нажатие происходит перенос данных с одной таблицы в другую и пока не наступила дата он её не переносит например сегодня там стоит 09.01.2016 значит нельзя , а когда уже наступила например сегодня 09.12.2015 он переносит строчку
Попробовал сделать так ничего не получилось(

C++
1
2
3
4
5
6
7
8
{
if(dataset->FieldByName("Дата заказа")->AsDateTime <= df );
ShowMessage("Товар ещё не пришёл ");
Form6->S11=ADOTable1->FieldByName("Наименование")->AsString;
Form6->S22=ADOTable1->FieldByName("Цена")->AsString;
Form6->S33=ADOTable1->FieldByName("Тип товара")->AsString;
ShowMessage("Товар успешно добавлен в ассортимент ");
}

Добавлено через 18 часов 58 минут

@Sasha · 10.12.2015, 15:39

здесь ввобще необходимо использовать запросы и компонент ADOQuery

@Kir12 · 10.12.2015, 16:01 **[ТС]**

Сообщение от Sasha

здесь ввобще необходимо использовать запросы и компонент ADOQuery

блин без sql вообще не как?
мне только нужно чтобы при нажатии на кнопку выбранная строчка переносилась в другую таблицу....

@Sasha · 10.12.2015, 16:23

Сообщение от Kir12

блин без sql вообще не как?

По ходу дела да!!!!!!!

@Kir12 · 11.12.2015, 19:30 **[ТС]**

плохо

Sasha,

Добавлено через 23 часа 45 минут
Может кому пригодится, сделал я перенос в другую таблицу
форма с которой переносится

C++
1
2
3
4
Form6->S11=ADOTable1->FieldByName("Íàèìåíîâàíèå")->AsString;
Form6->S22=ADOTable1->FieldByName("Öåíà")->AsString;
Form6->S33=ADOTable1->FieldByName("Òèï òîâàðà")->AsString;
ADOTable1->Delete();

форма в которую добавляем

C++
1
2
3
4
5
6
ADOTable1->Insert();
ADOTable1->FieldByName("Наименование")->AsString=S11;
ADOTable1->FieldByName("Цена")->AsString=S22;
ADOTable1->FieldByName("Тип товара")->AsString=S33;
ADOTable1->Post();
MessageDlg("Товар успешно добавлен", mtInformation, TMsgDlgButtons() << mbOK, 0);

Добавлено через 3 минуты
Теперь возник похоже последний вопрос по моей программе)
Как же всё таки сделать так чтобы нельзя было перемещать товар пока не наступила дата сегодняшняя дата?
Пример сегодня 11.12.2015 значит можно переместить, а если 12.12.2015 то нельзя.....

@Kir12 · 12.12.2015, 20:36 **[ТС]**

...

Новые блоги и статьи Все статьи Все блоги /
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	10.12.2015, 15:39
	здесь ввобще необходимо использовать запросы и компонент ADOQuery 0

@Kir12 1 / 1 / 0 Регистрация: 01.12.2015 Сообщений: 37
	12.12.2015, 20:36 [ТС]
	... 0