Имя: Пароль:
1C
 
символы.ВК (ENTER)
0 vampire-jr
 
25.12.06
07:07
Здравствуйте!
Проблема такая.
Я в Ворд из 1с вставляю шаблон.
На шаблоне в нужном мне месте вставляю текст.
Но после вставки текста на том месте где должен стоять символы.ВК (ENTER) стоит квадратик. Как мне от него избавиться?
Помогите пожалуйста!!
1 ASV
 
25.12.06
07:23
покажи код вставки текста
2 vampire-jr
 
25.12.06
08:19
Перемен=ТекстПисьма;

   ДлинаТекста = СтрДлина(ТекстПисьма);
   ЧислоБлоков = Цел(ДлинаТекста/200);
   ЕстьХвост = ДлинаТекста>(ЧислоБлоков*200);
   
   Для Счетчик = 1 По ЧислоБлоков Цикл
       ТекстПисьма1 = Сред(ТекстПисьма,(Счетчик-1)*200,200)+?(ЕстьХвост,"<Текст>","");
       
       Замена.Execute("<Текст>", Ложь, Истина, Ложь,,,Истина,,Ложь,строка(ТекстПисьма1)) ;
   КонецЦикла;
   Если ДлинаТекста>ЧислоБлоков*200 Тогда
   Для тексимвол=1 по СтрДлина(Перемен) Цикл
       Если  КодСимвола  (Перемен, тексимвол )=10   тогда
               Перемен = Лев(Перемен, тексимвол-1)+Символ(13)+Сред(Перемен, тексимвол+1)
       КонецЕсли;
   КонецЦикла;    
       ТекстПисьма1 = Сред(ТекстПисьма,ЧислоБлоков*200+1,200);
       Замена.Execute("<Текст>", Ложь, Истина, Ложь,,,Истина,,Ложь,строка(ТекстПисьма1)) ;
   КонецЕсли;
3 ASV
 
25.12.06
08:30
ТекстПисьма1=СтрЗаменить(ТекстПисьма1,Симв(10),"^p");
ТекстПисьма1=СтрЗаменить(ТекстПисьма1,Симв(13),"^p");
4 Номенклатор
 
25.12.06
09:02
Дятлы... А ЖКК почитать и вставить предопределенный символ вера не позволяет?
5 Номенклатор
 
25.12.06
09:03
Или вместо ВК втавлять в ворд новый абзац тоже вера не позволяет?
6 konstantinSB
 
25.12.06
09:17
(4)слышь умник, ты бы лучше подсказал как это сделать
7 ASV
 
25.12.06
09:20
он иммет ввиду РазделительСтроки
8 Neco
 
25.12.06
09:28
Можно сделать через переменные, что-то вроде:

ТекПисьмо.ActiveDocument.Variables("Текст").Value = ТекстПисьма1;
9 Номенклатор
 
25.12.06
09:33
афыгел...