29.07.2010, 17:29 | #1 |
Участник
|
Коллеги, может кто знает.
Нужно сделать вызов формы для отметки значений. Делаю так: CLEAR(Frm); Frm.CAPTION := 'Отметьте..'; Frm.SETTABLEVIEW(Rec); Frm.SETRECORD(Rec); //тут открывается форма и ctrl+f1 отмечаются некторые значения IF Frm.RUNMODAL = ACTION::Close THEN BEGIN Frm.GETRECORD(Rec); // Далее из таблицы не получается прочитать какие записи отмеченные MESSAGE(FORMAT(Rec.COUNT)); Rec.MARKEDONLY(TRUE); MESSAGE(FORMAT(Rec.COUNT)); // выводится одно и тоже кол-во записей |
|
30.07.2010, 11:41 | #2 |
Участник
|
Создайте в форме функцию GetCurrRecord(VAR _Rec [ваша таблица])
Текст прост _Rec.COPY(Rec); Тогда Код: IF Frm.RUNMODAL = ACTION::Close THEN BEGIN Frm.GetCurrRecord(_ВашаRec); _ВашаRec.MARKEDONLY(TRUE); ... END; |
|
30.07.2010, 11:55 | #3 |
Участник
|
Точно!
Должно сработать. Попробую, отпшусь. |
|
30.07.2010, 13:38 | #4 |
Участник
|
romeo, отлично!
+1 |
|