Гость
Войти | Профиль | Очистить
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Какие минусы использования set alternate / 13 сообщений из 13, страница 1 из 1
10.04.2014, 06:42
    #38610644
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
subj
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 06:56
    #38610649
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
1. пишешь только в один файл.
2. программа вылетела - файл остался недописанный.

Это команда из технологий FPD. Там это было уместно: написал отчет, а извне задавай куда вывести: экран, принтер, файл.

Кстати твой вопрос из другого топика
q1w1e1и ещё вопрос, почему то SET ALTERNATE ON добавляет пустую строчку вначале, какой опцией можно сделать, чтоб не добавлялась пустая строка...
Это не SET ALTERNATE выводит пустую строку, это ? выводит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:27
    #38610656
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
спасибо..., но эти минусы для меня не минусы...:-)
?, т.е. эта команда переводит каретку и начинает писатть текст... так что ли
кстати
im_f="x"
SET TEXTMERGE ON TO &im_f
Text
<?xml version="1.0" encoding="windows-1251"?>
EndText
SET TEXTMERGE OFF
SET TEXTMERGE to
Та же фигня, первая строка пустая, да к тому же макроподстановку не понимает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:31
    #38610658
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
q1w1e1?, т.е. эта команда переводит каретку и начинает писатть текст... так что ли
именно так. Есть ?? которая продолжает текущую строку
Код: sql
1.
? 'qwe'


равносильно
Код: sql
1.
?? chr(13) + chr(10) + 'qwe'
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:37
    #38610659
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
q1w1e1кстати
im_f="x"
SET TEXTMERGE ON TO &im_f
Text
<?xml version="1.0" encoding="windows-1251"?>
EndText
SET TEXTMERGE OFF
SET TEXTMERGE to
Та же фигня, первая строка пустая, да к тому же макроподстановку не понимает...
Зачем столько наворотов?
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
x = 10

Text to lcText textmerge noshow
<?xml version="1.0" encoding="windows-1251"?>
x = <<x>>
endtext

StrToFile(lcText, 'file.txt')
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:37
    #38610660
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
понятно, первую строку надо писать ??
а вот ещё вопрос...? почему SET TEXTMERGE дописывает расширение ".txt" в конец имени файла, как можно этого избежать...
LOCAL lcEnter,lcText, im_f
im_f="x"
lcEnter = chr(13) + chr(10)
lcText = '<?xml version="1.0" encoding="windows-1251"?>' + lcEnter
StrToFile(lcText, im_f)
SET TEXTMERGE ON TO &im_f additive
Text
<ФайлПФР>
EndText
SET TEXTMERGE OFF
SET TEXTMERGE to
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:39
    #38610662
ПЕНСИОНЕРКА
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
q1w1e1,

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
im_f="x"
SET TEXTMERGE TO &im_f
SET TEXTMERGE on
?? 
Text
первая строка не пустая
<?xml version="1.0" encoding="windows-1251"?>
EndText
SET TEXTMERGE OFF 
SET TEXTMERGE to
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:55
    #38610666
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
ПЕНСИОНЕРКА,
Спасибо, но скопировал код, расширение добавилось ".txt", хотя это уже другой файл, и строка пустая добавилась... Наверное в настройках надо смотреть...

первая строка не пустая
<?xml version="1.0" encoding="windows-1251"?>

В общем я проехал это, как Dima T, написал, так и сделал..
LOCAL lcEnter,lcText
lcEnter = chr(13) + chr(10)
Text to lcText textmerge noshow
<?xml version="1.0" encoding="windows-1251"?>
<ФайлПФР>
EndText
StrToFile(lcText, im_f)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:56
    #38610667
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
q1w1e1понятно, первую строку надо писать ??
а вот ещё вопрос...? почему SET TEXTMERGE дописывает расширение ".txt" в конец имени файла, как можно этого избежать...
LOCAL lcEnter,lcText, im_f
im_f="x"
lcEnter = chr(13) + chr(10)
lcText = '<?xml version="1.0" encoding="windows-1251"?>' + lcEnter
StrToFile(lcText, im_f)
SET TEXTMERGE ON TO &im_f additive
Text
<ФайлПФР>
EndText
SET TEXTMERGE OFF
SET TEXTMERGE to
Зачем этот огород лишних команд? Заполняй переменную как переменную. Надо большие блоки - используй TEXT
В конце один раз сохрани с помощью StrToFile().

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
x = 10

Text to lcText textmerge noshow
<?xml version="1.0" encoding="windows-1251"?>

endtext

Text to lcText textmerge noshow additive
<&#212;&#224;&#233;&#235;&#207;&#212;&#208;>x * x = <<x * x>>
endtext

lcText = lcText + '</&#212;&#224;&#233;&#235;&#207;&#212;&#208;>' + chr(13) + chr(10)

StrToFile(lcText, 'file.txt')

MessageBox(lcText)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 07:57
    #38610669
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
Криво скопировалось
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
x = 10

Text to lcText textmerge noshow
<?xml version="1.0" encoding="windows-1251"?>

endtext

Text to lcText textmerge noshow additive
<ФайлПФР>x * x = <<x * x>>
endtext

lcText = lcText + '</ФайлПФР>' + chr(13) + chr(10)

StrToFile(lcText, 'file.txt')

MessageBox(lcText)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 08:29
    #38610678
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 09:45
    #38610747
правильный проходящий
правильный проходящий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
q1w1e1,

а без макроподстановки некоторым жизнь таки не мила... :) Хотя она тут ну совершенно не нужна.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.04.2014, 12:08
    #38611000
q1w1e1
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Какие минусы использования set alternate
правильный проходящий,
im_f="x"
т.е. если вместо
SET TEXTMERGE TO &im_f
написать
SET TEXTMERGE TO evaluate(im_f)
то расширение ".txt" подставляться не будет, и жизть наладится...:-)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Какие минусы использования set alternate / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 582ms
Закрыть
start [/forum/search_topic.php?author=1233456&author_mode=last_topics&do_search=1]:
 0ms
get settings:
 7ms
get forum list:
 12ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 82ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 46ms
get tp. blocked users:
 1ms
others: 398ms
total:  582ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]