Показать сообщение отдельно
Старый 16.02.2007, 15:59   #16  
romeo is offline
romeo
Участник
Аватар для romeo
 
564 / 10 (2) +
Регистрация: 31.03.2004
Цитата:
Сообщение от grif Посмотреть сообщение
Не знаю как с перерисовкой в этмо примере
<div class='CALtop'>C/AL</div><div class='CAL'>
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;
</div>
Но можно сделать проще - присвоить в rec и также сделать modify + commit и будет работать. Только что проверил
Ой, мама ... ((