Цитата:
Сообщение от
VasVovec
Код:
IF Rec.FIND('-') THEN
WHILE Rec.NEXT <> 0 DO
Цитата:
Сообщение от
RedFox
А чем стандарный вариант не подходит то?
IF Rec.FINDFIRST THEN REPEAT
...
UNTIL Rec.NEXT = 0
между этими двумя кострукциями есть разница, в первом случае будут обработаны все записи, кроме первой, во втором - все...