|
![]() |
#1 |
Участник
|
Цитата:
Сообщение от Beetlejuice
Ну почему же сразу "глюк"...просто нужно сообразить.
CLEAR(FieldList); // не забываем очищать по указателю FieldList.LOOKUPMODE := TRUE; IF FieldList.RUNMODAL = ACTION::LookupOK THEN BEGIN FieldList.GETRECORD(Fields); loca_rec_current.LOCKTABLE; // это переменная той же записи что //REC, лочим таблицу loca_rec_current.GET(line); //выставляем нужную запись loca_rec_current.Fieldno:= Fields."No.";//дальше понятно. loca_rec_current.MODIFY; COMMIT; END; ![]()
__________________
Want to believe... |
|