Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.12.2022, 14:56   #1
Raf5456
 
Регистрация: 01.11.2022
Сообщений: 6
По умолчанию Удаление пассажира

Здраствуйте. Заранее говорю спасибо всем за помощь.
Есть форма. Помогите пожалуйста сделать так, что б при нажатии на кнопку "Удалить", в выбранный класс Б-e1 или Э-е2, определенного рейса , прибавлялось число 1(удаленный билет) в бд Access.

Для кнопки добавить, я написал такой код:

Modul.List_of_flights.Edit; //Открытие таблицы Авиакомпания для редактирования
begin
if DBcheckBox1.Checked then
begin
list.DBGrid2.Fields[5].AsString:=IntToStr(StrToInt(Edit7. Text)- 1)
endКнопк
else if DBCheckBox2.Checked then
begin
list.DBGrid2.Fields[6].AsString:=IntToStr(StrToInt(Edit12 .Text)- 1);
end;
Modul.List_of_flights.Post;//Отправка данных в таблицу Авиакомпания
end;end;
Изображения
Тип файла: jpg 2022-12-16_16-57-48.jpg (73.4 Кб, 4 просмотров)

Последний раз редактировалось Raf5456; 16.12.2022 в 14:59.
Raf5456 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Багаж пассажира характеризуется количеством вещей и общим весом вещей - Pascal ABC Just-Five Помощь студентам 13 18.06.2016 10:27
Помогите решение в паскале! Имеются сведения о багаже пассажира (название и вес каждого предмета). Всего предметов N. Выбрать... Fanat-koms Помощь студентам 4 09.12.2015 12:55
Создать файл "Багаж", включающий в себя информацию:фамилия пассажира, количество и общий вес вещей, место следования. Регааа Паскаль, Turbo Pascal, PascalABC.NET 0 26.11.2014 16:23
задача на Pascal ,fuf; багаж пассажира ksunndria Помощь студентам 1 21.12.2012 13:12