LookupComboBox и Edit

@Korulik · Регистрация: 29.12.2015

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

Добрый день! Есть форма, на ней LookupComboBox и Edit, при выборе значения LookupComboBox(LookupCode_RESChange), в поле Edit (N_TY) значение с бд должно увеличиваться на единицу

Delphi
1
2
3
4
5
6
7
8
9
10
11
...
var
 Nty:word;
...
 
procedure TEditUrForm.LookupCode_RESChange(Sender: TObject);
begin
 N_TY.Text:=DataM.DataSetSets.FieldByName('Code_Res_UF').AsString+'/'+
                IntToStr(DataM.DataSetSets.FieldByName('N_RES_UF').AsInteger+1);
 Nty:=DataM.DataSetSets.FieldByName('N_RES_UF').AsInteger+1;
end;

а подставляется просто данное значение с поле бд, без увеличения на 1

@qwertehok · 07.03.2016, 13:43

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

при выборе значения LookupComboBox(LookupCode_RESChange), в поле Edit (N_TY) значение с бд должно увеличиваться на единицу

каждый раз?
а если 3 раза выбрать?

@Korulik · 07.03.2016, 17:36 **[ТС]**

Каждому значению в поле LookupCode_RESChange в базе соответсвует начальное значение (номер ,например 25ю/1),
выбрал значение LookupCode_RESChange, в Edit подставилось значение с базы + 1, сохранили, далее повторяем, если нужно ввести ещё одни документ.Номер будет тоже на 1 больше (повторных быть не может, лишь на 1 больше)

@qwertehok · 07.03.2016, 17:59

Korulik, зачем +1 привязывать к выбору в LookupCode_RESChange? может проще в базе поставить AUTOINCREMENT

@Korulik · 07.03.2016, 19:08 **[ТС]**

qwertehok, AUTOINCREMENT не подходит, там номера потипу 25ю/16 и тому подобное, иногда они могут их поменять в самом справочнике, короче техническое задание описано так,что надо +1 делать

Новые блоги и статьи Все статьи Все блоги /
Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды "Заполнить" и "Очистить" на форме документа Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных выбран регистр накопления, в. . .	Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip

@Korulik 0 / 0 / 1 Регистрация: 29.12.2015 Сообщений: 131
	07.03.2016, 17:36 [ТС]
	Каждому значению в поле LookupCode_RESChange в базе соответсвует начальное значение (номер ,например 25ю/1), выбрал значение LookupCode_RESChange, в Edit подставилось значение с базы + 1, сохранили, далее повторяем, если нужно ввести ещё одни документ.Номер будет тоже на 1 больше (повторных быть не может, лишь на 1 больше) 0

@qwertehok 5981 / 4556 / 1095 Регистрация: 29.08.2013 Сообщений: 28,188 Записей в блоге: 3
	07.03.2016, 17:59
	Korulik, зачем +1 привязывать к выбору в LookupCode_RESChange? может проще в базе поставить AUTOINCREMENT 0

@Korulik 0 / 0 / 1 Регистрация: 29.12.2015 Сообщений: 131
	07.03.2016, 19:08 [ТС]
	qwertehok, AUTOINCREMENT не подходит, там номера потипу 25ю/16 и тому подобное, иногда они могут их поменять в самом справочнике, короче техническое задание описано так,что надо +1 делать 0