Добрый день! В документе 2 текстовых поля: одно большое - закрыто для пользователя, второе открыто. Юзер вводит текст в него, нажимает ентер и
текст попадает в 1-е поле. Т.е. как в аське получается. Подставляется дата, время и фио пользователя. Как сделать так, чтобы дата выводилась за одно открытие документа, а не с каждой строчкой?

Вот эта функция
Функция СформироватьКоммент()
   
   Если (Коментарий = "") Тогда
       ТекКоммент = Строка(ТекущаяДата()) + " " + Строка(глТекущийПользователь.Наименование) + " """+СокрЛП(ПолеВводаКомментарий)+"""";    
   Иначе    
       ТекКоммент = Коментарий + Символы.ПС + Строка(ТекущаяДата()) + " " + Строка(глТекущийПользователь.Наименование) + " """+СокрЛП(ПолеВводаКомментарий)+"""";
   КонецЕсли;
   
   Возврат ТекКоммент;
КонецФункции;

(0) Флаг какой нибудь используй, что уже вывел дату

(2) Только флаг? А какого-нибудь хитрого способа нету?

(3) Можно проанализировать полный коммент и смотреть есть там дата или нет...

При открытии куда-нибудь запоминаем дату (датаоткрытия - текущаяДата())
и к примеру здесь
ТекКоммент = Строка(ТекущаяДата()) + " " + Строка(глТекущийПользователь.Наименование) + " """+СокрЛП(ПолеВводаКомментарий)+"""";  
заменяем ТекущаяДата() на ДатаОткрытия

(3) Флаг (переменная) самый хитрый. Все остальное затратнее. ИМХО.

(5) ну если заменим, то получится тоже самое

(7) Как так?

(8) Ну что и было, я не поняла что этой заменой получим-то?

Может разрешить пользователю редактировать все новые добавленные строки комментария. А перед записью добавить к сохраняемому комментарию.

(10) Ну хотелось бы чтоб второе поле оставалось маленьким, комментарии бывают очень длинными

Да вы чего. Переменная модуля формы ПользовательУжеДобавилКомментарий при открытии формы выставляется в Ложь, при изменении ПолеВводаКомментарий в Истину, в функции СформироватьКоммент() проверяется. 3 строчки кода.

(12) Да, так проще всего )) Спасибо )

(13) Самое простое решение не всегда самое удобное

(14) Может быть) предложи другое))

Функция СформироватьКоммент()
   
   Если (ПользовательУжеДобавилКомментарий = Ложь)И(Коментарий = "") Тогда
       ТекКоммент = Строка(ТекущаяДата()) + " " + Строка(глТекущийПользователь.Наименование) + Символы.ПС +СокрЛП(ПолеВводаКомментарий);    
   ИначеЕсли (Коментарий <> "")И(ПользовательУжеДобавилКомментарий = Ложь) Тогда    
       ТекКоммент = Коментарий + Символы.ПС + Строка(ТекущаяДата())+ " " + Строка(глТекущийПользователь.Наименование) + Символы.ПС+СокрЛП(ПолеВводаКомментарий);
   Иначе
       ТекКоммент = Коментарий + Символы.ПС + " " + СокрЛП(ПолеВводаКомментарий);
   КонецЕсли;
   
   Возврат ТекКоммент;
КонецФункции;
Вот что получилось

(15) По крайней мере как нибудь сделал бы как в (10)

(17) а где их можно будет редактировать , в 1 или 2-м поле?

(16)
В 8-ке можно проще:

ИначеЕсли Коментарий <> "" И Не ПользовательУжеДобавилКомментарий Тогда


(18) Не в первом точно. Можно добавить кнопку "Редактировать" рядом первым полем где-то. По ней можно будет поменять открыть и поменять весь текст который еще не записан в БД. Возможно так. Может еще какие варианты есть.

(19) Да, точно) у меня после 7-ки привычка осталась (это к первому комменту)

(19) Ладно, пока на сегодня так оставлю) завтра поразбираюсь;)