Разное
Облака / Clouds

The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>

time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Delphi - Справочник: SetString
SetString
|
procedure SetString ( var TargetString : string; BufferPointer : PChar; Length : Integer ) ; |
Процедура (Unit System)
|
Копирует символы из буфера в строку
|
Описание:
|
Процедура SetString меняет длину TargetString на Length перед копированием этого количества символов из буфера, заданного переменной BufferPointer. Длина меняется только в том случае, если строка не типа ShortString. Фактически, память под строку перераспределяется - ссылка на TargetString указывает на эту новую строку. |
Пример кода: Простой пример
|
var target : string; source : array[1..5] of Char; srcPtr : PChar; i : Integer; begin // Заполнение массива символов for i := 1 to 5 do source[i] := Chr(i+64); // Копирование этих символов в строку srcPtr := Addr(source); SetString(target, srcPtr, 5); // Показываем, что мы имеем ShowMessage('target теперь = '+target); end;