VPF 9.0 SP2 Форма,Грид.
В нем простая табличка(собственно, сама база) с 2 полями, одно из которых одно - текст со стихами.
Одна строчка - одна запись в табличке.
Хочу все содержимое вытряхнуть в обычный текстовый файл,но без концевых пробелов.
В комманд-кнопку прописал:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
nCurRec=RECNO()
SET PRINTER TO 'C:\poema.txt' FONT ("Arial", 12 ,"B")
SET PRINTER ON
SET DEVICE TO PRINTER
IF .t. && Вариант 1
SCAN
? ALLTRIM(esenin.ctrofa)
ENDSCAN
ELSE
LIST OFF ALLTRIM(esenin.ctrofa) TO PRINTER && Вариант 2
ENDIF
SET PRINTER OFF
SET PRINTER TO
SET DEVICE TO SCREEN
GO nCurRec
В первом случае в текстовом файле к каждой строчке прицепляется случайным образом от 2 до 4 пробелов.
Во втором варианте еще хуже. ALLTRIM() вообще не работает. Все строки длиной с поле таблицы.
В чём дело? Что убрать, что добавить?
