Забить пустым значением UTF8 строку

Вопросы программирования на Free Pascal, использования компилятора и утилит.

Модератор: Модераторы

Ответить
Аватара пользователя
Light13
постоялец
Сообщения: 127
Зарегистрирован: 17.07.2009 07:50:10
Откуда: Челябинск

Забить пустым значением UTF8 строку

Сообщение Light13 »

корректен ли такой код?

Код: Выделить всё

  FillChar(StrUtf8[1], Length(StrUtf8), #0);
скалогрыз
долгожитель
Сообщения: 1804
Зарегистрирован: 03.09.2008 02:36:48

Сообщение скалогрыз »

Проверка существования StrUtf8[1] весьма желательна (позволяет избежать range check error), хотя и не обязательна

Код: Выделить всё

  if length(StrUtf8)>0 then FillChar(StrUtf8[1], Length(StrUtf8), #0);
Аватара пользователя
Light13
постоялец
Сообщения: 127
Зарегистрирован: 17.07.2009 07:50:10
Откуда: Челябинск

Сообщение Light13 »

Спасибо
Ответить