Поток.УстановитьДлину (Stream.SetLength) Метод

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Поток1 = Ф.Поток();
СтрБуфер = "The quick brown fox jumps over the lazy dog.";
Поток1.УстановитьДлину(Ф.Кодировка().ПолучитьБайты(СтрБуфер).Количество);

Сообщить("Поток1.Длина = " + Поток1.Длина); // Поток1.Длина = 44

Ф.ЗапуститьОбработкуСобытий();

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

Поток1 = Ф.Поток();
СтрБуфер = "The quick brown fox jumps over the lazy dog.";
Поток1.УстановитьДлину(Ф.Кодировка().ПолучитьБайты(СтрБуфер).Количество);

Сообщить(?(
Поток1.Длина = 44
, "", "!!! ") + "Поток.УстановитьДлину (Stream.SetLength) Метод" + " " + ТекущаяДата());